VBA UBound()函数用于获取一个数组的上界(最大索引值)。它的语法如下:

UBound(arrayname, [dimension])

arrayname:要获取上界的数组名称。dimension:可选参数,表示数组的维度。如果未指定,则默认为 1。

UBound()函数返回一个整数值,表示指定维度上的最大索引值。例如,如果数组中有 5 个元素,则上界为 5-1=4。

下面是一个示例:

Dim arr(1 To 5) As IntegerDim maxIndex As IntegermaxIndex = UBound(arr)Debug.Print maxIndex  ' 输出 5

在上面的示例中,UBound(arr) 返回数组 arr 的第一个维度上的最大索引值,即 5。