改行コードがLFのみのテキストファイルを1行ずつ読み込む

江費行 2005-11-15 20:03:44 No: 127724

こんにちは。

テキストファイルよりデータを入力するプログラムを作っています。
1行ずつ読み込ませ、処理をさせ表示させているのですが、
読み込ませるテキストファイルの改行コードが、CR+LFのファイルは問題なく
1行ずつ読み込ませることが出来ますが、LFのみのファイルは、全ての行が
1行として読み込まれ、困っています。
何とか、行頭からLFコードまでを1行として区切るようなプログラムが出来ませんか？
よろしくお願いします。

Do Until EOF(fil)
Line Input #fil, dataA
'ここに処理
print dataA
Loop

生茶 2005-11-15 20:21:06 No: 127725

Replace関数でLFをCRLFへ
Replace(文字列, vbLf, vbCrLf)

いな 2005-11-15 20:59:53 No: 127726

むしろ、一度読み込んじゃったなら
vbLFでsplitしてもヨサゲ

魔界の仮面弁士 2005-11-15 21:32:50 No: 127727

ADODB.Streamオブジェクトを使えば、LF改行のテキストを
一行単位で読み込ませる事ができますよ。

あるいは方法をかえて、全データ読み込み後に LF で分割するという
方法もありますが……こちらについては、他の方が既に書かれていますね。