VB控制单片机LED之最简单上位机

概述这里分享一下自己写的VB上微机控制LED，这已经是最简单的VB上位机了 VB上位机默认使用COM4，单片机P1^0口接LED，点击按键就可以控制LED了 工程构建 实验效果 单片机程序 ： #include <reg52.h>void UartInit(void){ SCON |= 0x50 ; PCON = 0x00 ; TMOD |= 0x20 ; TH1 = 0xfd ;

这里分享一下自己写的VB上微机控制LED，这已经是最简单的VB上位机了

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 = TrueEnd SubPrivate Sub Command1_Click()            '点亮    MSComm1.Output = Chr(1 & vbCr)    End SubPrivate Sub Command2_Click()        '熄灭    MSComm1.Output = Chr(0 & vbCr)End Sub

因为VB程序中已经固定了COM口，所以可以设置电脑COM为4，如果不为COM4，则按照下图设置

总结

以上是内存溢出为你收集整理的VB控制单片机LED之最简单上位机全部内容，希望文章能够帮你解决VB控制单片机LED之最简单上位机所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。