ChrBで変換したコードをWinsockで正常に送るには？ (ID:76526)

名前

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

本文 私の見落としや、勘違いなどで既出でしたら申し訳ありません。 現在以下のようにWinsock(UDP)で送受信を試みているのですが 受信データが正常に取れません。 送信側： Dim strSendData As String strSendData = ChrB(Val("&H" + "8A") strSendData = strSendData + ChrB(Val("&H" + "8B") strSendData = strSendData + ChrB(Val("&H" + "8C") Winsock1.SendData strSendData 受信側： Winsock2_DataArrival(ByVal bytesTotal As Long) { Dim strRecvData As String Dim strExcData As String Winsock2.GetData strRecvData strExcData = Hex(AscB(MidB(strRecvData, 1, 1) strExcData = strExcData + Hex(AscB(MidB(strRecvData, 2, 1) strExcData = strExcData + Hex(AscB(MidB(strRecvData, 3, 1) これで「8A8B8C」と取れるかと思ったのですが 「8A8B3F…」と言ったようになってしまいます。 Winsockで送信の際にunicodeがANSIコードに変換される(?)らしいのですが これを回避する方法をご存じの方がいらっしゃいましたら 誠に恐れ入りますがご教授いただきたいと思いますので、よろしくお願いいたします。