如何用代码获取TXT信息及TXT里面的文本

来源：百度知道 编辑：UC知道 时间：2024/05/16 12:00:41
我以前是学会计的，但是接触VB后发现它的奇妙之处
现在我遇到一些困难，请达人帮忙
类似于DOC和EXCEL这些改如何获取里面的信息？
如何用FILE控件和其他控件来打开这些文档进行编辑和另外存？（还有就是如何显示某个盘里面的文件）
请勿回答网址 谢谢！！！

1.显示某个盘里面的文件，用Dir1、Drive1、File1等控件
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
2.打开、编辑txt文件
Private Sub Command1_Click()
RichTextBox1.Text = ""
RichTextBox1.LoadFile File1.Path & "\" & File1.FileName, rtfText
End Sub
3.保存
Private Sub Command2_Click()
RichTextBox1.SaveFile File1.Path & "\" & File1.FileName, rtfText
End Sub