在Textbox中不断显示出从Winsock中接收到的字符，并光标定位在最后的字符之后，例如：
Private Sub Winsock_DataArrival(ByVal bytesTotal As Long)
Dim strGet as string

winsock.getData strGet

textGet.text=textGet.text & strGet
textGet.selstart=len(textGet.text) 'TextGet有垂直滚动条
textGet.setfocuse
End Sub
发现TextGet先由头显示下去，画面每次都闪动一下，有什么办法解决该问题？象QQ一样当收到信息或发出信息文字不断向上滚动。