Text1.Text の表示をスムーズにするには？

解決

igy 2003-10-09 14:04:36 No: 79733 IP: [192.*.*.*]

初歩的な質問ですみません。
VB6の環境です。

Winsockコントロールを用いて、TCP通信を行っています。
TextBoxを使って、アクセスログを常に表示させているのですが、
Winsock1.DataArrivalのたびに

Text1.Text = Text1.Text + (受信したデータ)

としているので、ログが溜まってきたり、一度に長いログを
表示させようとするとチラついてしまいます。

何かよい方法はございませんでしょうか？
どうぞご教授願います。

編集削除

batchman 2003-10-09 15:16:24 No: 79734 IP: [192.*.*.*]

下記のプロパティを利用すればちょっとはマシになるかも．．．

Dim strReceive As String

With Text1

    .SelStart = Len(.Text)
    .SelText = strReceive
End With

編集削除

nanashi 2003-10-09 15:18:52 No: 79735 IP: [192.*.*.*]

※文字列の結合に『+』は使わない方がいいです。

Text1.SelText = (受信したデータ)

とかどうでしょう？

編集削除

igy 2003-10-09 16:57:20 No: 79736 IP: [192.*.*.*]

batchman様 nanashi様
レスありがとうございます。

ご指摘『 + 』は『 & 』に変更いたしました。

で、大変申し上げにくいのですが、
自己解決いたしまして。。

Winsock1.GetData RcvData で受信したデータを、
FOR文を使って、1バイトずつ
Text1.Text = Text1.text & (1バイトのデータ)
とやってしまってました。。

お騒がせ致しましてすみません。
ありがとうございました。

編集削除