教我编一个VB程序

来源：百度知道 编辑：UC知道 时间：2024/05/17 01:00:56
用两个For语句和一个Print语句编一个VB程序，使电脑显示如下图形：
1
12
123
1234
12345
123456
1234567
12345678
123456789
我是一个刚学编程的小伙，不要说得太难懂了呦

如果只用1个PRINT就麻烦点，代码如下：
Dim i As Integer, j As Integer, a As String
Private Sub Form_Click()
For i = 1 To 9
a = ""
For j = 1 To i
a = a & j
Next j
Print a
Next i
End Sub
其实用2个PRINT就简单了，不用这么麻烦，代码如下：
Dim i As Integer, j As Integer
Private Sub Form_Click()
For i = 1 To 9
For j = 1 To i
print j;
Next j
print
Next i
End Sub
代码都测试过绝对可用

for i=1 to 10
for j=1 to i
print(j)
next j
next i

for i=1 to 10 '最外城循环 一共输出9行
for k=1 to i ‘里层循环。最多9列。
print(j) ’输出
next k
next i
用两个循环就行拉。