在VBS（Visual Basic Scripting Edition）脚本中，数组是一个非常实用的数据结构，用于存储和操作一系列的值。然而，当你需要知道数组中有多少个元素时，即数组的长度，VBS提供了一个简单的方法来实现这一点。
数组概述
在VBS中，数组声明如下：
Dim myArray()
这意味着myArray是一个空数组。要初始化并填充数组，你可以使用以下方式：
myArray = Array("苹果", "香蕉", "橙子")
或者，你可以逐个添加元素：
ReDim myArray(1)
myArray(0) = "苹果"
myArray(1) = "香蕉"
myArray(2) = "橙子"
计算数组长度
在VBS中，数组的长度可以通过Length属性来获取。这个属性返回数组中元素的个数。
以下是一个示例，展示了如何获取数组的长度：
Dim myArray()
Dim arrayLength
' 初始化并填充数组
myArray = Array("苹果", "香蕉", "橙子")
' 获取数组长度
arrayLength = UBound(myArray) + 1
' 输出数组长度
WScript.Echo "数组的长度是: " & arrayLength
在这个例子中，UBound函数返回数组的最大索引（从0开始），然后我们通过在结果上加1来得到数组的长度，因为数组索引是从0开始的。
使用For Each循环遍历数组
当你需要遍历数组中的每个元素时，可以使用For Each循环，如下所示：
' 初始化并填充数组
myArray = Array("苹果", "香蕉", "橙子")
' 遍历数组
For Each item In myArray
WScript.Echo "当前元素: " & item
Next
这个循环会依次输出数组中的每个元素。
总结
计算VBS脚本中数组的长度非常简单，只需要使用Length属性或UBound函数。了解如何操作数组是编写高效VBS脚本的关键部分。希望这个指南能帮助你更好地理解和使用数组在VBS脚本中的应用。