文字列なしでスペースのみの行を取得するには (ID:88325)

名前

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

本文 初めて書き込みさせていただきます。 ＰＣ環境はWindowsＸＰ、ＶＢ6.0です。 いま、コマンドボタンを押下後、DB.txtというテキストファイルをリストボックスに表示する、というプログラムを作成しています。 ファイルを1行1行読み込む際 [文字列なしの行]と[スペースのみの行]は読み込み中止にしたいのですが [文字列なしの行]と[スペースのみの行]という条件をどう表現していいのかわかりません Dim temp As String '各行のデータを一時的に保持する変数 Open "C:\File\DB.txt" For Input As #1 Do Until EOF(1) 'データを1件(1行)ずつ読み込む Line Input #1, temp '読み込んだデータ（行）が「スペースのみ」か「改行のみ」の場合 If temp = " "or vbCrLf Then Exit Do 'ファイル読み込み終了 としてみたのですがvbCrLfの型がtempと一致しないとエラーになります。 そこでstr(vbCrLf)としてみたのですがそれもだめでした。 ぜひご教授お願い致します。