vb6.0 关于保存和打开的代码 有谁知道？

来源：百度知道 编辑：UC知道 时间：2024/09/23 09:55:46
我想用VB6.0做一个记事本 但是不知道保存和打开的代码怎么写！
有谁知道的给个 谢谢！

Private Sub dakai_Click()

    CommonDialog1.Filter = "AllFiles|*.*|文本文件|*.txt"

    CommonDialog1.ShowOpen

    Text1.Text = CommonDialog1.FileName

End Sub

'保存的路径在text1中显示

Private Sub save_Click()

    CommonDialog1.Filter = "AllFiles|*.*|文本文件|*.txt"

    CommonDialog1.ShowSave

    Texttext = CommonDialog1.FileName

End Sub

'保存的东西在RichTextBox1中显示

Private Sub baocun_Click()

CommonDialog1.Filter = "AllFiles|*.*|文本文件|*.txt"

CommonDialog1.ShowSave

RichTextBox1.SaveFile (CommonDialog1.FileName)

End Sub

关于VB6.0的问题 关于ACCESS2000和VB6.0的连接问题 VB6.0打开文件的相关问题 VB6.0 打开文件的问题 vb6.0编辑的聊天软件最后保存后生成 vb6.0编写的程序如何保存修改设置？？ VB的编程问题 关于文件的保存和打开 用VB6.0,要按下按纽后，打开网站、自动输入已知的用户名和密码 关于VB6.0算法的问题 关于VB6.0 Sendkeys语句的使用