'是这意思？
Private Sub Form_Activate()
Dim i As Integer
For i = 1 To 8
If i = 1 Then
Print "※"
Else
Print "※" & Space(2 * (i - 2)) & "※"
End If
Next
Print String(i, "※")
End Sub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024