CSVファイルについて

環境/言語:[WindowsXP , VB.NET , SQL Server 2000]
分類:[.NET]

ＣＳＶファイルについて教えてください。
複数のＣＳＶファイルを処理し、ＳＱＬＳｅｒｖｅｒのテーブルを更新していくので、処理中にプログレスバーを表示しようと思っています。
ＣＳＶファイルの件数を取得したいのですが、どうやって取得すればいいのでしょうか？

■No6599に返信(Booさんの記事)
> ＣＳＶファイルについて教えてください。
> 複数のＣＳＶファイルを処理し、ＳＱＬＳｅｒｖｅｒのテーブルを更新していくので、処理中にプログレスバーを表示しようと思っています。
> ＣＳＶファイルの件数を取得したいのですが、どうやって取得すればいいのでしょうか？

　　http://hpcgi1.nifty.com/MADIA/VBBBS/wwwlng.cgi?print+200309/03090055.txt

　　ここをご参照下さい。

以上。

■No6600に返信(岡田 之仁さんの記事)

> 　　http://hpcgi1.nifty.com/MADIA/VBBBS/wwwlng.cgi?print+200309/03090055.txt
>
> 　　ここをご参照下さい。
>
> 以上。

上記のＶＢレスキューサイトを教えてくださって、ありがとうございました。
朝からいろいろ試してみて、やっと解りました。
VB.netの方はまだまだ使用例が少なく、初めて.netにとり組んでいる私には非常に難しいです。（今までＣＯＢＯＬ専門だったので･･･）
以下の方法でＯＫでした。

Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button1.Click

Dim Fso As New Scripting.FileSystemObject
Dim FsoTS As Scripting.TextStream

FsoTS = OpenTextFile _
("C:\TEST.csv" ,Scripting.IOMode.ForAppending)
Label1.Text = "ファイルの行数は " & FsoTS.Line - 1 & " 行です。"

End Sub

また、解らないことがあったらお願いします。