vb80分的简单题

来源：百度知道 编辑：UC知道 时间：2024/06/14 17:46:25
最后的结果输出
{0,2}{0,4}{0,8}{0,10} {3,2}{3,4}{3,8}{3,10}{6,2}............
有X,Y两个变量
第1次循环完得出来的是x=0 y=2
第2次循环完得出来的是x=0 y=4...........
第5次循环完得出来的是x=3 y=2.........
这么说明白了吗 帮帮我

Private Sub Command1_Click()

Const n = 5 '修改为你需要的n
Dim i%, j%

For i = 0 To n * 3 Step 3
For j = 2 To 10 Step 2
Print "{" & i & "," & j & "}";
Next j
Print
Next i
End Sub

Private Sub Command1_Click()

Const n = 5 '输入你要的n
Dim d%, f%

For d = 0 To n * 3 Step 3
For f = 2 To 10 Step 2
Print "{" & d & "," & f & "}";
Next d
Print
Next f
End Sub

//copyright zhoujiajun88