[VB2] スクロールさせながらテキスト ボックスに新たな行を追加する方法

概要

Text プロパティの内容を設定しなおすことで、新たな行を追加することができます。

  Text1.Text = Text1.Text & "New Line" & Chr(13) & Chr(10)

しかし、テキスト ボックスの表示可能な行数より長くなった場合、追加された行は
ユーザがテキスト ボックスのスクロール バーを明示的に移動させない限り、
画面には表示されません。
この資料はテキスト ボックスの内容をスクロールさせながら、新たな行を追加
していく方法について記述しています。

サンプル

テキスト ボックスの SelStart プロパティおよび SelText プロパティを使用
することで、スクロールさせながら、新たな行を追加させることができます。

  Text1.SelStart = LenB(Text1.Text) + 1
  Text1.SelText = "New Line" & Chr(13) & Chr(10)