搜索
bottom↓
回复: 8

VB与51单片机串口通信若干问题

[复制链接]

出0入0汤圆

发表于 2014-2-6 12:03:24 | 显示全部楼层 |阅读模式
本帖最后由 scau_zening 于 2014-2-6 12:47 编辑

最近在搞一个车库上位机的,用VB编写。上位机界面如图:

问题1:当单片机P21脚检测到低电平时,通过串口,发送“si ”,在上位机对应位置显示“是”,表示车已经进库。
因为我的这道检测程序是放在while(1)里面的,单片机不断检测,当P21为0时,单片机不断发送“si ”,而上位机对应位置则
交替显示“是”和"否"(默认),而我只想要第一次接收到的“si ”,从而当P21=0时,只能显示"是",怎么解决。以下是部分程序:
VB:Dim rec As String
Select Case MSComm1.CommEvent
Case comEvReceive
rec = MSComm1.Input
51: while(1)
         {
                 if(miso==0)
                {
                        for(i=0;i<3;i++)
                        {
                                SBUF=table1;         //串口发送标志位,table1[]="si "
                                while(!TI);
                                TI=0;
                        }
        //        miso=1;//已经进库则清除标志
                }
               
        }
问题2:我想只有当按了路线1按钮后,并且rec=“si ”时,text1.text="是";当按了路线2按钮时,并且rec="si "时,text2.text="是"
怎么编程?以下是我的一个程序:
Private Sub Command1_Click()
MSComm1.OutBufferCount = 0
MSComm1.Output = Chr(&HC)
a = 1
'If rec = "si " Then
'Text1.Text = "是"
'End If
End Sub

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

阿莫论坛20周年了!感谢大家的支持与爱护!!

曾经有一段真挚的爱情摆在我的面前,我没有珍惜,现在想起来,还好我没有珍惜……

出0入0汤圆

发表于 2014-2-6 12:03:25 | 显示全部楼层
提点小建议给楼主(如有冒犯我道歉^^): 建议楼主还是先去学习一些比较基础的东西在来搞这个吧,不然你的系统就算最后能用了,也会问题多多的

出0入0汤圆

 楼主| 发表于 2014-2-6 13:24:57 | 显示全部楼层
renpeng009 发表于 2014-2-6 13:08
第一个很好解决,电平发生反转时发,不反转不发
第二个不就是“与”吗? ...

1.当P21=0时,上位机是可以显示“是”的,但由于是while里面的,所以单片机不断向上位机发送“si ”,所以过一会儿“是”变成“否”了,怎么保证第一个“是”
2.我发现,这“按下按钮”和“接收到rec="si "两个事件很难“与”,因为总是不同时间发生的

出0入0汤圆

发表于 2014-2-6 16:10:12 | 显示全部楼层
设定若干的标志位,并且设立一定的设置和清除的条件

出0入8汤圆

发表于 2014-2-6 16:23:09 来自手机 | 显示全部楼层
同意楼上,楼主的逻辑分析能力有待提高

出0入0汤圆

发表于 2014-2-6 16:29:49 | 显示全部楼层
推荐看一些算法上的书,这里有一些非常好的C的书籍 http://www.amobbs.com/thread-5565958-1-1.html,在基础方面C和VB是类似的,或者说搞嵌入式的人更推荐学C

出0入0汤圆

发表于 2014-2-6 18:38:10 | 显示全部楼层
这个应该不难吧。我没怎么理解楼主的意思。

出0入0汤圆

发表于 2014-2-6 21:21:19 | 显示全部楼层
可惜没有弄懂楼主的意思,爱莫能助了

出0入0汤圆

 楼主| 发表于 2014-2-7 20:22:52 | 显示全部楼层
magiczero 发表于 2014-2-6 12:03
提点小建议给楼主(如有冒犯我道歉^^): 建议楼主还是先去学习一些比较基础的东西在来搞这个吧,不然你的系 ...

问题解决了。。。是串口中断引起的,不过我的VB确实有待提高。
回帖提示: 反政府言论将被立即封锁ID 在按“提交”前,请自问一下:我这样表达会给举报吗,会给自己惹麻烦吗? 另外:尽量不要使用Mark、顶等没有意义的回复。不得大量使用大字体和彩色字。【本论坛不允许直接上传手机拍摄图片,浪费大家下载带宽和论坛服务器空间,请压缩后(图片小于1兆)才上传。压缩方法可以在微信里面发给自己(不要勾选“原图),然后下载,就能得到压缩后的图片。注意:要连续压缩2次才能满足要求!!】。另外,手机版只能上传图片,要上传附件需要切换到电脑版(不需要使用电脑,手机上切换到电脑版就行,页面底部)。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

手机版|Archiver|amobbs.com 阿莫电子技术论坛 ( 粤ICP备2022115958号, 版权所有:东莞阿莫电子贸易商行 创办于2004年 (公安交互式论坛备案:44190002001997 ) )

GMT+8, 2024-8-26 02:14

© Since 2004 www.amobbs.com, 原www.ourdev.cn, 原www.ouravr.com

快速回复 返回顶部 返回列表