ファイルの行数を取得できる関数はありますか？

解決

けんけん 2004-04-21 21:51:59 No: 112907

ＶＢでテキストファイルの行数を知りたいのですが、
１件づつ読み込んでカウントアップさせるしかないのでしょうか？
ＵＮＩＸで言えば、ＷＣみたいな行数情報を取得できる関数が
ありましたら教えて下さい。
よろしくお願い致します。

nanashi 2004-04-22 00:14:44 No: 112908

TextStreamオブジェクトでSkipLineでカーソルを最後の行まで持って行けば
Lineプロパティで取得できます。
Openで読み込むよりは多少速いと思いますが…。

oku URL 2004-04-22 08:25:05 No: 112909

もしくはOpenTextFileメソッドでAppendingで開いて
Line プロパティで行数を取得するか。
ＶＢレスキュ−（花ちゃん）＆八日市ＰＣサービスの
FileSystemObject関係にサンプルありますよ。
http://www.bcap.co.jp/hanafusa/

けんけん 2004-04-23 20:40:36 No: 112910

おぉぉ！！
okuさんに教えて頂いたやり方をやったら
瞬時に取得することが出来ました。
ありがとうございます！！

nanashiさんもアドバイスありがとうございました。