基于单片机与VB汽车尾灯设计报告样本

课程设计(论文)设计课题：基于单片机汽车尾灯控制学校院系：海南师范大学物电学院专业：10电子一班学生姓名：学号：指引教师：摘要本次课题是基于单片机汽车尾灯控制器，该设计课题重要由STC89C52RC单片机为核心展开汽车尾灯控制电路设计办法，用发光二极管模仿汽车尾灯，可以用VB上位机界面和按键开关作为转弯等控制信号，，并且把信息显示在LCD1602上。在VB6.0环境下，上位机运用MSCOMM通信控件与单片机之间串口通信实现上位机控制汽车尾灯。设计电路能较好综合运用咱们所学习到单片机、C语言、VB上位机编程，熟悉电子电路设计基本办法。核心词：STC89C52RC；发光二极管；单片机；C语言；VB上位机；MSCOMM控件引言 3一·设计任务 31.1任务阐明 31.2任务分析 3二·设计方案选取及论证 42.1方案一：采用555定期器等构成汽车尾灯电路 42.2方案二：由STC89C52RC及其外围电路构成汽车尾灯控制器 42.3方案比较和选取 42.4系统框图 5三·系统硬件原理简介 73.1单片机STC89C52RC简介 73.2LCD1602液晶屏简介 83.3 系统构造原理图、器件选取 93.4硬件电路总原理图 143.5硬件设计原理及状态图 14四．程序流程 154.1下位机软件程序 154.1.1键盘扫程序设计流程图 154.2.1显示程序设计流程图 174.2VB上位机界面设计 184.2.1设计方案原理与设计特点分析 18五·仿真图实物调试 205.1仿真图 205.2实物图 21六·课设总结 21参照文献 22附录一 23引言汽车作为当代交通工具已经大量进入人们生活，随着电子技术发展，对于汽车控制电路也已经从过去全人工开关控制发展到了智能化控制。汽车尾灯控制器是随着汽车智能化技术发展而迅速发展起来，汽车尾灯普通基于微解决器硬件电路构造构成，而正由于硬件电路局限性，不能随意更改电路功能和性能，且可靠性得不到保证，因而对汽车尾灯控制系统发展带来局限性，难以满足当代智能化规定。本次设计是基于单片机汽车尾灯控制器，用发光二极管模仿汽车尾灯，用VB上位机和按键开关作为汽车转弯等控制信号，实现汽车尾灯智能化控制。一·设计任务1.1任务阐明本次课题重要是以STC89C52RC为核心单片机控制电路，它重要模仿了汽车尾灯系统正常行驶、转弯、刹车、倒车、夜间行驶等状态下发光状况，实现了汽车尾灯控制智能化。1.2任务分析设计一种基于单片机汽车尾灯控制器，其详细设计规定如下：1）汽车白天正常行驶时批示灯全灭；

2）汽车右(左)转弯时，先后最右（左）边和右（左）侧那个批示灯亮并闪烁；3）汽车暂时刹车时车尾灯所有亮；

4）汽车倒车时尾灯中间4个批示灯亮；

5）汽车夜间行驶时，车前灯全亮，尾灯两边各中间灯亮；6）可通过串口连接PC控制车尾灯（自己发挥某些）；二·设计方案选取及论证2.1方案一：采用555定期器等构成汽车尾灯电路采用译码器74LS138、计数器74LS161、脉冲产生器555、开光控制电路、显示驱动电路、发光二极管以及各种逻辑元件等构成汽车尾灯控制电路。由于汽车左右转弯时，四个批示灯循环点亮，因此用四进制计数器控制译码器电路顺序输出低电平，从而控制尾灯按规定点亮，达到模仿汽车转弯、刹车、正常行驶等状态。由于行车时都是开关控制，因此每一种开关都应当有一种消除机械振动装置，可以用基本SR触发器来实现。2.2方案二：由STC89C52RC及其外围电路构成汽车尾灯控制器 STC89C52RC是一种低功耗、高性能CMOS8位微控制器，具备8K在系统可编程Flash存储器。 本次单片机控制系统以STC89C52RC为控制器，键盘为输入信号，由于STC89C52RC自身功能强大，汽车转弯灯驱动用单片机驱动功能来完毕。使得单片机功能得到了充分运用；并且显示电路从并行I/O口输出，由限流电阻和发光二极管构成，低电平使发光二极管导通，显示出相应信号灯亮灭状况，实现了左转、右转、刹车、应急灯各种状态下控制效果。2.3方案比较和选取方案一中，要使用各种控制电路，实现办法繁杂且不灵活，成本高，搭建好电路后调试起来不以便，不可以任意定义各种状态，电路可靠性以及可扩展性不高，且与本次课题所规定运用知识相悖，因而不适当使用此方案。方案二中，以单片机为核心，而单片机编程比较直接，且可重复擦除修改，硬件电路搭建以便简朴。搭建好电路后通过STC89C52RC来编写程序，控制LED亮灭，大大简化了系统构造，减少材料成本，提高系统先进性和可靠性，能实现控制器智能化。由于采用此种办法开发系统其升级和改进较为以便，因而本次课题选用方案二。采用串口连接笔记本电脑，通过VB上位机控制LED亮灭，实现真正意义上智能化控制。发光二极管显示电路STC89C52RC2.4系统框图发光二极管显示电路STC89C52RC时钟电路时钟电路1602液晶屏显示电路1602液晶屏显示电路复位电路复位电路PC电脑上位机按键电路串口电路MAX232PC电脑上位机按键电路串口电路MAX232图2.4.1系统构造框图 整个系统涉及电源电路、时钟电路、复位电路、按键电路、发光二极管显示电路、液晶屏显示电路、串口电路、单片机、PC上位机等。其中重要由按键电路和PC上位机发出控制信号，由显示电路显示信号详细状态。三·系统硬件原理简介3.1单片机STC89C52RC简介图3.1.1STC89C52RC引脚图（1）STC89C52RC某些引脚功能简介：1、VCC：STC89C52RC电源正端输入，接+5V。2、VSS：电源地端。3、XTAL1：单芯片系统时钟反相放大器输入端。4、XTAL2：系统时钟反相放大器输出端，普通在设计上只要在XTAL1和XTAL2上接上一只石英振荡晶体系统就可以动作了，此外可以在两引脚与地之间加入一20PF小电容，可以使系统更稳定，避免噪声干扰而死机。5、RESET：STC89C52RC重置引脚，高电平动作，当要对晶片重置时，只要对此引脚电平提高至高电平并保持两个机器周期以上时间，AT89S51便能完毕系统重置各项动作，使得内部特殊功能寄存器之内容均被设成已知状态，并且至地址0000H处开始读入程序代码而执行程序。3.2LCD1602液晶屏简介1602LCD重要技术参数：显示容量:16×2个字符芯片工作电压:4.5—5.5V工作电流:2.0mA(5.0V)模块最佳工作电压:5.0V字符尺寸:2.95×4.35(W×H)mm引脚功能阐明：1602LCD采用原则14脚（无背光）或16脚（带背光）接口，各引脚接口阐明如表10-13所示:编号符号引脚阐明编号符号引脚阐明1VSS电源地9D2数据2VDD电源正极10D3数据3VL液晶显示偏压11D4数据4RS数据/命令选取12D5数据5R/W读/写选取13D6数据6E使能信号14D7数据7D0数据15BLA背光源正极8D1数据16BLK背光源负极表10-13：引脚接口阐明表第1脚：VSS为地电源。第2脚：VDD接5V正电源。第3脚：VL为液晶显示屏对比度调节端，接正电源时对比度最弱，接地时对比度最高，对比度过高时会产生“鬼影”，使用时可以通过一种10K电位器调节对比度。第4脚：RS为寄存器选取，高电平时选取数据寄存器、低电平时选取指令寄存器。第5脚：R/W为读写信号线，高电平时进行读操作，低电平时进行写操作。当RS和R/W共同为低电平时可以写入指令或者显示地址，当RS为低电平R/W为高电平时可以读忙信号，当RS为高电平R/W为低电平时可以写入数据。第6脚：E端为使能端，当E端由高电平跳变成低电平时，液晶模块执行命令。第7～14脚：D0～D7为8位双向数据线。第15脚：背光源正极。第16脚：背光源负极。系统构造原理图、器件选取（1）电源电路图3.3 电源电路可以给单片机提供工作所需电源，有批示灯提示，灯亮时表达提供正常工作电压。（2）时钟电路 图3.3.2 时钟电路中使用12M晶振，为单片机提供系统时钟。（3）复位电路图3.3 复位电路是单片机能上电复位，当程序混乱跑飞时可以通过按键手动复位。（4）按键电路图3.3 按键电路可以通过按键来模仿汽车转弯、刹车、应急等各种状态，控制LED和液晶屏显示。（5）发光二极管显示电路图3.3 发光二极管可以模仿汽车车灯，显示各种控制信号效果。（6）液晶屏显示电路图3.3液晶屏显示电路可以直观显示出汽车行进状态，增长尾灯系统可视性。（7）串口电路为了使单片机内电平与计算机电平同样需要运用电平转换，MAX232芯片是专为RS232原则串口设计单电源点平转换芯片。其特点如下：1）符合所有RS232技术原则；2）只需要单一+5V电源供电；3）片载电荷泵具备升压、电压极性反转能力，可以产生+10V和-10V电压；4)功耗低，典型供电电流5mA；5)内部集成2个RS-232C驱动器；6)高集成度，片外最低只需4个电容即可工作；7)连接方式如图5所示。图5串口连接3.4硬件电路总原理图图3.4.1总原理图 硬件总原理分解如3.3.1~3.3.6各图所示，完整实现了汽车尾灯控制，用按键模仿控制信号，用发光二极管和液晶屏显示状态，达到所有指标。3.5硬件设计原理及状态图本次由按键作为控制信号，发光二极管模仿汽车尾灯，状态表如下所示：驾驶操作输出信号LED1LED2LED3LED4LED5LED6LED7LED8左转灭灭闪烁灭灭灭灭灭右转灭灭灭闪烁灭灭灭灭刹车亮亮亮亮亮亮亮亮正常行驶亮亮灭灭亮亮灭灭夜间行驶亮亮灭灭灭灭亮亮倒车行驶灭灭灭灭亮亮亮亮 本次课题重要以STC89C52RC为核心展开汽车尾灯控制器，通过原理仿真以及实物制作，完整实现了汽车尾灯智能化控制效果，相比此前用数字逻辑电路原理打成汽车尾灯更以便、更简朴。制作出实物板有6个控制状态按键，可以搭配起来控制6种汽车行驶状态，完美模仿了汽车尾灯控制系统，完毕本次课题所有指标。四．程序流程4.1下位机软件程序4.1.1键盘扫程序设计流程图键扫程序过程为：开始时，先判断与否有键闭合，无键闭合时，返回继续判断，有键闭合时，先去抖动，然后拟定与否有键按下，若无键按下，则返回继续判断与否有键闭合，若有键按下，则判断键号，然后释放，若释放按键完毕，则返回，若没有释放按键，则返回继续释放。其流程图如图所示。软件设计思路，程序开始后进入初始化，然后扫描键盘等待有键按下。如果没有键按下则始终扫描，如果有键按下，则判断是哪个键，如果为1键，则正常行驶；为2键，则右转；为3键，则左车；为4键，则应急状态；为5键，则倒车行驶；为6键，则夜间行驶。YYN开始有键闭合否？去抖动确有键按下判断按键释放LED状态返回YNYN图4.3.1软件流程图4.2.1显示程序设计流程图NNYN与否返回LCD初始化显示汉ACSII码显示开始显示字符相应功能设立送地址送数据NN相应功能设立送行地址和列地址送数据与否YY图4.2.1显示程序流程图显示程序过程为：显示开始时，先进行LCD初始化，判断与否显示中文或ACSII码或图形，若不显示，则返回，若显示是中文或ACSII码，则进行相应功能设立，然后送地址和数据，再判断与否显示完,显示完则返回，没有显示完则继续送地址，若显示是图形，则先进行相应功能设立，再送行地址和列地址，然后送数据，最后判断与否显示完，显示完则返回，没有显示完则继续送行地址和列地址。其流程图如图7所示。（1）在编写液晶屏显示程序时，发现液晶屏只能瞬间显示状态，而不能保持，因而在液晶显示程序后要加上一种延时，使液晶屏可以保持状态； （2）要使发光二极管闪烁可以通过指令让其取反，但是在编写程序时，只能取反一次，一次可以使用一种while函数，当没有按键时候发光二极管始终取反，且在程序里加上恰当延时； （3）在使发光二极管闪烁时，如果前一种状态中正在使用改二极管，则切换状态后，每个灯管闪烁时间不同步，因而在让其闪烁之前先令所有二极管保持同一种状态；4.2VB上位机界面设计4.2.1设计方案原理与设计特点分析（1）IO控制系统原理框图：单片机上位机控制软件单片机上位机控制软件 发送数据将PC机和单片机通过RS232连接，通过上位机软件可以向单片机发送数据来测试两者通讯状态，同步单片机也可以向上位机软件返回数据，以显示当前通信状态与否正常。以及用上位机软件控制单片机上批示灯工作。从而实现简朴IO控制系统。（2）上位机软件（3）通信合同本通信系统使用了一种简朴通信合同，就是每当向单片机发送一种特定字符串时，单片机在接受到字符串时会向上位机软件反馈一条信息，来表白上位机软件和硬件与否正常通信，制定通信合同时需要指定端标语，核心代码如下：MSComm1.CommPort=“”MSComm1.InputMode=“”MSComm1.RThreshold=“”MSComm1.SThreshold=“”MSComm1.Settings=""MSComm1.PortOpen=“”VB上位机界面通过合同控制车灯智能开关。五·仿真图实物调试5.1仿真图5.2实物图6课设总结本次课设作品重要元件为STC89C52RC，在其控制下保证了系统正常工作，达到模仿汽车尾灯控制效果，实现汽车尾灯智能化控制。两周课程设计，相较于之前所选修各种实验课程，本次更增长了自己动手实践能力。理论与实践还是有一定差距，在理论上不论多精准数据，一旦用于实际中，就不得不考虑其仪器，器件误差，以及自己操作上能力。并且，在课设过程中添加了自己思考，该选取如何电阻、电容，想要修改最后输出，应当在什么地方做变化。虽然是某些很基本东西，但仅仅是书上理论学习，会让人对知识遗忘得比较快，相反，通过自己动手实践过东西，会更加记忆深刻。看着自己成功制作出来电路板觉得很有成就感。通过这次课设教我还学会诸多关于电子产品知识。进一步结识了咱们现实生活电子产品，理解和掌握了某些简朴电子元件运用，大大扩展了咱们知识面。提高了自己后来在学习生活中自己动手能力。给咱们很大启发，很有助于咱们将来学习生活和工作。在查阅资料中，获得了许多额外知识，开拓视野。在原理图设计、使用proteus仿真、使用Altium绘制、实物制作、板子调试等整个过程中加强了咱们分析问题和解决问题能力，深刻体味到实践是检查真理唯一原则这一道理。综上所述，这次课设，让咱们受益匪浅。参照文献[1]李广弟，朱月秀，王秀山.单片机基本［M］.北京：航空航天大学出版社，.[2]康华光，陈大钦.电子技术基本模仿某些[M].武汉：高等教诲出版社，1998.[3]谢自美.电子线路设计·实验·测试（第二版）.武汉：华中理工出版社，.[4]戴佳.51单片机C语言应用程序设计实例精讲[M].电子工业出版社，.[5]徐爱钧，彭秀华。KeilCx51V7.0单片机高档语言编程与μVision2应用实践[M].北京：电子工业出版社，.附录一单片机源程序：#include<reg52.h>#include<intrins.h>#defineucharunsignedchar#defineunitunsignedintsbitKEY1=P1^0;sbitKEY2=P1^1;sbitKEY3=P1^2;sbitKEY4=P1^3;sbitKEY5=P1^4;sbitKEY6=P1^5;sbitLED1=P2^0;sbitLED2=P2^1;sbitLED3=P2^2;sbitLED4=P2^3;sbitLED5=P2^4;sbitLED6=P2^5;sbitLED7=P2^6;sbitLED8=P2^7; sbitLCD_RS=P3^4；sbitLCD_RW=P3^5;sbitLCD_EN=P3^6;voiddelay(unitt);voiddelay1(intms);#definedelayNOP()；{_nop_();_nop_();_nop_();_nop_();};voiddelay(unitt) //延时程序； {uniti,j;for(i=0;i<t;i++)for(j=0;j<120;j++);}/**********************************************************/voiddelay1(intms){unsignedchary;while(ms--){for(y=0；y<250；y++){_nop_();_nop_();_nop_();_nop_();}}}ucharcodecdis1[]={"Daytime"};ucharcodecdis2[]={"stop"};ucharcodecdis3[]={"left"};ucharcodecdis4[]={"right"};ucharcodecdis5[]={"Astern"};ucharcodecdis6[]={"night"};ucharcodecdis7[]={"happyeveryday"};//ucharcodecdis11[]={"Daytime"};//ucharcodecdis21[]={"stop"};//ucharcodecdis31[]={"left"};//ucharcodecdis41[]={"right"};//ucharcodecdis51[]={"Astern"};//ucharcodecdis61[]={"night"};ucharcodecdis71[]={"MyControl"};/*******************************************************************//**//*检查LCD忙状态*//*lcd_busy为1时，忙，等待。lcd-busy为0时,闲，可写指令与数据。*//**//*******************************************************************/bitlcd_busy(){bitresult;LCD_RS=0;LCD_RW=1;LCD_EN=1;delayNOP();result=(bit)(P0&0x80);LCD_EN=0;return(result)；}/*******************************************************************//**//*写指令数据到LCD*//*RS=L，RW=L，E=高脉冲，D0-D7=指令码。*//**//*******************************************************************/voidlcd_wcmd(ucharcmd){while(lcd_busy());LCD_RS=0;LCD_RW=0;LCD_EN=0;_nop_();_nop_()；P0=cmd;delayNOP();LCD_EN=1;delayNOP();LCD_EN=0；}/*******************************************************************//**//*写显示数据到LCD*//*RS=H，RW=L，E=高脉冲，D0-D7=数据。*//**//*******************************************************************/voidlcd_wdat(uchardat){while(lcd_busy());LCD_RS=1;LCD_RW=0;LCD_EN=0;P0=dat;delayNOP();LCD_EN=1;delayNOP();LCD_EN=0；}/*******************************************************************//**//*LCD初始化设定*//**//*******************************************************************/voidlcd_init(){delay1(15)；lcd_wcmd(0x38)；//16*2显示，5*7点阵，8位数据delay1(5);lcd_wcmd(0x38)；delay1(5);lcd_wcmd(0x38)；delay1(5);lcd_wcmd(0x0c)；//显示开，关光标delay1(5);lcd_wcmd(0x06)；//移动光标delay1(5);lcd_wcmd(0x01)；//清除LCD显示内容delay1(5);}/*******************************************************************//**//*设定显示位置*//**//*******************************************************************/voidlcd_pos(ucharpos){lcd_wcmd(pos|0x80)；//数据指针=80+地址变量}/*******************************************************************/voidinitUART(void)//串口必要作如下初始化，才干正常工作。{TMOD=0x20；//M1=1,M0=0定期器1工作方式2（定期常数重装，8位）SCON=0x50；//SM0=0,SM1=1,REN=1串口工作方式1，容许接受TH1=0xfd；//晶振11.0592时，波特率9600TL1=0xfd；//TL1计数，溢出后，TH1值送入TL1EA=1；//开总中断ES=1；//容许串口中断TR1=1；//启动定期器1}voidmain(void){ucharm；P1=0x00;P2=0xff;P0=0;delay1(10);//延时lcd_init()；//初始化LCDlcd_pos(0)；//设立显示位置为第一行第1个字符for(m=0;m<16;m++)lcd_wdat(cdis7[m]); initUART();//lcd_pos(0x40)；//设立显示位置为第二行第1个字符//for(m=0;m<16;m++)//lcd_wdat(cdis2[m]);while(1){lcd_pos(0)；//设立显示位置为第一行第1个字符for(m=0;m<16;m++)lcd_wdat(cdis7[m]);//白天正常行驶批示灯全灭if(KEY1==1){delay(10);if(KEY1==1){P2=0xff;lcd_pos(0x40);for(m=0;m<16;m++)lcd_wdat(cdis1[m]);}}//汽车右转；亮并且闪if(KEY2==1){delay(10);if(KEY2==1){ P2=0xff；while(1){LED3=~LED3;delay(100);lcd_pos(0x40);for(m=0;m<16;m++)lcd_wdat(cdis4[m])；if(KEY4==1||KEY3==1||KEY1==1||KEY5==1||KEY6==1)break;} }}//汽车左转；亮并且闪if(KEY3==1){delay(10);if(KEY3==1){P2=0xff;while(1){LED4=~LED4;delay(100);lcd_pos(0x40);for(m=0;m<16;m++)lcd_wdat(cdis3[m]);if(KEY4==1||KEY2==1||KEY1==1||KEY5==1||KEY6==1) break;} }}//汽车暂时刹车所有亮if(KEY4==1){delay(10);if(KEY4==1){P2=0x00;lcd_pos(0x40);for(m=0;m<16;m++)lcd_wdat(cdis2[m]);}}//汽车倒车；中间四个灯亮if(KEY5==1){delay(10);if(KEY5==1){P2=0xff;delay(1);LED5=0;LED6=0；LED7=0;LED8=0; LED1=0; LED2=0;lcd_pos(0x40);for(m=0;m<16;m++)lcd_wdat(cdis5[m]);}}//汽车夜间行驶车前灯全亮。尾灯两边中间灯亮if(KEY6==1){delay(10);if(KEY6==1){P2=0xff;delay(1);LED1=0;LED2=0；LED5=0;LED6=0;lcd_pos(0x40);for(m=0;m<16;m++)lcd_wdat(cdis6[m]); } }}}voidUARTinterrupt(void)interrupt4{ucharm;lcd_pos(0)；//设立显示位置为第一行第1个字符for(m=0;m<16;m++)lcd_wdat(cdis71[m]);if(RI){RI=0;while(1){if(SBUF=='1') //单引号内表达ASCII码//白天正常行驶批示灯全灭{P2=0xff;lcd_pos(0x40);for(m=0;m<16;m++)lcd_wdat(cdis1[m]);if(SBUF=='2'||SBUF=='3'||SBUF=='4'||SBUF=='5'||SBUF=='6'||KEY4==1||KEY3==1||KEY1==1||KEY5==1||KEY6==1||KEY2==1)break;}elseif(SBUF=='2')//汽车右转；亮并且闪 {if(SBUF=='1'||SBUF=='3'||SBUF=='4'||SBUF=='5'||SBUF=='6'||KEY4==1||KEY3==1||KEY1==1||KEY5==1||KEY6==1||KEY2==1) while(1);{P2=0xff;delay(100); P2=0xfb; delay(100)； lcd_pos(0x40);for(m=0;m<16;m++)lcd_wdat(cdis4[m])；// break; } break;}elseif(SBUF=='3')//汽车左转；亮并且闪 {if(SBUF=='1'||SBUF=='2'||SBUF=='4'||SBUF=='5'||SBUF=='6'||KEY4==1||KEY3==1||KEY1==1||KEY5==1||KEY6==1||KEY2==1) while(1);{P2=0xff;delay(100); P2=0xf7; delay(100)； lcd_pos(0x40);for(m=0;m<16;m++)lcd_wdat(cdis3[m])；// break; } break;}elseif(SBUF=='4') //汽车暂时刹车所有亮{P2=0x00; lcd_pos(0x40);for(m=0;m<16;m++) lcd_wdat(cdis2[m]); if(SBUF=='1'||SBUF=='3'||SBUF=='2'||SBUF=='5'||SBUF=='6'||KEY4==1||KEY3==1||KEY1==1||KEY5==1||KEY6==1||KEY2==1) break;} elseif(SBUF=='5') //汽车倒车；中间四个灯亮{P2=0xff; delay(1);LED5=0;LED6=0；LED7=0;LED8=0; LED1=0; LED2=0;lcd_pos(0x40);for(m=0;m<16;m++) lcd_wdat(cdis5[m]);if(SBUF=='1'||SBUF=='3'||SBUF=='4'||SBUF=='2'||SBUF=='6'||KEY4==1||KEY3==1||KEY1==1||KEY5==1||KEY6==1||KEY2==1) break;} elseif(SBUF=='6') //汽车夜间行驶车前灯全亮。尾灯两边中间灯亮{P2=0xff;delay(1);LED1=0;LED2=0；LED5=0;LED6=0;lcd_pos(0x40);for(m=0;m<16;m++)lcd_wdat(cdis6[m]);if(SBUF=='1'||SBUF=='3'||SBUF=='4'||SBUF=='5'||SBUF=='2'||KEY4==1||KEY3==1||KEY1==1||KEY5==1||KEY6==1||KEY2==1) break;} elseTI=0;}} }Vb上位机程序PrivateSubCheck3_Click()IfMSComm1.PortOpen=TrueThenIfCheck3.Value=1ThenCheck1.Caption="尾灯控制"ElseCheck3.Caption="按键控制"EndIfElseMsgBox"请打开串口"""EndIfEndSubPrivateSubCommand1_Click()MSComm1.Output="1"Check1.Value=0Check2.Value=0Shape2.FillColor=vbRedShape3.FillColor=vbBlackShape4.FillColor=vbBlackShape5.FillColor=vbBlackShape6.FillColor=vbBlackShape7.FillColor=vbBlackEndSubPrivateSubCommand10_Click()EndEndSubPrivateSubCommand2_Click()MSComm1.Output="6"Check1.Value=0Check2.Value=0Shape7.FillColor=vbRedShape3.FillColor=vbBlackShape4.FillColor=vbBlackShape5.FillColor=vbBlackShape6.FillColor=vbBlackShape2.FillColor=vbBlackEndSubPrivateSubCommand3_Click()Check1.Value=1Check2.Value=0Shape3.FillColor=vbRedShape2.FillColor=vbBlackShape4.FillColor=vbBlackShape5.FillColor=vbBlackShape6.FillColor=vbBlackShape7.FillColor=vbBlackE