Multi line textbox

Ok i have a locked multiline textbox, and im inputting data from a web server, but when the data length is greater then the amount of line on the textbox the textbox doesnt scroll down to the new data, could someone please help me to do this as it is REALLY annoying me!
Thanx
Cease

You can adapt this code which adds text manually and then scrolls down to the new code.

Code:

---

Dim dblOldLength As Double
dblOldLength = Len(Text1.Text)
Text1.Text = Text1.Text & "Add and show these new words"
Text1.SelStart = dblOldLength
Text1.SelLength = 0

---

Thanx a lot
Cease