VBS基础篇 - 变量(6) - 数组变量

只包含一个值的变量称为标量变量。

有时候为了方便将一组相关值赋给一个变量,则成为数组变量。

区别标量与数组的唯一方式是：声明时数组变量名后面带有括号()。

接下来我们看看怎样声明一维数组及多维数组：

 

下面先简单的看个一维数组的示例： 

1 2 3 4 5 6 7 8 9 10 11 12

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

 

　　动态数组：

运行脚本时大小发生变化的数组，可以使用Dim或ReDim语句，但括号中不包含任何数字。

要使用动态数组，必须随后使用ReDim确定维数和每一维的大小。

若同时使用Preserve关键字，则在重新调整大小时保留数组的内容。

再接下来，看一下动态二维数组的示例：

 

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

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