vb6 中的数组有没有length属性

'楼上也不完全正确，请看下面的
'添加窗体Form1,按钮Command1,然后添加如下代码:
Private Sub Command1_Click()
    Dim intArr(3), i As Integer
    intArr(0) = 23
    intArr(1) = 1
    intArr(2) = 332
    intArr(3) = 7
    Call sortArr(intArr) '从大倒小排序
    Print "排序后："
    For i = 0 To 3
        Print intArr(i)
    Next
    Print "长度：" & UBound(intArr) - LBound(intArr) + 1
End Sub

Private Sub sortArr(a) '对数组a从大倒小排序
    Dim i, j, temp As Integer
&n