RTB scroll

[Lenny]

Im looking for a way to make the RichTextBox in vb to scroll back down after resizing.

[iago]

rtb1.selstart = len(rtb1.text) .. if that's what you mean, great, but I get the impression that you meant something else.

[Lenny]

Actually that is what i meant....Works Thx

Is there a way using WM_(something) to cause it to scroll down?

[SiMi]

'sets scroll position
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const WM_USER = &H400
Private Const EM_GETSCROLLPOS = (WM_USER + 221)
Private Const EM_SETSCROLLPOS = (WM_USER + 222)
'gets scroll position
Public Type POINTL
   x As Long
   y As Long
End Type

[Lenny]

Can someone explain exactly that is used?

[NetNX]

LOL u could just do

Private sub Form_resize()
rtb1.selstart = len(rtb1.text)
End Sub

[UserLoser.]

Can someone explain exactly that is used?

Explains exactly how you can use it here.

[mentalCo.]

What about in vb.net? i am trying :

Code Select Expand


rtbMain.SelectionStart = Len(rtbMain.Text)


and it isnt working.


edit: got it to work by setting the focus to the RTB first.

Code Select Expand


rtbMain.Focus()
rtbMain.SelectionStart() = Len(rtbMain.Text)


[mentalCo.]

by setting the focus creates a huge problem... any other solution for vb.net?