21.用循环语句编写打印下列图形的程序.21.\x05用循环语句编写打印下列图形的程序.*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05\x05*\x05*\x05*\x05\x05\x05*\x05\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05**\x05*\x05

21.用循环语句编写打印下列图形的程序.21.\x05用循环语句编写打印下列图形的程序.*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05\x05*\x05*\x05*\x05\x05\x05*\x05\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05**\x05*\x05
21.用循环语句编写打印下列图形的程序.
21.\x05用循环语句编写打印下列图形的程序.
*\x05*\x05*\x05*\x05*\x05*\x05*
\x05*\x05*\x05*\x05*\x05*
\x05\x05*\x05*\x05*
\x05\x05\x05*
\x05\x05*\x05*\x05*
\x05*\x05*\x05*\x05*\x05*
*\x05*\x05*\x05*\x05*\x05*\x05*

21.用循环语句编写打印下列图形的程序.21.\x05用循环语句编写打印下列图形的程序.*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05\x05*\x05*\x05*\x05\x05\x05*\x05\x05*\x05*\x05*\x05*\x05*\x05*\x05*\x05**\x05*\x05
Private Sub Command1_Click()
For i = 7 To -7 Step -2
Print String((7 - Abs(i)) / 2, Chr(9));
For j = 1 To Abs(i)
Print "*"; Chr(9);
Next j
Print
Next i
End Sub