数组函数UBound 函数/LBound 函数

cslgwy 2019-11-12

展开全文

UBound 函数

返回包含指定的数组维度的最大可用下标的Long数据类型。

语法

UBound(arrayname, [ dimension ])

UBound函数的语法包含这些部分。

Part	说明
arrayname	必需。数组变量的名称；遵循标准变量命名约定。
维度	可选；Variant (Long)。指示返回哪一个维度的上限的整数。对第一个维度使用 1，对第二个维度使用 2，依此类推。如果省略 dimension，则假定为 1。

备注

将UBound函数与**LBound** 函数结合使用, 以确定数组的大小。使用 LBound 函数可查明数组维度的下限。

UBound 为具有这些维度的数组返回以下值：

语句	返回值
`UBound(A, 1)`	100
`UBound(A, 2)`	第三章
`UBound(A, 3)`	4

示例

此示例使用 UBound 函数确定数组的指定维度的最大可用下标。

Dim Lower Dim MyArray(1 To 10, 5 To 15, 10 To 20) ' Declare array variables. Dim AnyArray(10) Lower = Lbound(MyArray, 1) ' Returns 1. Lower = Lbound(MyArray, 3) ' Returns 10. Lower = Lbound(AnyArray) ' Returns 0 or 1, depending on ' setting of Option Base.