VB编写程序,在窗体上输出如图所示的图形

每个* 之间貌似还有个小空格
2025年05月05日 16:04
有1个网友回答
网友(1):

Private Sub Command1_Click()
Dim i, j As Integer
For i = 1 To 9 Step 2
Print Spc(3 + i);
For j = 10 - i To 1 Step -1
Print "* ";
Next
Print "  ";
For j = 1 To i
Print "* ";
Next
Print
Next
End Sub