* "Daniel Friend" <da*@donotspam. com> scripsit:
How do I scroll to the bottom of RichTextBox
From my FAQ (<URL:http://dotnet.mvps.org/dotnet/faqs/>):
When using a RichTextBox control for displaying logging information, it is
useful to scroll the recently added line into view. There are two ways to
accomplish this:
\\\
Private Const WM_VSCROLL As Int32 = &H115
Private Const SB_BOTTOM As Int32 = 7
Private Declare Auto Function SendMessage Lib "user32.dll " ( _
ByVal hwnd As IntPtr, _
ByVal wMsg As Int32, _
ByVal wParam As Int32, _
ByVal lParam As Int32 _
) As Int32
Private Sub AddLine(ByVal Destination As RichTextBox, ByVal Text As String)
With Destination
.AppendText(Tex t & ControlChars.Ne wLine)
SendMessage(Des tination.Handle , WM_VSCROLL, SB_BOTTOM, 0)
End With
End Sub
///
- or -
\\\
Dim ctr As Control = Me.ActiveContro l
With Me.RichTextBox1
.Focus()
.AppendText("He llo World!")
.ScrollToCaret( )
End With
ctr.Focus()
///
The 2nd solution has a side-effect: Setting the focus to the
RichTextBox control may raise validation events.
--
Herfried K. Wagner [MVP]
<URL:http://dotnet.mvps.org/>