ファイルを後ろ（最後の行から）表示するには？

解決

hiro 2004-09-01 07:59:23 No: 116062

今、ファイルを読み込んで、テキストボックスに表示したとします。

   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-09-01 08:36:49 No: 116063

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

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 09:42:48 No: 116064

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

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

hiro 2004-09-01 09:43:51 No: 116065

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