EOF 函式
傳回 Integer,其中包含已到達為隨機或循序輸入開啟的檔案結尾時的布爾值 True。
語法
EOF (filenumber)
必要的 filenumber 自變數是包含任何有效檔案編號的整數。
註解
使用 EOF 來避免嘗試取得超過檔案結尾的輸入所產生的錯誤。
EOF 函式會傳回 False,直到到達文件尾為止。 開啟檔案以進行 隨機 或 二進位 存取時, EOF 會 傳回 False ,直到上次執行 的 Get 語句無法讀取整筆記錄為止。
開啟檔案以進行 二進制 存取時,嘗試使用 Input 函式來讀取檔案,直到 EOF 傳回 True 為止,就會產生錯誤。 以 Input 讀取二進位檔案時,請使用 LOF 和 Loc 函數,而不是 EOF,或在使用 EOF 函數時使用 Get。 開啟 [ 輸出] 的檔案時, EOF 一律會傳回 True。
範例
此範例會使用 EOF 函式來偵測檔案的結尾。 此範例假設 MYFILE
是含有幾行文字的文字檔。
Dim InputData
Open "MYFILE" For Input As #1 ' Open file for input.
Do While Not EOF(1) ' Check for end of file.
Line Input #1, InputData ' Read line of data.
Debug.Print InputData ' Print to the Immediate window.
Loop
Close #1 ' Close file.
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。