送られてきたデータを画面に表示させる場合に
（例１）Winsock.GetData strData
Text1.Text = Text1.Text & strData & vbNewLine

（例２）Winsock.GetData strData
Picture.ForeColor = RGB(0,0,255)
Picture.Print = strData

（例３）Winsock.GetData strData
List.AddItem strData
List.ListIndex = List.CountIndex - 1　'データが下に隠れないように

出力する場所(テキストボックスなど)、出力方法、知識が足りないためか以下でや
りたいことができません。
まず、例１、例３だと送られてきたデータごとにフォントカラーが変更できない。
例１、例２ともに最後に送られてきたデータを画面内に表示させたいのです
が、古いデータがたまると、新しい行はスクロールバーで下に行かないと文
字が見れなくなる。
データごとにフォントが変更でき、最後に表示するデータがスクロールバー
で隠れることがないようにする方法教えてください。