关于请问这段代码如何在文本框中实现?谢谢!
Private Sub Form_Click()
Dim a As Integer
For a = 1 To 8
Print “abc”
Next
End Sub的问题
先要把Text1属性MultiLine设为True
Private Sub Form_Click()
Dim a As Integer
Text1 = “”
Text1.Height = 3000
For a = 1 To 8
Text1 = Text1 & “abc” & vbCrLf
Next
End Sub
