VBScript 数组用法详解375

在 VBScript 中，数组是一种用于存储数据的集合。它可以存储各种数据类型，例如数字、字符串、布尔值，甚至其他数组。数组在 VBScript 中非常有用，因为它允许您以结构化和高效的方式组织和管理数据。

创建数组

要创建数组，可以使用 ReDim 语句。ReDim 语句的语法如下：```vbscript
ReDim [arrayName]([subscripts...])
```

其中：* arrayName 是数组的名称。
* subscripts 是数组维度的数量。

例如，以下代码创建一个名为 myArray 的一维数组，其中有 5 个元素：```vbscript
ReDim myArray(4)
```

也可以创建一个多维数组。例如，以下代码创建一个名为 my2DArray 的二维数组，其中有 3 行和 4 列：```vbscript
ReDim my2DArray(2, 3)
```

访问数组元素

要访问数组元素，可以使用以下语法：```vbscript
arrayName(subscript)
```

其中：* arrayName 是数组的名称。
* subscript 是要访问的元素的索引。

索引从 0 开始。例如，以下代码访问 myArray 数组中的第一个元素：```vbscript
myArray(0)
```

以下代码访问 my2DArray 数组中的第二行第三列的元素：```vbscript
my2DArray(1, 2)
```

设置数组元素

要设置数组元素，可以使用赋值运算符（=）。例如，以下代码将 myArray 数组中的第一个元素设置为值 10：```vbscript
myArray(0) = 10
```

以下代码将 my2DArray 数组中的第二行第三列的元素设置为值 20：```vbscript
my2DArray(1, 2) = 20
```

数组属性

VBScript 数组具有以下属性：* Length：返回数组中元素的总数。
* Ubound：返回数组中最后一个元素的索引。
* Lbound：返回数组中第一个元素的索引（通常为 0）。

例如，以下代码获取 myArray 数组的长度：```vbscript
len = UBound(myArray)
```

以下代码获取 my2DArray 数组的第一行最后一个元素的索引：```vbscript
lastCol = UBound(my2DArray(0))
```

数组方法

VBScript 数组具有以下方法：* Join：将数组中的元素连接成一个字符串。
* Split：将字符串拆分为数组。
* Sort：对数组中的元素进行排序。

例如，以下代码将 myArray 数组中的元素连接成一个字符串：```vbscript
str = Join(myArray, ", ")
```

以下代码将 "1,2,3,4" 字符串拆分为一个数组：```vbscript
arr = Split("1,2,3,4", ", ")
```

以下代码对 myArray 数组中的元素进行升序排序：```vbscript
Sort myArray
```

数组示例

以下是一些使用 VBScript 数组的示例：* 存储一组数字并计算它们的总和：
```vbscript
' 创建一个数组来存储数字
Dim numbers(4)
' 将数字存储在数组中
numbers(0) = 10
numbers(1) = 20
numbers(2) = 30
numbers(3) = 40
' 计算数字的总和
total = 0
For i = 0 To UBound(numbers)
total = total + numbers(i)
Next
' 打印总和
total
```
* 存储一组名称并按字母顺序显示它们：
```vbscript
' 创建一个数组来存储名称
Dim names(4)
' 将名称存储在数组中
names(0) = "John"
names(1) = "Mary"
names(2) = "Bob"
names(3) = "Alice"
' 对数组进行排序
Sort names
' 显示排序后的名称
For i = 0 To UBound(names)
names(i)
Next
```
* 使用多维数组存储学生信息：
```vbscript
' 创建一个二维数组来存储学生信息
Dim students(2, 2)
' 将学生信息存储在数组中
students(0, 0) = "John"
students(0, 1) = 90
students(1, 0) = "Mary"
students(1, 1) = 80
' 访问学生信息
students(0, 0) & " 的分数是 " & students(0, 1)
```