请问这段代码如何在文本框中实现?
请问这段代码如何在文本框中实现?谢谢!Private Sub Form_Click()Dim a As Integer For a = 1 To 8 Print "abc"NextEnd Sub
其他答案
先要把Text1属性MultiLine设为TruePrivate Sub Form_Click()Dim a As IntegerText1 = ""Text1.Height = 3000For a = 1 To 8Text1 = Text1 & "abc"& vbCrLfNextEnd Sub
2010-12-07 05:15
来自北京市
赞(0)点赞赞(0)举报
免责声明:问答内容均来源于互联网用户,房天下对其内容不负责任,如有版权或其他问题可以联系房天下进行删除。




