作业帮 > 综合 > 作业

使用循环语句打印出以下这个三角形.(如补充)

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/24 08:20:12
使用循环语句打印出以下这个三角形.(如补充)
0
1 2
2 3 4
3 4 5 6
4 5 6 7 8
5 6 7 8 9 10
6 7 8 9 10 11 12
7 8 9 10 11 12 13 14
8 9 10 11 12 13 14 15 16
9 10 11 12 13 14 15 16 17 18
可以直接写在Form_Paint事件里,也可以写到一个按钮事件里,代码如下:
Private Sub Form_Paint()
Dim i As Integer, j As Integer
Dim tmp As String
For i = 0 To 9
For j = i To 2 * i
tmp = tmp & j & " "
Next
Print tmp
tmp = ""
Next
End Su