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

解決


igy  2003-10-09 23:04:36  No: 79733

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

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

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

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

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


batchman  2003-10-10 00:16:24  No: 79734

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

Dim strReceive As String
    
With Text1
        
    .SelStart = Len(.Text)
    .SelText = strReceive
End With


nanashi  2003-10-10 00:18:52  No: 79735

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

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

とかどうでしょう?


igy  2003-10-10 01:57:20  No: 79736

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

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

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

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

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


※返信する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。






  このエントリーをはてなブックマークに追加