把字符串保存到.txt文本文件。
读取文本文件（或读取某一行）参考这篇
1、代码
'-----------------------'把文本输出到文本文件'-----------------------Function WriteTxt(FilePath As String, str As String)Open FilePath For Append As #1Print #1, strClose #1 'End Function
2、测试代码
Dim data_str As Stringdata_str="我是测试字符串" & vbCrLfnoth = WriteTxt("test.txt", data_str) '把data_str字符串输出到test.txt文本文件
写操作语句:
Print语句和Write语句: 格式:Print #文件号，[表达式表]，Write #文件号，[表达式表] 两者差别：
※Write语句通常用紧凑格式输出，即各数据项之间用逗号分割，在写入文件时，数据项之间会自动用逗号作为分界符分割开。而Print语句中的表达式之间因所用分隔符逗号或分号的不同，其数据项间的位置不同，且不会自动加入定界符。
※Write语句通常与Input#读语句配合使用，Print语句常与Line Input读语句配合使用。
※Write语句通常用于数据写入文件后还要用VB程序读出时；而Print语句通常用于写入文件的数据以后要被显示或打印出来时，作为格式输出语句。
