VBA数组 常用方法

LBound

返回最小下标。

UBound

返回最大下标。

求数组长度

Len函数不能对数组求长度（呃，有点不科学），可通过LBound与UBound进行计算。

数组长度 = UBound – LBound + 1

IsArray

判断变量是否数组。

示例代码：

Sub array6()
  '数组常用方法
  Dim arr1(3) As Integer
  Debug.Print "LBound:" & LBound(arr1)
  Debug.Print "UBound:" & UBound(arr1)
  Debug.Print "IsArray:" & IsArray(arr1)
  Debug.Print "IsArray:" & IsArray(2023)

End Sub

输出结果：

LBound:0
UBound:3
IsArray:True
IsArray:False