程序代码: |
For i = 0 To 10
Dim A As Integer
Dim B As Integer
B = 0
'MsgBox("A=" & A & " B=" & B)
Debug.Print("A=" & A & " B=" & B)
For j = 0 To 10
a += 1
B += 1
Next
Next
A=0 B=0
A=11 B=0
A=22 B=0
A=33 B=0
A=44 B=0
A=55 B=0
A=66 B=0
A=77 B=0
A=88 B=0
A=99 B=0
A=110 B=0
A=11 B=0
A=22 B=0
A=33 B=0
A=44 B=0
A=55 B=0
A=66 B=0
A=77 B=0
A=88 B=0
A=99 B=0
A=110 B=0
|
暂时没有评论
发表评论 - 不要忘了输入验证码哦! |