Auto scrolling to bottom of textbox. [Resolved]

[Jared]

I am taking string text data and passing it to a Sub. All the text appears in the text box okay, but I can't get the scroll bar to go to the bottom of the textbox. After each new addition of text, the scrollbar stays at the top. Here is the code that I am using:


Private Sub WriteMessage(ByVal message As String)

Me.TextBox1.Text += message + vbCrLf
Me.TextBox1.SelectionStart = Len(TextBox1.Text)

End Sub


I have read other suggestions from the past forums, but those didn't seem to work.

[Athley]

Me.TextBox1.ScrollToCaret()

[Jared]

Thanks for replying so quickly, but I have tried adding that to the end of the above code, and it didn't work.

Jared.

[Athley]

Ok?!? Strange, The code I tried it on was yours.

I added a TextBox1, set the ScrollBars property to Vertical, filled the variable "message" with a text and copied you code from the thread and called it from a button click event.

[Jared]

It worked!

When I tried previously, I must have made a mistake the first time when I put the line in.

Thanks!

Jared.