直至第13课为止，我们所编写的程序只能够处理在运行时的数据，当一个程序终止时，数据也随着消失。我们是否有可能把VB运行时的数据储存进硬盘,软盘，或随身碟呢 ？答案是可以的。在这一课中，我们将了解如何创建文件及把它储存进档案中。
要建立一个档案，可使用下列指令
Open "fileName" For Output As #fileNumber
例如：
Open "c:\My Documents\sample.txt" For Output As #1
将建立一个文本文件sample.txt在My Document 文件夹中。伴随着该文件的号码是1 。如果您想要建立和保存该文件在一个驱动器了，只需更改路径便可，如下“
Open "A:\sample.txt" For Output As #1
如果你想创建一个HTML文件， 可用以下的指令：
Open "c:\My Documents\sample.html" For Output As # 2
17.2.1 程序示例：创建一个文本文件（文字档案）
Private Sub create_Click()
Dim intMsg As String
Dim StudentName As StringOpen "c:\My Documents\sample.txt" For Output As #1
intMsg = MsgBox("File sample.txt opened")
StudentName = InputBox("Enter the student Name")
Print #1, StudentName
intMsg = MsgBox("Writing a" & StudentName & " to sample.txt ")Close #1
intMsg = MsgBox("File sample.txt closed")
End Sub
*上述程序将创建一个文件sample.txt在My Document文件夹中，并准备好接收用户输入的资料。任何用户输入的数据将被保存在这个文本文件。
要读取之前建立的文件，您可以使用输入＃声明。但是，我们只能读取根据该文件被写入时的格式。你必须根据其文件的号码来打开该文件。我们还需要使用
DIM 来宣告的变数。Private Sub Reading_Click()
Dim variable1 As String
Open "c:\My Documents\sample.txt" For Input As #1
Input #1, variable1
Text1.Text = variable1
Close #1End Sub
这一程序将打开sample.txt文件，并在text1文本框中显示其内容。
