使用tab和spc函数可以使用户得到整齐的输出格式。1、Tab函数tab函数使用语法： Tab(column)其中column为数值表达式。Tab函数使currentx的值增加到column参数所定义的列位置，即输出定位到第column列的位置。使用tab函数可以在指定的位置上显示出排列整齐的输出。例：在第1列输出“姓名”，在第10列输出“性别”，在第20列输出“地址”。 Private Sub Form_Paint() Print "123456789012345678901234567890"
Print Tab(1);"姓名"; Tab(10); "性别"; Tab(20); "地址" '注意用分号隔开 End Sub2、Spc函数spc函数用于显示指定数量的空格。它的语法如下： Spc(numspaces)其中numspaces为0-32767之间的整数。例1：在第一个字符串“姓名”后插入6个空格，在第二个字符串“性别”后插入6个空格并写上“地址”。 Private Sub Form_Paint() Print "123456789012345678901234567890"
Print "姓名"; Spc(6); "性别"; Spc(6); "地址" End Sub例2：打印“数字金字塔”（作业1-11）。Private Sub Form_Click() Dim i, j, k As Integer
For i = 1 To 9
Print Spc(10)
Print Spc(27 - 3 * i);
For j = 1 To i
Print j;
Next
For j = 1 To i - 1
Print i - j;
Next
NextEnd Sub本题代码也可以为：Private Sub Form_Click()
Dim i, j As Integer
For i = 1 To 9
For j = 1 To 2 * i - 1
If j <= i Then
Print Tab(30 - 3 * (i - j)); j;
Else
Print 2 * i - j;
End If
Next j
Print ;
Next i
End Sub
