[VB]Close 陳述式

OxfordExe2

Dim I, FileName
    For I = 1 To 3                      ' 執行迴圈三次
       FileName = "TEST" & I            ' 建立檔案名稱
       Open FileName For Output As #I   ' 開啟檔案
       Print #I, "This is a test."      ' 將字串寫入檔案
    Next I
    Close   ' 將三個已開啟的檔案全部關閉。

這個我一直搞不懂是什么
能不能用淺白易懂的方式
講解講解
感恩啦！

goodhermit95

VB.net 有个偷懒的方法

1. 
   
2. Dim SR as new system.io.streamreader("C:\test.txt")
   

复制代码

Super-Tomato

原帖由 OxfordExe2 于 2009-2-1 04:24 PM 发表
Dim I, FileName
    For I = 1 To 3                      ' 執行迴圈三次
       FileName = "TEST" & I            ' 建立檔案名稱
       Open FileName For Output As #I   ' 開啟檔案
       Print #I, "This is a test."      ' 將字串寫入檔案
    Next I
    Close   ' 將三個已開啟的檔案全部關閉。

這個我一直搞不懂是什么
能不能用淺白易懂的方式
講解講解
感恩啦！

以上的 close 用法有點不太正確

Dim 這個初始應該不用解釋了吧
For 循環這個是基本的也可以跳過



       FileName = "TEST" & I
這個 FileName 只是方便以後使用 , 而沒有創建的性質



       Open FileName For Output As #I   ' 開啟檔案

Open [檔案名稱] For [模式] As [File Handle]
這是 BASIC 語法, 最主要是 Open 指定打開, FileName 就是指檔案名稱, 上面這樣些以後只要使用 FileName 就知道是 "TEST"&I,
For 之後是指定檔案的存取模式, 所以可以是 Input, Output, Append 這些
As 之後的是 File handle, 這裡使用 #I 代表隨著 I 而變動, 但這個 File Handle 的編號有個長度限制, 至於是多少我忘了, 你可以去參考書籍



       Print #I, "This is a test."      ' 將字串寫入檔案
Print [File Handle], [Data]
最後這個 Print 就是列印, 就是把 This is a test 的字串寫入 File Handle 所指向的檔案




每做完 Open 和 Print/Write 之後就要使用 Close 關閉檔案, 不然資源不會被釋放

Close [File Handle]
Close #I







也就像是你用 Word 打開個檔案, 寫入或修改資料之後就自然會關閉, 不關閉的話就會一直在打開的狀況下, Taskbar 很快會因為你開甚麼檔案都沒有做關閉的習慣而變得擁擠



Dim I, FileName
    For I = 1 To 3                      ' 執行迴圈三次
       FileName = "TEST" & I            ' 建立檔案名稱
       Open FileName For Output As #I   ' 開啟檔案
       Print #I, "This is a test."      ' 將字串寫入檔案
       Close #I
    Next I