单项选择题

A.a(10)=Val(InputBox("请输入数据"))
B.Dim i%a(i)=Val(InputBox("请输入数据"))
C.Dim i%For i =1To 10a(i)=Val(InputBox("请输入数据"))Next
D.Dim i%For i =0To 10a(i)=Val(InputBox("请输入数据"))Next