RichTextBox最終行まで来たらFormをスクロールしたい

環境/言語:[Windows7 Pro SP1 , VB.NET（VS2010Pro）]
分類:[.NET]




お世話になります。
なかなか良い案が無く悩んでいます。（始めたばかりの為、すみません）

Form1（windowsフォームスクロールバー付）にRichTextBox1
（又は、TextBox1：スクロールバー付）を配置している場合、
RichTextBox1にフォーカス（select）がある場合、スクロールマウスで、
RichTextBox1の最終行まで行った時に、Form1側がスクロールするように
するにはどうすれば良いのでしょうか。
Ｗｅｂ画面のようなスクロールにしたいと思っています。

RichTextBoxのスクロールイベントを最終行まで来たらForm側にスルー
すれば良いかとは思うのですが、方法が分かりません。
よろしくお願いします。

自己解決では、ありませんが
色々、調べたけっかq、簡単な方法は、なさそうですね。

とりあえず、スクロール量が、少ないので、下記のコーディングで、
とりあえず、の回避をしていますq。
もっと、良い方法が、あれば、よろしくです。


Private Sub RichTextBox1_MouseWheel(sender As Object, e As
System.Windows.Forms.MouseEventArgs) Handles RichTextBox1.MouseWheel
ScrollAutoPosition(e.Delta / 10)
End Sub

Private Sub ScrollAutoPosition(ByVal x As Integer)
Me.AutoScrollPosition = _
New Point(-Me.AutoScrollPosition.X, _
-Me.AutoScrollPosition.Y - x)
End Sub