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 のサポートおよびフィードバックを参照してください。