このサイト内の例(※1）を参考に、MSFlexGridにcvs形式ファイルを読み込んで
表示するプログラムを作っているのですが、読み込むファイルが空だと、
ループに入った直後(※2)エラーが出ます(※3)。参考プログラム自体でやって
みても同じことになりました。

ソースを読む限りでは、EOFを検出して最初からループに入らないのではないか、
とも思ってしまうのですが。対処の仕方、問題点などお気づきのことがあれば
助言いただければと思います。

※1：MSFlexGrid関係／No.2 テキストファイルを読込、表示、保管する
※2：Input #intFileNo, Sno, name, kokugo, suugaku, eigo, goukei, heikinの所
※3：“実行時エラー62　ファイルにこれ以上データがありません”
環境：Windows XP, VB6.0

> ソースを読む限りでは、EOFを検出して最初からループに入らないのではないか、
> とも思ってしまうのですが。対処の仕方、問題点などお気づきのことがあれば
> 助言いただければと思います。
ボクの環境では
Do Until EOF(intFileNo)
でちゃんと抜けますね。ループに入らないです。
ファイルが空じゃなくてデータが３個くらいとか…中途半端にあるんじゃないですか？
引数の数だけデータがないとエラーになりますよ？

> ボクの環境では Do Until EOF(intFileNo)
> でちゃんと抜けますね。ループに入らないです。
> ファイルが空じゃなくてデータが３個くらいとか…中途半端にあるんじゃないですか？
> 引数の数だけデータがないとエラーになりますよ？

その通りでした。
テキストファイルで開いてみたところ、改行が一つだけありました。

次は不整形なデータが来た時のはじき方を考えないといけないですが、
ひとまず原因が分かって先に進めそうです。ありがとうございました！
多謝