杭州交通信息网全彩led显示屏价格:帮忙用VB写一下这个简单程序，说谢了
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/29 16:29:11
打印
1
1 2
1 2 3
……
1 2 3 4 5 6 7 8 9 10
用do while的双循环做一个
用do until的双循环做一个
然后再用do untill and do while 混合的做一个
多谢了
1
1 2
1 2 3
……
1 2 3 4 5 6 7 8 9 10
用do while的双循环做一个
用do until的双循环做一个
然后再用do untill and do while 混合的做一个
多谢了
3个CLICK分别是3个问题
Private Sub Command1_Click()
i = 1
Do While i <> 11
j = 1
x = ""
Do While j <> i + 1
x = x & j & " "
j = j + 1
Loop
Print x
i = i + 1
Loop
End Sub
Private Sub Command2_Click()
i = 1
Do
j = 1
x = ""
Do
x = x & j & " "
j = j + 1
Loop Until j = i + 1
Print x
i = i + 1
Loop Until i = 11
End Sub
Private Sub Command3_Click()
i = 1
Do
j = 1
x = ""
Do While j <> i + 1
x = x & j & " "
j = j + 1
Loop
Print x
i = i + 1
Loop Until i = 11
End Sub