Private Sub Command1_Click()
Dim i As Integer
Dim s As String
For i = 1 To 9
If i < 3 Then
s = String(i, "※")
ElseIf i < 9 Then
s = "※" & String(i - 2, " ") & "※"
Else
s = String(i, "※")
End If
Print s
Next i
End Sub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024