Question

电脑VB问题，为了会考希望大神仔细回答

某Visual Basic程序如下：

Private Sub Command1_Click()
Dim a(1 To 10) As Integer
Dim i As Integer
For i = 1 To 10
a(i) = i * i
Next i
List1.AddItem Str(a(i))
End Sub

运行程序，单击命令按钮Command1后弹出如图所示的出错信息提示，“下标越界",此时程序正执行的语句是

（A）For i = 1 To 10

（B）a(i) = i * i

（C）Next i

（D）List1.AddItem Str(a(i))

Answer 1

D 因为退出循环时，循环变量还会再加一次1

追问

Dim a(1 To 10) As Integer 这是什么意思啊
还有下标越界是什么意思

追答

定义一个数组，一共有十个元素a[1],a[2],...,a[10]
下表越界，就是访问了未定义的元素，比如访问a[11]就是越界的

Answer 2

图在哪里？

你的循环出错了
Dim a(1 To 10) As Integer
这是表明a是一个10个的数组，你循环之后,i=11了
a(11) 是不存在的，所以出下标越界。你把for循环改到9就可以了。

追问

For i = 1 To 10的话，最后出来的i=11吗

追答

是的啊，你可以跟踪一下这个变量。