In a rich text box, say i have a chat program. I want to add to the rich text box caption, but I want to keep the scroll bar at the bottom, kinda like in AIM but every time it gets writen to it goes back to the top, how can I change that?
Printable View
In a rich text box, say i have a chat program. I want to add to the rich text box caption, but I want to keep the scroll bar at the bottom, kinda like in AIM but every time it gets writen to it goes back to the top, how can I change that?
Use the SelStart property to keep the scrollbar down.
Code:Private Sub RichTextBox1_Change()
RichTextBox1.SelStart = Len(RichTextBox1.Text)
End Sub