注意
若 Microsoft Jet Expression Service 以沙盒模式執行,則本主題所述的函式、方法、物件或屬性將被禁用,避免評估潛在不安全的表達式。 想了解更多沙盒模式的資訊,請在說明中搜尋「sandbox mode」。
回傳一個整數,代表下一個可供 Open 語句使用的檔案號碼。
語法
FreeFile[ (範圍號) ]
可選的 rangenumber 參數是一個 Variant,用來指定下一個空閒檔案號要從哪個範圍回傳。 指定一個 0 (預設) ,以回傳範圍為 1 到 255 的檔案號。 指定 1 以回傳範圍為 256 至 511 的檔案號。
註解
使用 FreeFile 提供尚未被使用的檔案號碼。
範例
注意
下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊,請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考],並在 [搜尋] 方塊中輸入一個或多個字詞。
此範例使用 FreeFile 函式來回傳下一個可用的檔案號。 迴圈中會開啟五個檔案輸出,並寫入部分樣本資料。
Dim MyIndex, FileNumber
For MyIndex = 1 To 5 ' Loop 5 times.
' Get unused file number.
FileNumber = FreeFile
' Create file name.
Open "TEST" & MyIndex For Output As #FileNumber
' Output text.
Write #FileNumber, "This is a sample."
' Close file.
Close #FileNumber
Next MyIndex