Question

VB 打印数字金字塔

1
1 2 1
1 2 3 2 1
1 2 3 4 3 2 1
…
1 2 3 4 5 6 7 8 9 8 7 6 5 4 3 2 1
Private Sub Form_Click()
Dim i As Integer, j As Integer
Print Space(27); 1
For i = 2 To 9
Print Space(30 - 3 * i);
For j = 1 To i
Print j;
Next j
For j = i - 1 To 1 Step -1
Print j;
Next j
Print
Next i
End Sub

Print Space(27); 1 这里为什么要空27个空
Print Space(30 - 3 * i); 这里为什么是30-3*i
一个数字占了3个字符的位置吗

Answer 1

print 打印数值型变量、日期型变量时。
后面是分号 “;”的，自动空两个空格。所以相当于一个数字占了3个字符的位置。
打印逻辑型变量，会空一个空格；打印字符型变量时是紧凑打印的。如果你上面在打印时用cstr(j)，然后把空格调整一下，就是紧凑的塔。

变量后面是逗号 “,”的，自动以14个字符为一个区域进行显示。