'*******************************************
' Scroll Textbox - by DarKPaiN
'
'w w w . P r o g e n i c . c o m
'*******************************************


'***********PLACE IN FORM************
'Place this in the text change event
'and it will scroll down when new data 
'is inserted

Text1.SelStart = Len(Text1.Text)