Dim a(2 to 4,3)

Question

Dim  a(2 to 4,3)as  single 什么意思

Answer 1

定义了一个Single数据类型的二维数组，大小为3*4，其元素总数为12

Answer 2

二维数组，第一维2-4，第二维0-3Private Sub Command1_Click()
    Dim a(2 To 4, 3) As Single
    Dim i As Integer
    Dim j As Integer
    
    For i = LBound(a, 1) To UBound(a, 1)
        For j = LBound(a, 2) To UBound(a, 2)
            a(i, j) = i + j / 10
            Debug.Print a(i, j)
        Next j
    Next i
    
End Sub结果
 2 
 2.1 
 2.2 
 2.3 
 3 
 3.1 
 3.2 
 3.3 
 4 
 4.1 
 4.2 
 4.3