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

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

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

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

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

 

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

1

2

3

4

5

6

7

8

9

10

11

12

DimMyArray() '首先定义一个一维动态数组

ReDimMyArray(3) '重新定义该数组的大小

MyArray(0) = "我"'分别为数组赋值

MyArray(1) = "要"

MyArray(2) = "学"

MyArray(3) = "习"

ReDimPreserve MyArray(5) '重新定义该数组的大小

MyArray(4) = "测"'继续为数组赋值

MyArray(5) = "试"

Fori=0 ToUBound(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

DimMyArray() '首先定义一个一维动态数组

ReDimMyArray(1,1) '重新定义该数组的大小

MyArray(0,0) = "A"'分别为数组赋值

MyArray(0,1) = "a"

MyArray(1,0) = "B"

MyArray(1,1) = "b"

ReDimPreserve MyArray(1,2) '重新定义该数组的大小

MyArray(0,2) = "A-a"'继续为数组赋值

MyArray(1,2) = "B-b"

MsgBox UBound(MyArray,1)

MsgBox UBound(MyArray,2)

Fori=0 ToUBound(MyArray,1)

    Forj=0 ToUBound(MyArray,2)

        MsgBox MyArray(i,j) '循环遍历数组，并输出数组值

    Next

Next