次の方法で共有


AtEndOfStream プロパティ

TextStream ファイルの末尾にファイル ポインターがある場合は True を返す読み取り専用のプロパティです。ない場合は False を返します。

構文

object.AtEndOfStream

object は常に TextStream オブジェクトの名前となります。

解説

AtEndOfStream プロパティは、読み取りを行うように開いた TextStream ファイルに対してのみ使用できます。それ以外の場合は、エラーが発生します。

次のコードは、AtEndOfStream プロパティの使用例を示しています。

Dim fs, a, retstring
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.OpenTextFile("c:\testfile.txt", ForReading, False)
Do While a.AtEndOfStream <> True
    retstring = a.ReadLine
    ...
Loop
a.Close

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。