VB6 Open〜Close で行数を取得するには？ (ID:91511)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ファイルの行数だけを読み込むのに Do Until EOF(intFileNo) i = i + 1 Loop で、ただカウントをとっても無限ループ入るのですが、なにか処理を書かなくてはいけないのでしょうか？なにかやり方がまちがっているのでしょうか？