在vb.net中怎样将UTF8码转换为gb2312的汉字?用于输出到COM口
Using com1 As IO.Ports.SerialPort = My.Computer.Ports.OpenSerialPort(txtCom.Text)
com1.BaudRate = 9600
com1.WriteLine(("`~564564566#1(15) 通关事务协调、港区协作联动请A008号到15窗口办理*").ToString)
com1.Close()
此时显示全变为???等的乱码,应如何转换呢?请高手指教.
[解决办法]
把"`~564564566#1(15) 通关事务协调、港区协作联动请A008号到15窗口办理*转换成字节数组，再发送：
Using com1 As IO.Ports.SerialPort = My.Computer.Ports.OpenSerialPort(txtCom.Text)
com1.BaudRate = 9600
im command = "`~564564566#1(15) 通关事务协调、港区协作联动请A008号到15窗口办理*"
Dim array() As Byte = System.Text.Encoding.GetEncoding("gb2312").GetBytes(command)
com1.Write(array, 0, array.Length)
com1.Close()
End Using
