Private Sub C1_Click()
Dim n as integer, i as integer Dim s as string
n =
s = ""
For i = 1 To n
If i <= n \ 2 + 1 Then
Else
s = s + End If
Next i Text2.Text = s End Sub
微信扫码预览、分享更方便