vbscript基础篇 - vbs数组Array的定义与使用方法
程序员文章站
2022-03-07 15:09:54
vbs数组定义和用法
array 可返回一个包含数组的变量。
注释:数组中的第一个元素是零。
语法
array(arglist)
参数 描述
argl...
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
这篇文章就介绍到这,需要的朋友可以参考一下。