ファイルを後ろ(最後の行から)表示するには?

解決


hiro  2004-08-31 22:59:23  No: 116062  IP: [192.*.*.*]

今、ファイルを読み込んで、テキストボックスに表示したとします。
  
   0.0001344140,   -0.0019111337,   -8.826E-07
   0.0324691889,   -0.0019163866,   8.41342E-05
   0.0649630960,   -0.0019241115,   0.000342193
   0.0910194032,   -0.0019228755,   0.000652279

これらの(行単位)4行を後ろから表示するにはどうしたろよいでしょーか?
教えてください。
   0.0910194032,   -0.0019228755,   0.000652279
   0.0649630960,   -0.0019241115,   0.000342193
   0.0324691889,   -0.0019163866,   8.41342E-05
   0.0001344140,   -0.0019111337,   -8.826E-07
このような感じにしたいのですが....
ただ、現在は右側の値が小〜大になっていますが、普段は不規則なのですが、
よろしくお願いします。

編集 削除
くま  2004-08-31 23:36:49  No: 116063  IP: [192.*.*.*]

テキストボックスに追加する順序を工夫すればいいんじゃないでしょうか。

intF = FreeFile
Open "a.txt" For Input As #intF
Do While Not EOF(intF)
  Line Input #intF,strLine
  txtResult.Text = strLine & vbCrLf & txtResult.Text  '後から読み込んだ行を前に追加
Loop
Close #intF

編集 削除
hiro  2004-09-01 00:42:48  No: 116064  IP: [192.*.*.*]

ありがとうございました。
こんなに簡単だったんですね。

VBっていろいろ工夫しだいで、いろいろできるんですね
勉強になりました。

編集 削除
hiro  2004-09-01 00:43:51  No: 116065  IP: [192.*.*.*]

解決ボタン忘れました...

編集 削除