Question

VB中如何得到动态数组的长度

Answer 1

可以用UBound 函数来得到动态数组的长度。

UBound 函数

返回一个 Long 型数据，其值为指定的数组维可用的最大下标。

Private Sub Command1_Click()
    Dim sj() As Long
    ReDim sj(100)
    Debug.Print UBound(sj) + 1
End Sub

Answer 2

你好，vb技术乐园帮你解决问题：比如说动态数组为a()；则数组a的长度为Ubound(a)+1，这里数组a的下标从0开始

Answer 3

确切的说应该用UBound(a) - LBound(a) + 1也就是：终止下标-起始下标+1

Answer 4

楼上正解，，终止下标-起始下标+1，，UBound(a) - LBound(a) + 1