VBScript UBound 函数

UBound 函数返回指定数组的最大下标。因此，此值对应于数组的大小。

语法

UBound(ArrayName[,dimension])

ArrayName，必需参数。此参数对应于数组的名称。
dimension，可选参数。此参数获取一个整数值，该值对应于数组的维度。如果为“1”，则它返回第一个维度的下界；如果为“2”，则它返回第二个维度的下界，依此类推。

示例

<!DOCTYPE html>
<html>
   <body>
      <script language = "vbscript" type = "text/vbscript">
         Dim arr(5)
         arr(0) = "1"            'Number as String
         arr(1) = "VBScript"     'String
         arr(2) = 100            'Number
         arr(3) = 2.45           'Decimal Number
         arr(4) = #10/07/2013#   'Date
         arr(5) = #12.45 PM#     'Time

         document.write("The Largest Subscript value of  the given array is : " & UBound(arr))

         ' For MultiDimension Arrays :
         Dim arr2(3,2)
         document.write(
            "The Largest Subscript of the first dimension of arr2 is : " & UBound(arr2,1) & "<br />")
         document.write(
            "The Largest Subscript of the Second dimension of arr2 is : " & UBound(arr2,2) & "<br />")

      </script>
   </body>
</html>

当上述代码另存为 .HTML 格式，并在 Internet Explorer 中执行后，它将产生以下结果 -

The Largest Subscript value of the given array is : 5
The Largest Subscript of the first dimension of arr2 is : 3
The Largest Subscript of the Second dimension of arr2 is : 2

vbscript_arrays.htm

打印页面