久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 3116|回復: 0
打印 上一主題 下一主題
收起左側

vb與51單片機通信若干問題

[復制鏈接]
跳轉到指定樓層
樓主
最近在搞一個車庫上位機的,用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[i];         //串口發送標志位,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

車庫上位機.png (12.25 KB, 下載次數: 162)

車庫上位機

車庫上位機
分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板: 99精品视频在线 | 久久av资源网 | 亚洲免费在线 | 国产一区中文 | 日韩久久精品 | 成人欧美一区二区三区黑人孕妇 | 男女下面一进一出网站 | 欧美视频二区 | 免费国产一区二区视频 | 国产在线色 | 情侣av | www.精品一区 | 午夜精品久久久 | 国产一区 | 亚洲欧美一区二区在线观看 | 韩国精品在线观看 | 理论片午午伦夜理片影院 | 精品国产一区二区国模嫣然 | 亚洲一区二区在线视频 | 亚洲精品v日韩精品 | 日本欧美在线视频 | 国产精品美女www爽爽爽 | 国产一区久久 | 国产免费观看一级国产 | 99久久免费精品国产男女高不卡 | 亚洲成人福利在线观看 | 中文字幕免费中文 | 午夜精品一区二区三区免费视频 | 国产成人免费视频 | 蜜桃久久 | 国产成人区 | 国产999精品久久久久久绿帽 | 天天躁日日躁狠狠躁2018小说 | 午夜欧美一区二区三区在线播放 | 国产精品乱码一区二三区小蝌蚪 | 免费黄色片视频 | 96久久久久久 | 欧美激情综合网 | 精品视频在线免费观看 | 视频一区在线播放 | 中文无码日韩欧 |