Visual Basic函數 - 《FreeFile:可供使用的檔案代碼 》
傳回一個 Integer 型態的值,用來代表下一個可供 Open 方法使用的檔案代碼。
語法
FreeFile[(rangenumber)]
選擇性引數 rangenumber 是一個 Variant,它可以指定一個範圍,以便傳回該範圍之內的下一個可用的檔案代碼。
指定 0(預設值)將傳回一個值介於 1 和 255 之間的檔案代碼。
指定 1 將傳回一個值介於 256 和 511 之間的檔案代碼。
請注意
FreeFile 函數會產生一個尚未被使用的檔案代碼。
FreeFile 函數範例本範例使用 FreeFile 函數來傳回下一個可用的檔案代碼。範例中使用迴圈的方式,共開啟五個輸出檔,並對每個檔案寫入一些資料。
Dim MyIndex, FileNumberFor MyIndex = 1 To 5 ' 迴圈執行五次 FileNumber = FreeFile ' 取得未使用的檔案代碼 Open "TEST" & MyIndex For Output As #FileNumber ' 建立檔案名稱 Write #FileNumber, "This is a sample." ' 輸出文字至檔案中 Close #FileNumber ' 關閉檔案Next MyIndex