下列程序的运行结果为()。　　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．选择查询
B．删除查询
C．更新查询
D．追加查询