VB6.0
创新互联秉承实现全网价值营销的理念，以专业定制企业官网，网站制作、成都网站制作，成都小程序开发，网页设计制作，手机网站制作，成都全网营销帮助传统企业实现“互联网+”转型升级专业定制企业官网,公司注重人才、技术和管理，汇聚了一批优秀的互联网技术人才,对客户都以感恩的心态奉献自己的专业和所长。
写入：
Open "D:\123.txt" For Output As #1 '打开XXX路径的XXX文件（双引号里表示文件位置和文件名）
Print #1, Text1.Text '写入Text1的Text内容
Close #1 '关闭
读取：
Open "D:\123.txt" For Input As #1 '打开打开XXX路径的XXX文件（双引号里表示文件位置和文件名）
Do While Not EOF(1)
Line Input #1, s
Text1.Text = s
Loop 'Do...Loop表示循环读取文件的内容，并让Text1.Text=内容
Close #1 '关闭
VB.net中读写文件主要使用System.IO命名空间。
① 使用 File.ReadAllText 读取
Dim s As String = System.IO.File.ReadAllText("C:\a.txt")
② 使用 StreamReader 读取，注意编码格式和写入的编码保持一致。
Dim sr As StreamReader = New StreamReader("C:\a.txt", System.Text.Encoding.UTF8)
Dim s As String = sr.ReadToEnd()
sr.Close()
保存文件的步骤为：
关闭流，特别是写入流
关闭并保存文件
示例代码如下：
Imports System.Windows.Forms
Imports System.IO
Imports System.Text
Sub SaveFileDemo()
'打开文件。如果文件不存在则创建新的文件
Dim myFile As New IO.FileStream("d:\data.txt", _
FileMode.OpenOrCreate, _
FileAccess.Write)
'在文件末尾添加一行
Dim tw As New StreamWriter(myFile)
myFile.Seek(0, SeekOrigin.End)
tw.WriteLine("白刃格斗英雄连英模部队方队亮相阅兵")
'关闭流
tw.Close()
'关闭文件并保存文件
myFile.Close()
End Sub
可以用SaveFileDialog1对话框加上对文件数据操作的类来实现，，用richtextbox自己的属性方法也能行！我以前做过一个记事本程序就是那样的！
文件 - 打开项目，打开vbproj或sln
还有一种方法，打开frmMain.vb、frmMain.Desigenr.vb（假定你的计算器主窗体文件为frmMain，用记事本打开），在frmMain.vb中的 Public Class frmMain 这一句下面输入：
#Region "Windows窗体设计器自动生成的代码"
#End Region
然后复制frmMain.Desigenr.vb的文件内容到#Region和#End Region中间，建议另存为，在别的项目中添加这个文件，一样可以编辑窗体
运行后，就可以直接用了，你在当前项目的目录下找到（下面是VS2005，查询数据库程序，是当前项目）
D:\我的文档\Visual Studio 2005\Projects\查询数据库程序\查询数据库程序\bin\Debug\
这个目录下，有个exe应用程序文件，在Windows操作系统中可以直接使用！！
