关于For语句的一个问题

来源:百度知道 编辑:UC知道 时间:2024/05/31 11:37:29
有这样一个程序:
Private Sub Command1_Click()
a=0
For i=1 To 2
For j=1 to 4
if j Mod 2<>0 Then
a=a+1
End If
a=a+1
Next j
next i
?a
End Sub
两个循环变量,看不懂是怎么回事,哪位大侠给解答一下啊!
不好意思,有一点不明白:这个程序中,是先完成j循环,再i循环吗?j=1,3循环成立,也就是说循环两次吗?
最后,nexti 要循环两次,为什么是之前的a值,乘以二呢,应遵循那个循环体?

Private Sub Command1_Click()
a=0
For i=1 To 2 'i值1-2,循环
For j=1 to 4 'j值1-4,循环
if j Mod 2<>0 Then 'j/2取余不等于0时条件成立,当j=1,3时成立
a=a+1 'a=a+1+1=0+1+1=2 'i一次循环的值
End If
a=a+1 '因为j要循环4次,所以a=a+1+1+1+1=2+4=6
Next j
next i '因为i要循环2次,所以a=6*2=12
?a
End Sub

结果为12

单击按钮后触发事件
a初值为0
循环:
For i=1 To 2 '第一层循环i取1—2的整数
For j=1 to 4 ’第二层循环j取1—4的整数
if j Mod 2<>0 Then '如果j/2的余数不等于0
a=a+1 'a=a+1
End If ’结束判断
a=a+1 'a=a+1
Next j
next i
?a '在窗体上打印a
a的值应该为(1—4的整数中的奇数+所有数)*2