VB 串口 十六进制通讯,VS2015环境,serialport控件,现在能发送接收中文,怎样才能发送十六进制数据? 80
2个回答
2020-03-03
展开全部
例如发送十六进制:01 02 03
只要在01 02 03前面加&H即可。
Dim TestArray() As String = Split("01 02 03")
Dim hexBytes() As Byte
ReDim hexBytes(TestArray.Length - 1)
Dim i As Integer
For i = 0 To TestArray.Length - 1
hexBytes(i) = Val("&H" & TestArray(i))
Next
SerialPort.Write(hexBytes, 0, hexBytes.Length)
只要在01 02 03前面加&H即可。
Dim TestArray() As String = Split("01 02 03")
Dim hexBytes() As Byte
ReDim hexBytes(TestArray.Length - 1)
Dim i As Integer
For i = 0 To TestArray.Length - 1
hexBytes(i) = Val("&H" & TestArray(i))
Next
SerialPort.Write(hexBytes, 0, hexBytes.Length)
更多追问追答
追问
那显示成16进制呢?
追答
用Val 函数。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询