[单项选择题] 设有如下程序:
Dim a()As Integer
Private Sub Command1_Click()
n=-5:m=6
ReDim a(n To m)
For i=LBound(a,1)To UBound(a,1)
a(i)=i
Next i
Print a(LBound(a,1));a(UBound(a,1))
End Sub
程序运行后,单击命令按钮,则输出结果是 ______。
A.0 0
B.-5 0
C.-5 6
D.0 6
参考答案:
C问题解析:
[评析] ReDim a(n To m)指明动态数组9的下标和上标为-5和6;则LBound(a,1)=-5、UBound(a,1)=6。故Print a(LBound(a,1));a(UBound(a,1))输出a(-5)、a(6)的值。

![[单项选择题] 设有如下程序: Dim a()As Integer Private Sub Command1_Click() n=-5:m=6 ReDim a(n To m) For i=LBou [单项选择题] 设有如下程序: Dim a()As Integer Private Sub Command1_Click() n=-5:m=6 ReDim a(n To m) For i=LBou](http://www.mshxw.com/aiimages/31/255127.png)
