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

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 3209|回復: 0
收起左側

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

[復制鏈接]
ID:58768 發表于 2014-2-6 12:19 | 顯示全部樓層 |閱讀模式
最近在搞一個車庫上位機的,用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

車庫上位機

車庫上位機
回復

使用道具 舉報

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

本版積分規則

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

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板: 日韩在线视频一区 | 国产高清视频在线观看播放 | 日韩精品专区在线影院重磅 | 精品久久久久久久久久久久 | 中文字幕蜜臀 | 色网站在线| 日韩免费在线观看视频 | 天堂亚洲| 久久av一区 | 久久精品99 | 91成人免费电影 | 黑人巨大精品欧美一区二区一视频 | 羞羞视频免费观 | 国产精品久久av | 精品国产免费一区二区三区演员表 | 日日夜夜免费精品视频 | 精品国产一区二区在线 | av在线一区二区三区 | 国产欧美精品一区二区色综合 | 成人av影院 | 99久久婷婷国产亚洲终合精品 | 国产精品久久国产精品99 | 国产伦一区二区三区四区 | 国产精品99 | 欧美精品久久久 | 天天射天天干 | 精品一区二区三区日本 | 国产成人一区二区 | 国产农村妇女毛片精品久久麻豆 | 国产高清精品一区二区三区 | 成人精品国产 | 成人免费视频在线观看 | 亚洲三级在线观看 | av天天看| 欧美精品中文字幕久久二区 | 涩爱av一区二区三区 | 国产精品久久久久久久久久久久久 | 最近中文字幕第一页 | 日韩国产一区二区三区 | 亚洲精品一 | 成人免费视频 |