[单项选择题] 设有如下程序： Dim a()As Integer Private Sub Command1_Click() n=-5:m=6 ReDim

[单项选择题] 设有如下程序：

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)的值。