
vb 单片机上位机
用vb上位机通过RS232控制单片机的管脚所接的led,用16进制发送,可是我所做的程序始终无法通过,另外看网上有说还可以用2进制发送,这个又如何实现呢?代码基本如下:P...
用vb上位机通过RS232控制单片机的管脚所接的led,用16进制发送,可是我所做的程序始终无法通过,另外看网上有说还可以用2进制发送,这个又如何实现呢?
代码基本如下:
Private sub command1_click()
dim buf as string
buf=text1.text
buf=hex(buf) '代码始终在此无法通过
Mscomm1.output=buf
希望指正出这段程序中的错误,并给出正确答案 展开
代码基本如下:
Private sub command1_click()
dim buf as string
buf=text1.text
buf=hex(buf) '代码始终在此无法通过
Mscomm1.output=buf
希望指正出这段程序中的错误,并给出正确答案 展开
3个回答
展开全部
不熟悉VB,但是就串口编程来说,不管什么进制都是一样的。都能够发送到。
然后就是RS232的通讯的设定等等要注意,不然肯定不能成功的。你可以先在网上下一个串口助手试试,先检查单片机侧有没有问题。串口助手很多,不用我多介绍。
第二步如果要调试vb的程序可以用自发自收的方法,也就是RS232的2号脚和3号脚短接。确认vb程序的正确性。
还有就是你没有说清楚程序通不过到底是编译通不过,还是达不到理想的结果。
然后就是RS232的通讯的设定等等要注意,不然肯定不能成功的。你可以先在网上下一个串口助手试试,先检查单片机侧有没有问题。串口助手很多,不用我多介绍。
第二步如果要调试vb的程序可以用自发自收的方法,也就是RS232的2号脚和3号脚短接。确认vb程序的正确性。
还有就是你没有说清楚程序通不过到底是编译通不过,还是达不到理想的结果。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
buf=hex(buf) '代码始终在此无法通过
1、去掉 前端、后端的 空格
2、buf=text1.text 多余,去掉
Dim buf As String
'buf = Text1.Text
buf = Hex(Text1.Text)
3、注意:Text1.Text 里的 字符 必须是 0-9 . ,就是能转换为16进制数的,其他的 hex 函数 肯定出错!
其实,VB 调试 很简单的,同时,安装 MSDN,有问题 查 help
祝你顺利
1、去掉 前端、后端的 空格
2、buf=text1.text 多余,去掉
Dim buf As String
'buf = Text1.Text
buf = Hex(Text1.Text)
3、注意:Text1.Text 里的 字符 必须是 0-9 . ,就是能转换为16进制数的,其他的 hex 函数 肯定出错!
其实,VB 调试 很简单的,同时,安装 MSDN,有问题 查 help
祝你顺利
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
将buf定义成变体型 vairant 试试
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询