问题 单项选择题

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

单项选择题
单项选择题 A1型题