' 功能:下面的程序段用于打印出以下图形 ' ' * ' *** ' ***** ' ******* ' ***** ' *** ' * '------------------------------------------------------- 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 = 1 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