VB初心者友の会 - 超初心者専用Q&A掲示板過去ログ

> ファイルの終端（EOF）を条件文に加えたいのですが、EOFの検出の方法が分かりません...。

>         Do Until EOF(1)
「EOFの検出」なら、ここでしていますよ？

> > ファイルの終端（EOF）を条件文に加えたいのですが、EOFの検出の方法が分かりません...。
> 
> >         Do Until EOF(1)
> 「EOFの検出」なら、ここでしていますよ？

高架の藤様、早速のアドバイスありがとうございます。
「Do Until EOF(1)」は"ファイルの終端まで処理をループする"という意味だけだと
思っておりました...。

もし、どうしてもIf文に「ファイルの終端まで」という条件を入れたければ
どうすればよいのでしょうか？？？？
度々申し訳ありませんが私の未熟な調査では分かりませんでした。
よろしければアドバイスをお願いいたします。

> > > ファイルの終端（EOF）を条件文に加えたいのですが、EOFの検出の方法が分かりません...。
> > 
> > >         Do Until EOF(1)
> > 「EOFの検出」なら、ここでしていますよ？
> 
> 高架の藤様、早速のアドバイスありがとうございます。
> 「Do Until EOF(1)」は"ファイルの終端まで処理をループする"という意味だけだと
> 思っておりました...。
> 
> もし、どうしてもIf文に「ファイルの終端まで」という条件を入れたければ
> どうすればよいのでしょうか？？？？

今一度ヘルプでDo Until の処理とIfの処理を確認しましょう

If EOF(1) = True Then
    MsgBox "ファイル終端だよ"
End If
(作成時間１分)

> 「Do Until EOF(1)」は"ファイルの終端まで処理をループする"という意味だけだと
> 思っておりました...。
「ファイルの終端（EOF(1)）」と言う条件と「条件を満たすまで処理をループする（Do Until）」と言う制御の２つの組み合せです。

> もし、どうしてもIf文に「ファイルの終端まで」という条件を入れたければ
以下、ヘルプより抜粋。
−−−−−−−−−−−−−−−−−−−−−−−−−−
EOF 関数
開いたファイルの現在位置がファイルの末尾に達している場合、
ブール型 (Boolean) の値の真 (True) を含む整数型 (Integer) の値を返します。
−−−−−−−−−−−−−−−−−−−−−−−−−−
ですので、以下の様にすれば良いです。

> If EOF(1) = True Then

高架の藤様、匿名748様、貴重なお時間を裂いてのアドバイスありがとうございました。
大変参考になり、無事実現させることができました。
まだまだ未熟者で至らない点が多々ありますが、今後ともよろしくお願いいたします。