串口通信实验报告
《串口通信实验报告》由会员分享,可在线阅读,更多相关《串口通信实验报告(4页珍藏版)》请在装配图网上搜索。
1、VB串口通信实验1实验要求:设计一个串口通信程序,用于信息的接收和发送2实验目的:2.1熟悉并掌握串口标准及原理;2.2实现PC机与PC机之间通过串口进行数据的收发;3.3熟悉VB语言编写程序的环境,用VB开发串口通信程序3实验步骤:3.1运行VB程序,出现“新建工程”对话框,选择“标准EXE”,单击“打开”命令按钮,进入VB工程集成开发环境;3.2 添加串口通信控件MSComm到工具箱中;3.3界面设计(1)添加两个文本框控件:Text1 和Text2,用于输入要发送的字符和显示要接收的字符;(2)添加两个标签控件:Label1和Label2,作为发送和接收字符区的标签;(3)添加一个按钮控
2、件:Command1执行发送字符命令;(4)添加一个MSComm控件。3.4属性设置窗体控件控 件 类 型主 要 属 性功 能Form(名称) = COMForm窗体控件BorderStyle = 3运行时窗体固定大小Caption = PC与PC串口通信窗体标题栏显示程序名称标签控件1Label(名称) = Label1标签控件Caption = 显示接收字符区:标签文本标签控件2Label(名称) = Label2标签控件Caption = 输入发送字符区:标签文本文本框控件1TextBox(名称) = Textsend文本框控件MultiLine = True允许多行显示ScrollBa
3、rs = 2-Vertical垂直滚动条可用文本框控件2TextBox(名称) = TextReceive文本框控件MultiLine = True允许多行显示ScrollBars = 2-Vertical垂直滚动条可用按钮控件CommandButton(名称) = Cmdsend按钮控件Caption = 发送字符 手动发送字符串口通信控件MSComm(名称) = MSComm1串口通信控件其他属性在程序中设置3.5程序代码设计Private Sub Form_Load() MSComm1.CommPort = 1 MSComm1.Settings = 9600,n,8,1 MSComm1.
4、InputMode = 0 MSComm1.RThreshold = 1 MSComm1.PortOpen = True End SubPrivate Sub Cmdsend_Click() If Textsend.Text = Then pp = MsgBox(发送的数据不能为空!, 16) Exit Sub End If MSComm1.Output = Trim(Textsend.Text)End SubPrivate Sub MSComm1_OnComm() Dim buf$ Select Case MSComm1.CommEvent Case comEvCD Case comEvCT
5、S Case comEvDSR Case comEvReceive buf = Trim(MSComm1.Input) Case comEvSend End Select TextReceive.Text = TextReceive.Text & bufEnd SubPrivate Sub Cmdquit_Click() Unload MeEnd SubPrivate Sub Form_Unload(Cancel As Integer) MSComm1.PortOpen = FalseEnd Sub3.5程序运行截图图1 主界面图2 发送信息图3 接收信息4.实验总结本次实验是利用VB实现计算机与计算机之间的串口通信,经过翻阅资料,对本实验所需要的知识都掌握好。通过实验,我也进一步发现了自己动手能力和自学能力都得到很多的进步,同时也对串口的发送与接收信息有了进一步的了解。
- 温馨提示:
1: 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
2: 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
3.本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
5. 装配图网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。