Question

vb中怎样把数据存到文件里

上面没说清楚，我的意思是如何把窗体里控件中（如：LABEL控件的caption属性，TEXT控件里的text属性）的内容存成一个文件，这个文件必须是这样的：当我打开这个文件的时候，以前存的内容要能显示到相关的控件上，而且要能同时打开多个文件，而不至于相互干扰。象EXCEL一样，存成文件后，你可以打开这个文件，还可以打开别的文件。那位高手指点指点，我刚上道的！谢谢！

Answer 1

Open 文件绝对路径 For Input/Output/Append/Binary/Random As #文件号
Input:读入文件,文件不存在发生错误
Output:输出到文件,文件不存在则创建文件
这两个是比较常用的
Write #文件号,变量(写内容到打开的文件)
Put #文件号,文件大小,变量(写内容到打开的文件,可指定大小)
Print #文件号,变量(写内容到打开的文件)
Input #文件号,变量(从打开的文件读入内容)
Line Input #文件号,变量(从打开的文件读入一行内容(遇到回车符为一行))
Close #文件号(关闭打开的文件)
Open 语句示例
本示例示范 Open 语句的不同用法来做到文件的输出与输入。

下列代码以顺序输入模式打开 TESTFILE 文件。

Open "TESTFILE" For Input As #1
' 若要以其他方式打开文件，必需先关闭此文件。
Close #1

下列代码以只允许写操作的二进制方式打开文件。

Open "TESTFILE" For Binary Access Write As #1
' 若要以其他方式打开文件，必需先关闭此文件。
Close #1

下列代码以随机方式打开文件，文件中含有用户自定义数据类型 Record 的记录。

Type Record ' 定义用户自定义数据类型。
ID As Integer
Name As String * 20
End Type

Dim MyRecord As Record ' 声明变量。
Open "TESTFILE" For Random As #1 Len = Len(MyRecord)
' 若要以其他方式打开文件，必需先关闭此文件。
Close #1

下列代码以顺序输出方式打开文件；任何过程都可以读写该文件。

Open "TESTFILE" For Output Shared As #1
' 若要以其他方式打开文件，必需先关闭此文件。
Close #1

下列代码以只允许读的二进制方式打开文件；其他过程不可以读该文件。

Open "TESTFILE" For Binary Access Read Lock Read As #1

例如:

Open App.Path + "\test.txt" For Output As 1
Print #1, Text1.Text
Print #1, Text2.Text
.....
close

下载msdn吧

Answer 2

文本文件的保存代码，参考
Private Sub cmdSave_Click()
''保存为文本文件
Dim FileNumber
Dim strOuttmpFile As String '定义输出文件的名称
Dim strPrinteTxt As String '定义输出文件的内容
strOuttmpFile = APP.Path & "mytxt.txt"
strPrinteTxt=text1.text & "|" & text2.text
On Error GoTo Err2
FileNumber = FreeFile '打开文件并追写新数据到文件尾
Open strOuttmpFile For Append As #FileNumber
Print #FileNumber, strPrinteTxt
Close #FileNumber
End Sub

Answer 3

open 文件地址 for append as #1'打开文件
print #1,保存的内容、、
close #1'关闭文件释放资源