tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル ファイル行数取得
投稿日: 2008/06/19(Thu) 18:01
投稿者ds
100MB近い20万行のCSVファイルの行数を高速で取得しようと試みているのですが、
ループ処理でのカウントとFSOを使っての行数取得では遅すぎて手を拱いています。

FSO処理
FileDataCount = Fso.OpenTextFile(strPath, ForAppending).Line - 1
では約11秒です。

ループ処理
Do While Not EOF(FileNumber)
    Line Input #FileNumber, TextLine
    DataCount = DataCount + 1
Loop
でも約11秒です。

なにかよい手はありませんか?

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。