チャットで日本語を送信するには？ (ID:110331)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 KUWADAさん、ありがとうございます。 エンコードの方は >mytext = Encoding.Default.GetString(bytebuffer, 0, leng) を参考に出来ました。 ですがまた新たな問題が・・・。 このチャットでは今チャットを行っているメンバーを表示しているのですが、その表示が出来なくなってしまいました。 以下の処理で文字＋サーバに保存しているメンバーを送信しています。 qn.Send(Data) qn.Send("clear") For i = 0 To friendsbox.Items.Count - 1 Dim s As String = "client:" & friendsbox.Items.Item(i) qn.Send(s) Next そしてクライアント側では If LSet(t, 5) = "clear" Then ListView1.Items.Clear() chatbox.AppendText("") Else If LSet(t, 7) = "client:" Then f = Len(t) b = (Strings.Right(t, f - 7)) ListView1.Items.Add(Strings.Left(b, Len(b) - 2), 0) chatbox.AppendText("") Else If LSet(t, 8) = "closenow" Or LSet(t, 5) = "nick:" Then chatbox.AppendText("") Else chatbox.AppendText(t) End If End If End If として文字かメンバー名かを判断しています。 クライアントでclient:○○という文は受信しているのですがメンバーを表示するリストには表示されなくて・・・。 ちなみに参考にしているサンプルプログラムは http://www.pscode.com/vb/scripts/ShowCode.asp?txtCodeId=1381&lngWId=10です。 原因が解る方いらっしゃいますでしょうか？