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

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

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

VB控制單片機LED的方法詳解

[復制鏈接]
跳轉到指定樓層
樓主
ID:483075 發表于 2019-3-2 10:17 | 只看該作者 回帖獎勵 |正序瀏覽 |閱讀模式
試了一下VB上微機控制LED,很簡單的VB上位機。上位機默認使用COM4,單片機P1^0口接LED,點按鍵就可以控制LED。

VB上位機默認使用COM4,單片機P1^0口接LED,點擊按鍵就可以控制LED了


工程構建



實驗效果



單片機程序 :

#include <reg52.h>

void UartInit(void)
{
              SCON |= 0x50 ;
              PCON  = 0x00 ;
              TMOD |= 0x20 ;
              TH1   = 0xfd ;                            /*11.0592MHZ,9600kps*/
              TL1   = 0xfd ;
              TR1   = 1 ;
              ES    = 1;
              EA    = 1 ;
}


void main(void)
{
              UartInit();
              while(1);
}

void UartISR(void) interrupt 4
{
              if(TI)
              {
                            TI = 0 ;
              }
              if(RI)
              {
                            RI = 0 ;
                            P1 = SBUF ;
              }
}


上位機程序 :

Private Sub Form_Load()
  Form1.WindowState = 2 '界面設置為最大
  Command1.Caption = "點亮LED"
  Command2.Caption = "熄滅LED"
  MSComm1.CommPort = 4
  MSComm1.PortOpen = True
End Sub
Private Sub Command1_Click()            '點亮
    MSComm1.Output = Chr(1 & vbCr)

End Sub

Private Sub Command2_Click()        '熄滅
    MSComm1.Output = Chr(0 & vbCr)
End Sub
因為VB程序中已經固定了COM口,所以可以設置電腦COM為4,如果不為COM4,則按照下圖設置


完整的Word格式文檔51黑下載地址:
VB控制單片機LED.doc (472.5 KB, 下載次數: 58)

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

使用道具 舉報

6#
ID:278457 發表于 2021-12-16 05:25 | 只看該作者
你程序位子都放錯了,main主程序里面才有低八位和高八位的,把模式打開,總開關打開.
回復

使用道具 舉報

5#
ID:403450 發表于 2020-5-18 16:10 | 只看該作者
樓主這個是需要單片機的實物板子嗎?
回復

使用道具 舉報

地板
ID:504173 發表于 2019-4-3 16:20 | 只看該作者
我按上位機的命令輸入的,為啥會編譯錯誤呢,過程聲明與同名事件或過程的描述不匹是啥原因
回復

使用道具 舉報

板凳
ID:245288 發表于 2019-3-24 08:06 | 只看該作者
我按上位機的命令輸入的,為啥會編譯錯誤呢,過程聲明與同名事件或過程的描述不匹是啥原因
回復

使用道具 舉報

沙發
ID:245288 發表于 2019-3-24 07:59 | 只看該作者
我按上位機的命令輸入的,為啥會編譯錯誤呢,過程聲明與同名事件或過程的描述不匹配
回復

使用道具 舉報

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

本版積分規則

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

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板: 国产精品av在线 | 日韩一级在线观看 | 欧美视频在线一区 | 夜夜草视频 | 国产美女精品 | 国产黄a三级三级看三级 | 免费三片在线播放 | 美女福利网站 | 免费毛片基地 | 69av在线播放 | 国产福利小视频 | 午夜久久精品 | 日韩中文字幕第一页 | 欧美日韩一区二区三区四区 | 少妇av在线| 羞羞网站入口 | 成年网站在线观看 | 欧美色图一区二区三区 | 久久久午夜 | 国产一区不卡 | 一区二区三区在线观看视频 | 好吊视频一区二区三区 | 久久国产一区二区 | 性久久久久 | 一区二区三区不卡视频 | 久草资源网 | 精品久久一区二区三区 | 国产精品视频免费看 | 日韩视频一区二区三区 | 久久久久久久97 | 中文字幕免费av | 三级黄色片网站 | 欧美在线视频观看 | 99久久久国产精品 | 久久这里只有精品6 | 成人动漫一区二区 | 视色网| 一区二区三区高清 | 欧美一级二级三级 | 91精品亚洲| 福利在线观看 |