嵌套的那个循环是什么意思啊??自学,没有看懂!求各位大大解释下!!

Private Sub Command1_Click()Dim intranum As Integer, i As Integer, j As Integer, a As IntegerRandomizeFor i = 1 To 100intranum = Int(100 * Rnd) + 1a = 0For j = 1 To 1000a = a + 1Next jText1.Text = CStr(intranum)Text1.RefreshNext iText1.Text = CStr(intranum)End Sub
2026年09月22日 23:21
有2个网友回答
网友(1):

你是看不懂循环嵌套还是怎么的?如果是那你大99乘法表总会背吧
for i = 1 to 9
for j=1 to 9
i乘以j
next j
next i
先i=1, j=1 到9 就有1x1=1;1x2=2;一直到1x9=9 运行完了就到下面
i=2,同样1到9 就有 2x1=2;2x2=4; 一直到 2x9=18;运行完了就到下面
i=3
i=4。。。。。。。。。。。。。。。 一直到i=9 ;j=9

网友(2):

写成这样
For i = 1 To 4'i的初始值为1
'从这句直到next i之间的语句执行4遍,每次i的值增加1
x = 4 '设置x为4
For j = 1 To 3'j的初始值为1
'从这句直到next j之间的语句执行3遍,每次j的值增加1
x = 3'设置x为3
For k = 1 To 2'k的初始值为1
'从这句直到next k之间的语句执行2遍,每次k的值增加1
x = x + 6'设置x为x+6
Next k
Next j
Next i
Print x '输出x

这个例子可以帮助理解for
dim a as long,b as long
for a=1 to 5
for b=0 to 2
msgbox "a="& a &" ; b="& b
next
next

另,next后可以不接后缀,提高效率