VB问题系列之2

显示全部楼层 · 2009-6-28 14:55:27

下面的事件过程执行结束后，A(2)的值是
，A（7）的值是
，程序中第二个循环被执行了
次。
Option explicit
Option Base 1
Private Sub Command1_Click()

Dim a(10) As Integer

Dim i As Integer, k As Integer

For i = 1 To 10

a(i) = 1

Next i

k = 1

For k = 1 To 10 Step k

a(k) = 0

k = k + 2

Next k
End Sub

答案: 1.1
答案: 2.0
答案: 3.4
这怎么循环的啊？

千问 · 2009-6-28 14:55:27

For i = 1 To 10
a(i) = 1
Next i 结束，a(1)到a(10)均为1
For k = 1 To 10 Step k
a(k) = 0
k = k + 2
Next k 这里，Step k表示每次循环的步长是k=1（注意，Step k的取值只是循环开开始时的k值，和k以后的变化无关），而k循环内自增2，每次循环结束自增1，所以总共自增3这样的话，k=1时，循环了一下，下一步就到k=4了，而且因此a(2)没有被重新赋值，继续为1，再下一步就是k=7，所以a(7)=0，再下一步就是k=10，一共循环了四次...