vb和单片机之间的16进制转换问题
各位大虾:
从单片机传送16进制 ab到pc几
设置方式为 二进制接受 每次接受一个字节
接受程序为:
dim inbuf(8) as byte
Private Sub comm1_OnComm()
Select Case comm1.CommEvent
Case comEvReceive
av = comm1.Input //单步的时候 av是170 是16进制的aa
inbuf(0) = Hex(av(0))/// 此处编译有错误 说类型不符
If inbuf(0) = &HAA Then aa是开始标志
RThreshold = 0
Do
DoEvents
Loop Until .InBufferCount >= 7
av = comm1.Input
inbuf(0) = av(0)
av = comm1.Input
inbuf(1) = av(0)
av = comm1.Input
inbuf(2) = av(0)
av = comm1.Input
inbuf(3) = av(0)
av = comm1.Input
inbuf(4) = av(0)
av = comm1.Input
inbuf(5) = av(0)
text1.text=inbuf
comm1.InBufferCount = 0
RThreshold = 1
End If
End Select
End Sub
怎样才能在 text中显示的是 16进制 比如bb ab
多谢
从单片机传送16进制 ab到pc几
设置方式为 二进制接受 每次接受一个字节
接受程序为:
dim inbuf(8) as byte
Private Sub comm1_OnComm()
Select Case comm1.CommEvent
Case comEvReceive
av = comm1.Input //单步的时候 av是170 是16进制的aa
inbuf(0) = Hex(av(0))/// 此处编译有错误 说类型不符
If inbuf(0) = &HAA Then aa是开始标志
RThreshold = 0
Do
DoEvents
Loop Until .InBufferCount >= 7
av = comm1.Input
inbuf(0) = av(0)
av = comm1.Input
inbuf(1) = av(0)
av = comm1.Input
inbuf(2) = av(0)
av = comm1.Input
inbuf(3) = av(0)
av = comm1.Input
inbuf(4) = av(0)
av = comm1.Input
inbuf(5) = av(0)
text1.text=inbuf
comm1.InBufferCount = 0
RThreshold = 1
End If
End Select
End Sub
怎样才能在 text中显示的是 16进制 比如bb ab
多谢
...全文
相关推荐
中国对外贸易概论.doc
中国对外贸易概论.doc
用VB.net打造Modbus RTU专用串口调试助手:16进制收发与CRC校验全解析
串口通信是嵌入式开发与工业设备调试中的基础技术,而Modbus RTU作为工业现场最常用的协议之一,报文以16进制字节流传输,并依赖CRC16校验保证数据完整性。实际调试中,工程师常面临ASCII与Hex转换繁琐、CRC计算易出错、通用串口助手协议解析薄弱等痛点。本文基于VB.net与WinForms,介绍如何构建一款轻量级16进制串口调试工具,涵盖串口参数配置、16进制数据收发、CRC16自动校验、定时轮询等核心功能。通过解析典型Modbus RTU报文,分享字节序、异步接收线程、异常排查等工程实践。该工
中国对外贸易概论试卷.doc
中国对外贸易概论试卷.doc
中国对外贸易概论作业2.doc
中国对外贸易概论作业2.doc
中国对外贸易概论含答案.doc
中国对外贸易概论含答案.doc


单片机/工控
