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

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 3084|回復: 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 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板: 玖玖视频网| 欧美国产精品一区二区三区 | 欧美视频中文字幕 | 在线不卡 | 久久久久欧美 | 国产精品一码二码三码在线 | 亚洲 中文 欧美 | 午夜视频在线播放 | 久久999| 日韩欧美在线一区 | 久久久久国产一区二区 | 欧美网址在线观看 | 成人在线视频网站 | 午夜天堂精品久久久久 | 精品1区2区3区 | 久久人体视频 | 精品视频免费 | 亚洲精品99999 | 中文字幕精品视频 | 亚洲香蕉在线视频 | 91看片在线观看 | 狠狠操电影 | 亚洲精品一区二区 | 国产高清视频在线 | 一级免费毛片 | 成人伊人| 欧美一区二区三区 | 99re在线视频 | 美女三区| 免费在线精品视频 | 亚洲国产精品久久久 | 久久免费视频2 | 精品久久成人 | 亚洲美女网站 | 亚洲人成人一区二区在线观看 | 亚洲一区二区av | h视频在线播放 | 91久久久久久久久 | 一区二区电影网 | 性一爱一乱一交一视频 | 欧美日韩高清 |