Private Sub Form_Click()
Print: Print: Print
For i = 1 To 9
   For j = 1 To 30 - 3 * i
     Print "";
   Next j
   For k = 1 To i
     Print k;
   Next k
   For k = i - 1 To 1 Step -1
     Print k;
   Next k
     Print
Next i
End Sub
谁能告诉我错哪里了啊？

Private Sub Form_Click()
 Print: Print: Print
 For i = 1 To 9
    For j = 1 To 30 - 3 * i
      Print " ";
    Next j
    For k = 1 To i
      Print k;
    Next k
    For k = i - 1 To 1 Step -1
      Print k;
    Next k
      Print
 Next i
 End Sub

再问一下把""改成space(30-3*i)为什么不可以呢？
Private Sub Form_Click()
Print: Print: Print
For i = 1 To 9
   For j = 1 To 30 - 3 * i
     print space (30-3*i);
   Next j
   For k = 1 To i
     Print k;
   Next k
   For k = i - 1 To 1 Step -1
     Print k;
   Next k
     Print
Next i
End Sub
还有再问一下""是空字符串，它不是刚好为一个空格码？干嘛还要把""改写成" "呢？求解！谢谢啊！

为什么改成space(30-3*i)

因为print space(30-3*i)是输出了30-3*i个空格！但我那样输出就是错的！能不 能帮我解释解释！

你应该知道你要什么!
for输出了30-3*i个空格!

因为数字金字塔没个数字前面都要有空格，而且他们的空格数是随着行数增加，空格就会减少！