下列程序的运行结果为()。　　Dim a(-1 To 6)　　For i=LBound(a，1)To UBound(a，1)　　　　a(i) = i　　Next i　　Print a (LBound(a，1))；a(UBound(a，1))
A． 0 0
B． -5 0
C． -1 6
D． 0 6