VB的问题!!简单啊.快来.
来源:百度知道 编辑:UC知道 时间:2024/06/08 20:14:09
Private Sub Command1_Click()
Texi1.Texi = "15616161561561561161615616156188888888888888"
End Sub
比如我想在TEXI1文本框输入很多文字.可是我设置的文本框不能够一行把他打出来怎么办,运行时只能购用鼠标左键拖动才能看完.我想知道怎样才能才能把不能打完的文字在后面一行里打出来??
Texi1.Texi = "15616161561561561161615616156188888888888888"
End Sub
比如我想在TEXI1文本框输入很多文字.可是我设置的文本框不能够一行把他打出来怎么办,运行时只能购用鼠标左键拖动才能看完.我想知道怎样才能才能把不能打完的文字在后面一行里打出来??
置文本框
multiline 属性为true
scrollbars 属性为2-vertical 或是3both即可实现
用"空格_"来连接,要把字符串分开成两段,并在前面用+(&)来连接.如
Texi1.Texi= "15616161561561561161615" _
&"616156188888888888888"
可以将文本框的MultiLine属性设为True
也可用代码实现:
Private Sub Form_Load()
Text1.MultiLine = True
End Sub