Share via

EOF 関数

  • [アーティクル]

Random またはシーケンシャル Input で開かれたファイルの末尾に達した場合、Boolean 値 True を含む整数を返します。

構文

EOF(filenumber)

必須の filenumber引数は、任意の有効なファイル番号を含む整数です。

注釈

EOF を使用して、ファイルの末尾を越える入力によるエラーが発生しないようにします。

ファイルの末尾に達するまで、EOF 関数は False を返します。 Random または Binary アクセスで開かれたファイルの場合、最後に実行した Get ステートメントでレコード全体を読み取れなくなるまで、EOF は False を返します。

Binary アクセス用に開かれたファイルでは、Input 関数を使って、EOF が True を返すまでファイルを読み取ろうとすると、エラーが発生します。 Input でバイナリ ファイルを読み取るときは、EOF の代わりに LOF 関数と Loc 関数を使用します。または、EOF 関数を使用しているときは Get を使用します。 Output で開かれたファイルの場合、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 のサポートおよびフィードバックを参照してください。