文字传输的问题
接受远程主机的数据
AxWinsock2.GetData(strdata)
tstring = ""
For i = 0 To UBound(strdata)
tstring = tstring + Chr(strdata(i))
Next
txtGet.Text = tstring
这是个用UDP协议传输数据的显示部分代码
现在已经可以显示数字和字母,但是就是不能显示中文,求教解决的方案,最好有代码~
问题点数:20、回复次数:2Top
1 楼zhouxiaotan(夜雨悠扬)回复于 2006-03-03 14:51:15 得分 0
这是字符集的问题,必须保证使用的字符集,认识中文
用下面的方法试一下
Dim ASCII As Encoding = Encoding.ASCII
Dim endpoint As IPEndPoint
Dim data() As Byte = m_Client.Receive((endpoint))
Dim strData As String = ASCII.GetString(data)
Top
2 楼drk928(一起看斜阳)回复于 2006-03-03 17:19:55 得分 0
编码的问题..Top




