VB For循环逐个枚举整个数组的值,VB For循环逐个枚举整个数组值,VB 循环逐个枚举整个数组值,VB 循环枚举整个数组值,VB 循环枚举整个数组,VB 枚举整个数组,VB 枚举数组,VB 数组。

VB For循环逐个枚举整个数组的值:

方法一:
Dim I
For Each I In Data                                  '枚举整个数组赋值给I
    Debug.Print I
Next

方法二:
Dim I  As Integer
For I = LBound(Data) To UBound(Data)                '从数组最小下标循环到最大下标(大于(65535-1)/2会溢出)
    MsgBox Data(I)
Next I

Exit For                                            '中途退出循环