语句Dim arr（-3 To 5，2 To 6）As Integer定义的数组元素有（）个。
第1题：
阅读程序：
Option Base 1
Dim arr（） As Integer
Private Sub Form_Click（）
Dim i As Integer, j As Integer
ReDim arr（3, 2）
For i = 1 To 3
For j = 1 To 2
arr（i, j） = i * 2 + j
Next j
Next i
ReDim Preserve arr（3, 4）
For j = 3 To 4
arr（3, j） = j + 9
Next j
Print arr（3, 2） + arr（3, 4）
End Sub
程序运行后，单击窗体，输入结果为（ ）。
A．21
B．13
C．8
D．25
第2题：
（21）语句Dim Arr(-3 To 5)As Integer定义的数组的元素个数是 A.6 B.7 C.8 D.9
第3题：
在窗体上画一个命令按钮Command1，然后编写如下程序：
Private Sub Command1_Cliek()
Dim arr()As Integer
Re Dim arr(3)
For i=0 To 3
arr(i)=i
Next i
x=InputBox("请输入一个数字：")
IfVal(x)＞4 Then
Rc Dim arr(4)
arr(4)=x
End If
Me.Print(arr(4)-arr(3))
End Sub
程序运行后，单击命令按钮，在输入对话框中输入12，输出结果为【 】。
第4题：
用下面的语句定义数组元素的个数为 ______。 Option Base 1 Dim Arr6(-2 to 6， -1 to 5)As Integer
A．30
B．48
C．63
D．72
第5题：
阅读程序： Private Sub Command1_Click（ ） Dim arr Dim i As Integer arr=Array(0，1，2，3，4，5，6，7，8，9，10) For i=0 To 2 Print arr(7-i)； Next End Sub 程序运行后，窗体上显示的是（ ）。
A.8 7 6
B.7 6 5
C.6 5 4
D.5 4 3
第6题：
（ 21 ）下面正确使用动态数组的是
A ）
Dim arr () As Integer
…
ReDim arr ( 3 , 5 )
B ）
Dim arr () As Integer
…
ReDim arr ( 50 ) As String
C ）
Dim arr ()
…
ReDim arr ( 50 ) As Integer
D ）
Dim arr ( 50 ) As Integer
…
ReDim arr ( 20 )
第7题：
（23）语句Dim Arr(3 To 5,-2 To 2)定义的数组的元素个数是 A.20 B.12 C.15 D.24
第8题：
下列数组定义语句错误的是（ ）。
A．k%=10
Dim Arr（k）
B．Const k%=10
Dim Arr（k）
C．Dim Arr1（10） As Integer
Dim Arr2 （10）
D．Dim Arr1（1 To 10）
Dim Arr2（1 To 10, 2 To 11）
第9题：
下面正确使用动态数组的是（ ）。
A.Dim arr（ ）As Integer … ReDim arr(3，5)
B.Dim arr（ ）As Integer … ReDim arr(50)As String
C.Dim arr（ ） … RcDim arr(50)As Integer
D.Dim arr(50)AS Integer … ReDim arr(20)
第10题：
语句Dim Arr(-3 To 5)As Integer定义的数组的元素个数是( )。
A．6
B．7
C．8
D．9