单选题
设有如下程序: 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)的值。