A.Static arr1(3) arr1(1)=100 arr1(2)="Hello" arr1(3)=12345 B.Dim arr2()As Integer Dim size As Integer Private Sub Command2_Click() size=Input Box("输入:") ReDimarr2(size) ... End Sub C.Option Base 1 Private Sub Command3_Click() Dim arr3(3)As Integer ... End Sub D.Dim n As Integer Private Sub Command4_Click() Dim arr4(n)As Integer ... End Sub