完善资料让更多小伙伴认识你，还能领取20积分哦， 立即完善>
3天内不再提示
|
你这个难度不大 建议你看下VB串口通讯部分就可以了！
|
|
|
|
|
|
接收发送，，我用单片机串口助手，虚拟串口+Proteus 可以通，但单片机发送的16进制数，怎么变成我想要显示的数据，这个不会搞。VB太不熟悉了。。 |
|
|
|
|
|
vb那头要把接收到的数据进行转换的！ FORM1 添加一个TEXT控件，一个MSCOMM控件！ Private Sub Command3_Click() MSComm1.InBufferCount = 0 '...清空输入寄存器 Text1.Text = "" End Sub Private Sub Form_Load() MSComm1.CommPort = 6 '...使用Com1口根据自己的串口来设置 MSComm1.Settings = "9600,n,8,1" '...设置通讯参数 MSComm1.PortOpen = True '...打开串口 MSComm1.RThreshold = 1 MSComm1.InBufferCount = 0 '...清空输入寄存器 End Sub Private Sub MSComm1_OnComm() Select Case MSComm1.CommEvent Case comEvReceive '...有接受事件发生 Dim indata As Variant Dim bte(0) As Byte indata = MSComm1.Input bte(0) = AscB(indata)'数据换换 Text1.Text = Text1.Text & bte(0) & " " 'MSComm1.InBufferCount = 0 '...清空输入寄存器 End Select End Sub 按照这个写应该没问题的！ |
|
|
|
|
|
|
|
|
|
|
你正在撰写答案
如果你是对答案或其他答案精选点评或询问，请使用“评论”功能。
265 浏览 0 评论
【原创】【RA4M2-SENSOR开发板评测】低功耗+USB综合测试
789 浏览 0 评论
1306 浏览 2 评论
787 浏览 0 评论
【RA4M2-SENSOR开发板评测】Analogue+Timers综合测试
1587 浏览 0 评论
【youyeetoo X1 windows 开发板体验】少儿AI智能STEAM积木平台
16899 浏览 31 评论
/9 
关注我们的微信
下载发烧友APP
电子发烧友观察
版权所有 © 湖南华秋数字科技有限公司
电子发烧友 （电路图） 湘公网安备 43011202000918 号 电信与信息服务业务经营许可证：合字B2-20210191
工商网监
湘ICP备2023018690号
3548
评论
淘帖
5457
