直至第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
*上述程式將在My Document '的文件夾創建一個 sample.txt 文件，並准備好接收用戶輸入的資料。任何用戶輸入的數據將被保存在這個文本文件。
17.3 讀取文件
要讀取之前建立的文件，您可以使用輸入＃聲明。但是，我們只能讀取根據該文件被寫入時的格式。你必須根據其文件的號碼來打開該文件。我們還需要使用DIM 來宣告的變數。
17.3.1 範例
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 #1
End Sub
