某VB程序在调试中弹出如图所示的错误窗口,此时程序正执行的语句是()

Private Sub Command1_Click ()
Dim a (1 To 5) As Integer
Dim i As Integer
For i =" 1" To 5
a(i) =" i" * i
Next i
List1.AddItem Str (a (i))
End Sub
A.For i =" 1" To 5 | B.a (i) =" i" * i |
C.Next I | D.List1.AddItem Str (a (i)) |