VB的多重循环

来源:百度知道 编辑:UC知道 时间:2024/05/16 17:51:56
最近遇到了多重循环但总有点绕不过来.
比如: for i = 1 to 3
for j = 1 to i
for k = j to 3
a= a+1
next k
next j
next i

_______________________________________________________________
for i = 1 to 4
x= 4
for j = 1 to 3
x=3
for k= 1 to 2
x=x+6
next k
next j
next i
大家详细的说下这两个程序段的过程! 教教小弟弟

程序是由内向外执行循环的,你可以把循环一层一层拨开测试,然后再一层一层加入,你就会发现程序的执行步骤。

或者在每个for语句加一个断点,观察执行过程!

多运行几次下面的两段代码,希望对你有所帮助

Private Sub Form_Load()
For i = 1 To 4
For j = 1 To i
For k = j To 6
a = a + 1
MsgBox ( _
"i=1 to 4" & vbCrLf & _
"j=1 to " & i & "(i)" & vbCrLf & _
"k=" & j & "(j) to 6" & vbCrLf & _
"Now:i=" & i & " j=" & j & " k=" & k & " a=" & a)
Next k
Next j
Next i
End
End Sub

--------------------------

Private Sub Form_Load()
For i = 1 To 4
x = 4
For j = 1 To 3
x = 3
For k = 1 To 2
x = x + 6
MsgBox ( _
"i=1 to 4" & vbCrLf & _
"j=1 to 3" & vbCrLf & _
"k=1 to 2" & vbCrLf & _
"Now:i=" & i & " j=" & j & " k=" & k & " x=" & x)
Next k
Next j
Next i