程序代码: |
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
|
暂时没有评论
发表评论 - 不要忘了输入验证码哦! | |||
作者: | 用户:
密码: 注册? 验证: |
||
评论:
禁止表情 禁止UBB 禁止图片 识别链接 识别关键字 ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() |
|||