Question

用VB的循环结构编写数字金字塔

用VB的FOR循环结构编写数字金字塔，用print打印出来。题目：编写程序，打印如下所示的“数字金字塔” 1 121 12321 1234321 123454321 12345654321 1234567654321 12345678765432112345678987654321

Answer 1

Private Sub Command1_Click()

For i = 1 To 9

Print Spc(9 - i);

For j = 1 To i

Print Chr(48 + j);

Next j

For j = i - 1 To 1 Step -1

Print Chr(48 + j);

Next j

Print

Next i

End Sub

Answer 2

dim I as integerdim j as integerdim b as integer for i=1 to 9 '打印空格 for b=i to 9 print space(b) next '打印数字 for j=1 to i print j & "" next for j=i-1 to 1 print j & "" next'换行printnext

Answer 3

引用听不清啊的回答：
Private Sub Command1_Click()
For i = 1 To 9
Print Spc(9 - i);
For j = 1 To i
Print Chr(48 + j);
Next j
For j = i - 1 To 1 Step -1
Print Chr(48 + j);
Next j
Print
Next i
End Sub

我试了一下，不对呀？怎么回事？