使用富文框就行了,打开100K 文本文件决对没问题。要在窗体中添加RTF框,在部件中加入Microsoft Rich Texbox Control 框。 '打开文件 Private Sub Command1_Click() RichTextBox1.Loadfile "C:\data.txt",1 End Sub '保存文件 Private Sub Command2_Click() RichTextBox1.Savefile "C:\data.txt",1 End Sub 你可以先在富文本框中写上100k以上的文件保存后,在打开看看是不是恨快。 要给分呀!!!
'打开文件
Private Sub Command1_Click()
RichTextBox1.Loadfile "C:\data.txt",1
End Sub
'保存文件
Private Sub Command2_Click()
RichTextBox1.Savefile "C:\data.txt",1
End Sub
你可以先在富文本框中写上100k以上的文件保存后,在打开看看是不是恨快。
要给分呀!!!