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) 3
UBound(A, 3) 4

示例

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

Dim Upper
Dim MyArray(1 To 10, 5 To 15, 10 To 20)    ' Declare array variables.
Dim AnyArray(10)
Upper = UBound(MyArray, 1)    ' Returns 10.
Upper = UBound(MyArray, 3)    ' Returns 20.
Upper = UBound(AnyArray)      ' Returns 10.

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。