单项选择题

若有数组Dim a%(10),每个元素的值都通过InputBox输入,则下列语句正确的是()

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