我的代码：



Private Sub Form_Click()
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

怎么改成图中的要求啊

End Sub

[此贴子已经被作者于2007-6-2 21:13:59编辑过]

原来是这样啊，我弄半天。。。。。谢谢了