テキストの行数を取得するには？

α 2001-09-13 23:23:17 No: 74863

テキストの行数を取得したり、指定行を読み込んだりするにはどのようにすればよいのでしょうか？

たかみちえ 2001-09-21 06:48:54 No: 74864

ここのVBサンプルを見てみてください。

α 2001-09-22 05:47:33 No: 74865

すみません。よく探したのですが、サンプルは見あたりません。
お手数ですがURLで御願い致します。

たかみちえ 2001-09-22 08:20:09 No: 74866

この掲示板のおいてあるここですよぉ、
トップページのメニューのDownloadのしたにあります。
ベクターからMEDIAさんの名前をひいても出るかも。

α 2001-09-27 15:36:34 No: 74867

実際、指定行を読み出すのはサンプルの指定行の選択をしてから変数に代入すればよいのですね。
でも全行数は取得できるのでしょうか。

かず 2001-10-07 01:53:18 No: 74868

'カーソルを最後の行にもっていっ手て
Text1.SelStart = Len(Text1.Text)

カーソル位置の行数をとる
EndLine = SendMessage(Text1.hwnd, &HC9, -1, 0)

これで、総行数とれるんじゃないのかな。

たかみちえ 2001-10-07 02:23:01 No: 74869

えーっと、同サンプルに
今の行と最終行数、今のけたとその行のけた数
それぞれ取得できるものがあったと思いますけど…。