Question

有如下的事件过程： Private Sub Command1_Click() Dim a(4) As Integer , b(4) As Integ

Private Sub Command1_Click()
Dim a(4) As Integer , b(4) As Integer
For k=0 To 2
a(k+1)=Val(InputBox("请输入数据："))
b(3-k)=a(k+1)
Next k Print b(k) End Sub运行程序后，依次输入1，3，5，则执行的结果?为什么，谢谢

Answer 1

结果为 1
k=0时输入1，b(3)=a(1)=1
然后是k=1，k=2，
然后k=3大于2，循环结束，输出b(k)即b(3)=1

Answer 2

你确定Print b(k)在Next k的后面？ ？

追问

Private Sub Command1_Click()
Dim a(4) As Integer , b(4) As Integer
For k=0 To 2
a(k+1)=Val(InputBox("请输入数据："))
b(3-k)=a(k+1)
Next k
Print b(k)
End Sub
运行程序后，依次输入1，3，5，则执行的结果为

追答

如果你去慢慢算的话就中计了！！！你先看我写的这篇文章，再接着往下看http://bbs.tryz.net/viewthread.php?tid=10613&extra=page%3D1
当第3次循环也就是k=2经过Next k之后k=3，此时跳出循环，也就是print b(3)，第一次循环k=0，那么b(3)=a(1)=1，所以结果为1