返回一个 Long 类型的值,其中包含 数组 的指定维度的最大可用下标。
语法
UBound ( arrayname [, dimension ] )
UBound 函数语法具有以下参数:
参数 |
说明 |
arrayname |
必需。 数组的名称 变量;遵循标准变量命名约定。 |
维度 |
可选。 变量 (长) 。 指示返回哪个维度的上限的整数。 第一个维度使用 1,对第二个维度使用 2,依此类。 如果省略 维度 ,则假定为 1。 |
备注
UBound 函数与 LBound 函数一起使用,以确定数组的大小。 使用 LBound 函数查找数组维度的下限。
UBound 为具有以下维度的数组返回以下值:
Dim A(1 To 100, 0 To 3, -3 To 4)
声明 |
返回值 |
UBound(A, 1) |
100 |
UBound(A, 2) |
3 |
UBound(A, 3) |
4 |
示例
注意: 下面的示例演示了如何在 Visual Basic for Applications (VBA) 模块中使用此函数。 有关使用 VBA 的详细信息,请在搜索旁边的下拉列表中选择“开发人员参考”,并在搜索框中输入一个或多个术语。
此示例使用 UBound 函数来确定数组的指定维度的最大可用下标。
Dim Upper
' Declare array variables. Dim MyArray(1 To 10, 5 To 15, 10 To 20) Dim AnyArray(10) Upper = UBound(MyArray, 1) ' Returns 10. Upper = UBound(MyArray, 3) ' Returns 20. Upper = UBound(AnyArray) ' Returns 10.