用VB来实现单片机与PC之间通信.docVIP

VB入门中 最简单入门教程 基于VB单片机与PC通信 目的和要求 掌握利用VB软件制做出通信界面； 掌握在VB中添加程序并能够写出发送数据的程序； 掌握单片机串行口通信原理； 掌握单片机接受串行口通信数据程序； 二、设备 1、Keilc51软件及电脑一台； 2、89C51单片机开发板一块； 3、Microsoft Visual Basic 6.0软件； 三、实验内容 本次课程设计就是利用Microsoft Visual Basic 6.0软件制作一个通信界面在界面上添加三个按钮，当按第一个按钮时单片机上的LED灯正转，当按第二个按钮时单片机上的LED灯反转，当按第三个按钮时单片机上的LED灯闪烁。单片机能正确接受并显示。 四、原理 串口是计算机上一种非常通用设备通信的协议（不要与通用串行总线Universal Serial Bus或者USB混淆）。大多数计算机包含两个基于RS232的串口。串口同时也是仪器仪表设备通用的通信协议；很多GPIB兼容的设备也带有RS-232口。同时，串口通信协议也可以用于获取远程采集设备的数据。?串口通信的概念非常简单，串口按位（bit）发送和接收字节。尽管比按字节（byte）的并行通信慢，但是串口可以在使用一根线发送数据的同时用另一根线接收数据。它很简单并且能够实现远距离通信。比如IEEE488定义并行通行状态时，规定设备线总常不得超过20米，并且任意两个设备间的长度不得超过2米；而对于串口而言，长度可达1200米。?五、步骤 在桌面上启动Microsoft Visual Basic 6.0软件 弹出对话框，点击标准EXE确定。 添加串口控件 点击工程-部件-Microsoft Comm control 6.0 即可 会在左方的工具栏出现该工具，双击此工具会在form1中出现。 初始化串口 双击form1中的空白区域 添加程序 MSComm1.Settings = 9600,n,8,1 MSComm1.CommPort = 4 MSComm1.PortOpen = True MSComm1.RThreshold = 1 MSComm1.CommPort 取决你使用的串行口，在设备管理器中查看。 添加命令按钮并添加程序 双击左方工具栏commnd button添加三个按钮 在右下方的属性框中caption中更改名称；双击按钮添加程序。分别在三个按钮中添加。 MSComm1.Output = 1 MSComm1.Output = 2 MSComm1.Output = 3 运行 烧录单片机接收程序 #includereg51.h unsigned char flag; unsigned char w,i; unsigned int j; void main() { TMOD=0x20; TH1=0xfd; TL1=0xfd; TR1=1; SCON=0x50; PCON=0x00; EA=1; ES=1; while(1); } void ser() interrupt 4 { RI=0; flag=SBUF; if(flag==1) { w=0xfe; for(i=0;i8;i++) { w=~((~w)i); P1=w; for(j=0;j10000;j++); } } else if(flag==2) { w=0x7f; for(i=0;i8;i++) { w=~((~w)i); P1=w; for(j=0;j10000;j++); } } else if(flag==3) { P1=0xff; for(j=0;j10000;j++); P1=0x00; for(j=0;j10000;j++); } } 注：波特率9600,； 使用的I/O口：P1口接LED灯； 连接调试 将单片机通过串口线和PC相连，通过调试优化，即可实现。 六、感想 七、参考书目 09电子科学与技术本一班 吴帆