JBTALKS.CC

标题: [VB]Close 陳述式 [打印本页]

作者: OxfordExe2 时间: 2009-2-1 04:24 PM
标题: [VB]Close 陳述式
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 时间: 2009-2-1 05:01 PM
标题: 回复 #1 OxfordExe2 的帖子
VB.net 有个偷懒的方法

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

复制代码

作者: Super-Tomato 时间: 2009-2-2 02:23 AM

原帖由 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

欢迎光临 JBTALKS.CC (https://www.jbtalks.cc/)