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

解決

けんけん 2004-04-21 12:51:59 No: 112907 IP: [192.*.*.*]

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

nanashi 2004-04-21 15:14:44 No: 112908 IP: [192.*.*.*]

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

oku URL 2004-04-21 23:25:05 No: 112909 IP: [192.*.*.*]

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

けんけん 2004-04-23 11:40:36 No: 112910 IP: [192.*.*.*]

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

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