快活林资源网 Design By www.csstdc.com
vbs数组定义和用法
Array 可返回一个包含数组的变量。
注释:数组中的第一个元素是零。
语法
Array(arglist)
参数 描述
arglist 必需的。数组中元素值的列表(由逗号分割)。
实例
例子 1
dim a a=Array(5,10,15,20) document.write(a(3))
输出:
20
例子 2
dim a a=Array(5,10,15,20) document.write(a(0))
输出:
5
数组变量:有时需要向一个单一的变量赋于多个值,那么您可以创建一个可包含一系列值的变量,这种变量被称为数组。
'静态数组 dim a(2) a(0)="George" a(1)="john" a(2)="Ethon" for i =0 to 2 msgbox a(i) next for i =0 to ubound(a) 'ubound函数,返回指定数组维数的最大可用下标 msgbox a(i) next '动态数组 dim a() for i = 0 to 2 redim preserve a(i) 'ReDim语句,用于过程级声明动态数组变量并分配或重新分配存储空间 a(i)=i+1 msgbox a(i) next
动态二维数组
'动态二维数组 Dim MyArray() '首先定义一个一维动态数组 ReDim MyArray(1,1) '重新定义该数组的大小 MyArray(0,0) = "A" '分别为数组赋值 MyArray(0,1) = "a" MyArray(1,0) = "B" MyArray(1,1) = "b" ReDim Preserve MyArray(1,2) '重新定义该数组的大小 MyArray(0,2) = "A-a" '继续为数组赋值 MyArray(1,2) = "B-b" MsgBox UBound(MyArray,1) MsgBox UBound(MyArray,2) For i=0 To UBound(MyArray,1) For j=0 To UBound(MyArray,2) MsgBox MyArray(i,j) '循环遍历数组,并输出数组值 Next Next
一维动态数组
Dim MyArray() '首先定义一个一维动态数组 ReDim MyArray(3) '重新定义该数组的大小 MyArray(0) = "我" '分别为数组赋值 MyArray(1) = "要" MyArray(2) = "学" MyArray(3) = "习" ReDim Preserve MyArray(5) '重新定义该数组的大小 MyArray(4) = "测" '继续为数组赋值 MyArray(5) = "试" For i=0 To UBound(MyArray) MsgBox MyArray(i) '循环遍历数组,并输出数组值 Next
这篇文章就介绍到这,需要的朋友可以参考一下。
快活林资源网 Design By www.csstdc.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
快活林资源网 Design By www.csstdc.com
暂无评论...
更新日志
2024年11月18日
2024年11月18日
- 【雨果唱片】中国管弦乐《鹿回头》WAV
- APM亚流新世代《一起冒险》[FLAC/分轨][106.77MB]
- 崔健《飞狗》律冻文化[WAV+CUE][1.1G]
- 罗志祥《舞状元 (Explicit)》[320K/MP3][66.77MB]
- 尤雅.1997-幽雅精粹2CD【南方】【WAV+CUE】
- 张惠妹.2007-STAR(引进版)【EMI百代】【WAV+CUE】
- 群星.2008-LOVE情歌集VOL.8【正东】【WAV+CUE】
- 罗志祥《舞状元 (Explicit)》[FLAC/分轨][360.76MB]
- Tank《我不伟大,至少我能改变我。》[320K/MP3][160.41MB]
- Tank《我不伟大,至少我能改变我。》[FLAC/分轨][236.89MB]
- CD圣经推荐-夏韶声《谙2》SACD-ISO
- 钟镇涛-《百分百钟镇涛》首批限量版SACD-ISO
- 群星《继续微笑致敬许冠杰》[低速原抓WAV+CUE]
- 潘秀琼.2003-国语难忘金曲珍藏集【皇星全音】【WAV+CUE】
- 林东松.1997-2039玫瑰事件【宝丽金】【WAV+CUE】