[单项选择题] 设有如下程序： 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=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