text控件有很多属性,其中有一个multiline属性,将其设置为true就可以多行显示文本,还有一个scrollbar属性,有四个选择支,分别为无滚动条(0),竖直滚动条
水平滚动条,竖直与水平滚动条。
理论上用text控件可以做成记事本,作为初学者的练习的确可以尝试一下,但是如果要做一个使用的程序,用api还是一个好的选择。再加上word的功能远好于记事本,而word又有vb编辑器,所以……你自己选吧
RichTextBox的大部分功能textbox都能实现,只是比较麻烦点而已。
打开和写入文件用open语句[open "xx.txt" for input as #1]
读取和写入用Line Input和Print。
例:
Private Sub Command1_Click() '读取文件
Open "xx.txt" For Input As #1
Do Until EOF(1)
Line Input #1, a
Text1.Text=Text1.Text & vbcrlf & a
Loop
Close #1
End Sub
Private Sub Command2_Click() '写入文件
Open "xx.txt" For Output As #1
Print #1,Text1.Text '读取文件
Close #1
End Sub
Text1的属性中
multiline(多行显示)改为 true
scrollbars(是否有滚动条)改为 3-XXX
http://zhidao.baidu.com/question/29521768.html
RichTextBox也有滚动条,可以设置的,你再看看
好像TEXT只能接受16kb(32kb??)字符串
我做的记事本吃亏了……
Text复制大的文件溢出,推荐RichTextBox