VB的问题!!简单啊.快来.

来源:百度知道 编辑:UC知道 时间:2024/06/08 20:14:09
Private Sub Command1_Click()
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