11行目のGOTO文を削除したらOKかと。 エラーの原因は、最初のループでデータを全て読み込んでしまい。 GOTOで戻って更にデータを読もうとしたとき、次に読むデータがなかった、と言うことだと思います。 GOTO文の前に「RESTORE @TOP」を入れればエラーはでなくなりますが、直ぐにCLSで消されるので表示はよめないかと^^;