vb程序改错问题

来源：百度知道 编辑：UC知道 时间：2024/06/27 05:50:12
'下面的程序段用于打印出以下图形
'
' *
' ***
' *****
' *******
' *****
' ***
' *
'
'请在【】处填入正确的内容?

Private Sub Form_Click()
Dim i%, j%, k%
For i = 0 To 3
For j = 0 To 2 - i
Print " ";
Next j
'**********SPACE**********
For k = 0 To 【?】
Print "*";
Next k
Print
Next i
For i = 0 To 2
For j = 0 To i
'**********SPACE**********
【?】
Next j
For k = 0 To 4 - 2 * i
Print "*";
Next k
'**********SPACE**********
【?】
Next i
End Sub
图形是这个！！！！！！

Private Sub Form_Click()
Dim i%, j%, k%
For i = 0 To 3
For j = 0 To 2 - i
Print " ";'两个空格或全角空格
Next j
'**********SPACE**********
For k = 0 To 2 * i
Print "*";
Next k
Print
Next i
For i = 0 To 2
For j = 0 To i
'**********SPACE**********
Print " ";'两个空格或全角空格
Next j
For k = 0 To 4 - 2 * i
Print "*";
Next k
'**********SPACE**********
Print ""'没有空格,打印空
Next i
End Sub