vbscript基础篇 – vbs数组Array的定义与使用方法

VBScript基础篇 - VBScript数组Array的定义与使用方法

VBScript数组是一种用于存储多个数据项的有序集合。数组的使用可以使得数据项可以通过单个变量名进行访问。本篇文章将介绍VBScript中数组的定义、初始化和使用方法。

数组的定义

在VBScript中，数组是通过使用 Dim 语句进行定义的。语法格式如下：

Dim arrayName(subscript1[, subscript2[, ...]])

其中，arrayName 是新数组的名称， subscript1 是必需的代表数组第一维度的子脚本，subscript2 是可选的代表数组的第二维度的子脚本，以此类推。

下面是一个定义一个一维数组的例子:

Dim myArray(4)

我们也可以定义一个二维数组，下面是一个例子:

Dim myArray(4,2)

这将创建一个 4 行 2 列的数组。

数组的初始化

数组的定义时，不需要指定数组的大小，这可以在后续的赋值过程中完成。以下是初始化一个数组的方法：

方法一：在定义时统一赋值

Dim myArray(2)
myArray(0) = "Hello"
myArray(1) = "world"
myArray(2) = "!"

方法二：按下标一个个赋值

Dim myArray(2)
for i = 0 to 2
    myArray(i) =  i
next

方法三：使用VBScript关键字Array 定义

Dim myArray
myArray = Array("Hello", "world", "!")

在此例中，函数Array返回了一个包含三个元素的字面量数组，并将其赋值给变量 myArray。

数组的使用

访问数组元素

VBScript使用括号操作符()来访问数组元素。数组的起始索引为0，因此，第一个元素的索引为0，第二个元素的索引为1，以此类推。下面是例子：

Dim myArray
myArray = Array("Hello", "world", "!")
MsgBox myArray(0)

以上程序将弹出一个窗口，并显示数组的第一个元素 "Hello"。

数组的遍历

VBScript中可以使用 For Each...Next 语句来遍历数组。使用这种方法可以依次访问数组中的每一个元素。下面是一个例子：

Dim myArray
myArray = Array("Hello", "world", "!")
For Each item In myArray
    MsgBox item
Next

以上程序将弹出3个窗口，并分别显示数组中的三个元素。

总结

本篇文章介绍了VBScript的数组的定义,初始化和使用方法。可以看到，VBScript的数组非常容易使用。通过本篇文章，读者可以初步掌握VBScript的数组使用方法。

示例说明

示例1：使用数组计算某次学生的平均分数

'定义一个包含成绩的数组
Dim grades(4)
grades(0) = 80
grades(1) = 75
grades(2) = 90
grades(3) = 85
grades(4) = 92

'计算平均分
Dim sum, average
sum = 0
For Each grade In grades
    sum = sum + grade
Next
average = sum / UBound(grades) + 1

'MsgBox 显示平均分
MsgBox "平均分为：" & average

运行程序，程序会计算平均分，然后弹出一个窗口，显示平均分为 84.4。

示例2：使用数组存储并显示星座名称

'定义一个包含12个星座的数组
Dim starSigns 
starSigns = Array("水瓶座", "双鱼座", "白羊座", "金牛座", 
                   "双子座", "巨蟹座", "狮子座", "处女座", 
                   "天秤座", "天蝎座", "射手座", "摩羯座")

'msgBox 依次打印出所有星座名称
for i = 0 to UBound(starSigns)
    MsgBox starSigns(i)
next

该程序将依次弹出12个窗口，分别显示每个星座的名称。