MSComm串行通讯控件设置 串口、波特率等参数方法

修改稿收到日期： <!!A?!@?<<
+ )* 中 ,-.&// 控 件 的 常 用 属 性
（ +） .&//0&12 。 设 置 或 返 回 通 讯 端 口 号 。 格 式 为 ： ［ 4 0&1256/781 ］。在 设 计 时 ， ,-.&//3.&//0&12 0&1256/781 可 以 设 置 成 从 + 到 +9 的 任 何 数 （ 缺 省 值 为 + ）。 但 是 如 果 用 0&12:;8$ 属 性 打 开 一 个 并 不 存 在 的 端 口 时 ， 就 会 产 生 错 误 ， 还 需 注 意 的 是 必 须 在 打 开 端 口 之 前 设 置 .&//0&12 属 性 。例 如 ： 即 设 置 当 前 端 口 为 .:, ,-.&//3.&//0&12 4 < ，
< 口。
（ <） 以字符串形式设置或返回波特率、 奇偶校 -822#$=( 。 验、数据位和停止位。格式为： ,-.&//3-822#$=(［ 40>1>-? 第一部分是 21#$= ］。0>1>-21#$= 是 一 个 包 含 四 部 分 的 字 符 串 ： 波 特 率 设 置 ， 其 可 选 值 为 ++! ， @!! ， 9!! ， +<!! ， <A!! ， AB!! ， 一 般 选 定 C9!! ； 第二部分是奇偶 C9!! ， +AA!! ， +C<!! ， <BB!! ， 校验设置， 5 表示不校验， D 表示偶校验， : 表示奇校验， 表示空格检验， 一 般 设 定 为 5； 第三部分 , 表示符号校验， 是数据位位数设置， 其 可 选 值 为 A， 一 般 选 定 B； 第 E， 9， F， B， 四部分是停止位位数设置， 其 可 选 值 为 +， 一般选定 +3E ， <，

VB6.0下用MSComm控件实现串口通信MSComm控件通过串行端口传输和接收数据，为应用程序提供串行通讯功能，以下先对其属性进行详细的说明后再举一个例子进行说明：1基本属性CommPortO mPort[=value]Object为MSComm控件，value为整数值，标志端口号。

说明：该属性设置并返回通讯端口号，value的值可以设为1-16间的任意数(默认为1)。

在打开端口之前必须先设置CommPort属性，当端口不存在时，如果用PortOpen属性打开它，MSComm控件会产生错误68(即设备无效的错误)。

SettingsObjiect.Setting[=value]Object为MSComm控件，value为字符串类型，表示通讯端口的设置值。

说明：本属性用来设置并返回端口的波特率、奇偶校验位、数据位和停止位参数。

当端口打开时，如果指定的value参数非法，则MSComm控件产生380号(非法属性值)错误。

有效的value参数值由四个设置值组成，有如下格式：“BBBB,P,D,S”，其中BBBB为波特率，P为奇偶校验，D为数据位数，S为停止位数。

Value的默认值为：“9600,N,8,1”，下面给出合法的波特率、奇偶校验位、数据位和停止位参数：波特率：110，300，600，1200，2400，4800，9600(默认)，14400，19200，28800，38400，56000，57600，115200，128000，256000。

奇偶校验值：E(偶校验，Even)、M(标记，Mark)、N(默认，Default，None)、O(奇校验，Odd)、S(空格，Space)。

数据位值：4，5，6，7，8(默认)，9。

停止位值：1(默认)，1.5，2。

PortOpenO bject.PortOpen[=value]Object为MSComm控件。

Value为布尔类型，表明通讯端口的状态。

vb串口通信控件-mscommMSComm控件提供了两种处理通信的方式：一种为事件驱动方式，该方式相当于一般程序设计中的中断方式。

当串口发生事件或错误时，MSComm控件会产生OnComm事件，用户程序可以捕获该事件进行相应处理。

本文的两个例子均采用该方式。

另一种为查询方式，在用户程序中设计定时或不定时查询 MSComm控件的某些属性是否发生变化，从而确定相应处理。

在程序空闲时间较多时可以采用该方式。

常用属性和方法利用MSComm控件实现计算机通信的关键是理解并正确设置MSComm控件众多属性和方法。

以下是MSComm控件的常用属性和方法：●Commport：设置或返回串口号。

●Settings：以字符串的形式设置或返回串口通信参数。

●Portopen：设置或返回串口状态。

●InputMode：设置或返回接收数据的类型。

●Inputlen：设置或返回一次从接收缓冲区中读取字节数。

●InBufferSize：设置或返回接收缓冲区的大小，缺省值为1024字节。

●InBufferCount：设置或返回接收缓冲区中等待计算机接收的字符数。

●Input：从接收缓冲区中读取数据并清空该缓冲区，该属性设计时无效，运行时只读。

●OutBufferSize：设置或返回发送缓冲区的大小，缺省值为512字节。

●OutBufferCount：设置或返回发送缓冲区中等待计算机发送的字符数。

●Output：向发送缓冲区发送数据，该属性设计时无效，运行时只读。

●Rthreshold：该属性为一阀值。

当接收缓冲区中字符数达到该值时，MSComm控件设置Commevent属性为ComEvReceive，并产生OnComm事件。

用户可在OnComm事件处理程序中进行相应处理。

若Rthreshold属性设置为0，则不产生OnComm事件。

例如用户希望接收缓冲区中达到一个字符就接收一个字符，可将Rthreshold设置为1。

这样接收缓冲区中接收到一个字符，就产生一次OnComm事件。

使用VB中的MSm控件实现RS-232串口通信实验准备：需要准备一些与串口通信有关的设备，如〔外置式〕调制解调器、计算机串口与调制解调器的连接线、一根DTE到DTE的无调制解调器连接线〔接法见本章有关习题的参考答案〕，在实验前检查计算机的两个串口是否能够正常工作。

实验环境：Windows 95/98操作系统，Microsoft VB 5.0以上程序设计环境。

对例题中涉及调制解调器的容，采用计算机与调制解调器连接的方式；对在例题中设计数据传输的容，须事先将DTE到DTE 的无调制解调器连接线的两端，分别插入1和2串口。

实验说明：VB中的MSm控件通过串行端口传输和接收数据，为应用程序提供串行通讯功能。

MSm控件提供以下两种处理通讯的方式：〔1〕事件驱动(实时)方式，这是处理串行端口交互作用的一种非常有效的方法。

在许多情况下，在事件发生时需要得到通知，例如，在Carrier Detect〔CD〕或RequestToSend〔RTS〕线上一个字符到达或一个变化发生时。

在这些清况下，可以利用MSm 控件的Onm事件捕获并处理这些通讯事件。

Onm事件还可以检查和处理通讯错误。

〔2〕轮询方式，在程序的每个关键功能之后，可以通过检查mEvent 属性的值来查询事件和错误。

如果应用程序较小，并且是自保持的，这种方法可能是更可取的。

例如，如果写一个简单的拨号程序，则没有必要对每接收一个字符都产生事件，因为唯一等待接收的字符是调制解调器的"OK〞响应。

每个使用的MSm控件都对应着一个串行端口。

如果应用程序需要访问多个串行端口，必须使用多个MSm控件。

可以在Windows"控制面板〞中改变端口地址和中断地址。

下面这个简单的例子采用了轮询方法演示了用调制解调器进展根本的串行通讯：Private Sub Form_Load〔〕Dim Instring As String '保存输入子串的缓冲区MSm1.mPort=3 '使用3。

第12章 VB应用12．1 MSComm控件可以通过它对计算机的RS-23串行通信口进行读写操作1.主要属性设置：（1）CommPort属性：设置通信端口，一般计算机上1－2个RS-232口，由此属性指定使用哪个口，设定其值为1则表示使用1端口。

（2）Settings 属性：默认值“9600,n,8,1”。

9600——波特率n ——效验方式。

“n”不效验8 ——数据位1 ——停止位（3）Sthreshold 属性：设置要返回多少个字符才发生MSComm1_OnComm事件2.两台计算机串行通信的硬件接线A计算机的串口2脚（发送）——B计算机的串口3脚（接收）A计算机的串口3脚（接收）——B计算机的串口2脚（发送）A计算机的串口5脚（地）——B计算机的串口5脚（地）1.读写操作Private Sub Command1_Click() '发送MSComm1.Output = Text1.TextEnd SubPrivate Sub Command2_Click() '清空1Text1.Text = ""End SubPrivate Sub Command3_Click() '发送Text2.Text = MSComm1.InputEnd SubPrivate Sub Command4_Click() '清空2Text2.Text = ""End SubPrivate Sub Form_Load()MSComm1.PortOpen = TrueEnd Sub4.应用MSComm1_OnComm事件自动接收设置Sthreshold 属性为1，当有一个及以上字符进入串行口，发生MSComm1_OnComm事件。

Private Sub MSComm1_OnComm()Text2.Text = Text2.Text + MSComm1.InputEnd Sub。

vc 使用mscomm控件实现串口通讯2009-07-07 08:34mscomm控件是微软发布的串口通讯控件,可以被多种开发工具使用,本章简单介绍vc环境下该控件的使用情况.1、控件的装载。

新建一个mfc工程，选择project-add to project-components and controls打开components and controls gallery对话框，双击 registered actives controls ，做出如下图的选择：点插入按钮后，就可把把该控件安装到controls面板上，同时创建串口类，我们从controls面板上把该控件添加到应用程序对话框就可以使用该控件设计通讯程序了。

2、初始化并打开串口。

m_ctrlComm.SetCommPort(1); //选择串口1if(!m_ctrlComm.GetPortOpen())//如果串口没有打开，则打开串口m_ctrlComm.SetPortOpen(TRUE);m_ctrlComm.SetSettings("38400,n,8,1");//波特率38400，无校验，8个数据位，1个停止位m_ctrlComm.SetInputMode(1);//以二进制方法检取数据m_ctrlComm.SetRThreshold(1);//参数为1表示当串口接收缓冲区有多于或等于1个字符时，将出发一个//接收数据的OnComm事件m_ctrlComm.SetInputLen(0);//设置当前接收缓冲区的数据长度为0m_ctrlComm.GetInput();//先预读缓冲区以清除残留数据3、串口关闭。

m_ctrlComm.SetPortOpen(FALSE);4、数据发送strSendFrame = "10 40 01 41 16 ";CStringToCByteArray(strSendFrame,cbaSendBuf);//转换为字节流cbaLastSendFrameBuf.Copy(cbaSendBuf);ucLastSendCtlCode = cbaSendBuf[1];pView->m_ctrlComm.SetOutput((COleVariant)cbaSendBuf);//串口发送5、数据接收响应mscomm控件的oncomm事件处理接收到的数据。

VB6.0环境下利用Mscomm控件实现串行通信Use Mscomm Control Component to Implement Serial Communication under Visual Basic摘要: 本文简要介绍了VB6.0中Mscomm通信控件的属性和使用方法，并结合具体实例给出了基本的通信程序。

主题词：串行通信Visual Basic Mscomm .vbx控件Abstract: This paper briefly introduces the principle and method of Mscomm object of Visual basic 6.0, and with a real example basic program codes are given.Key Words：Serial Communication; Visual Basic; Mscomm .vbx control component随着计算机技术的飞速发展及其广泛应用，远程控制以及数据采集系统多采用上位机和下位机的主从工作方式，由于串行通信具有高效可靠、价格便宜，遵循统一的标准等特点，因而成为主要的通信手段。

微机的分析处理能力较强，有很好的人机界面和大容量的多种存储方式，所以上位机一般采用微机。

而单片机具有价格低，功能强，抗干扰能力好，温限宽和面向控制等特点，所以下位机采用单片机来构成主从式多机工作模式。

在需要对采集的数据进行分析处理或在远程需要对控制对象的控制过程进行统计或有条件控制时，采用数据库访问技术能有效地解决这类问题。

Visual Basic 6.0以其强大的功能、使用简单、能在短时间内开发出高效的通信程序而成为Windows系统开发的主要编程语言。

首先表现在VB可直接使用户自定义控件VBX或OCX文件；其次表现在VB可通过调用动态链接库（DLL，dynamic link library）来加快应用程序关键部分的执行速度。

C#串口通信：MSComm控件使用详解目次MSComm 控件两种处理通讯的方式CommPort 属性RThreshold 属性CTSHolding 属性SThreshold 属性CDHolding 属性DSRHolding 属性Settings 属性InputLen 属性EOFEnable 属性Handshake 常数OnComm 常数InputMode 常数错误消息MSComm 控件通过串行端口传输和接收数据，为应用程序提供串行通讯功能。

MSComm控件在串口编程时非常方便，程序员不必去花时间去了解较为复杂的API函数，而且在VC、VB、Delphi 等语言中均可使用。

Microsoft Communications Control（以下简称MSComm）是Microsoft公司提供的简化Windows下串行通信编程的ActiveX控件，它为应用程序提供了通过串行接口收发数据的简便方法。

具体的来说，它提供了两种处理通信问题的方法：一是事件驱动(Event－driven)方法，一是查询法。

1.MSComm控件两种处理通讯的方式MSComm控件提供下列两种处理通讯的方式：事件驱动方式和查询方式。

1.1 事件驱动方式事件驱动通讯是处理串行端口交互作用的一种非常有效的方法。

在许多情况下，在事件发生时需要得到通知，例如，在串口接收缓冲区中有字符，或者Carrier Detect (CD) 或Request To Send (RTS) 线上一个字符到达或一个变化发生时。

在这些情况下，可以利用MSComm 控件的OnComm 事件捕获并处理这些通讯事件。

OnComm 事件还可以检查和处理通讯错误。

所有通讯事件和通讯错误的列表，参阅CommEvent 属性。

在编程过程中，就可以在OnComm事件处理函数中加入自己的处理代码。

这种方法的优点是程序响应及时，可靠性高。

每个MSComm 控件对应着一个串行端口。

如果应用程序需要访问多个串行端口，必须使用多个MSComm 控件。

MSComm控件使用详解2008-04-06 19:15:39| 分类：Windows编程|举报|字号订阅MSComm控件使用详解MSComm控件的常用属性1.MSComm1.Settings:=’9600,n,8,1’; //设置波特率,校验位,数据位,停止位Settings属性: 设置串口的波特率,校验位,数据位,停止位, ’9600,n,8,1’表示波特率为9600,无奇偶校验,数据位为8为,1位停止位MSComm1.InBufferSize:=1024; // 接受缓冲区大小InBufferSize 属性:接收缓冲区的大小,默认值为1024,也可以自己设定,比如, MSComm1.InBufferSize:=2000,则接收缓冲区的大小为2000字节MSComm1.OutBufferSize:=1024; // 发送缓冲区大小OutBufferSize属性:发送缓冲区的大小,默认值为1024,也可以自己设定,比如,MSComm1.OutBufferSize:=2000,则发送缓冲区的大小为2000字节MSComm1.InBufferCount:=0; //清空接受缓冲区InBufferCount属性:当前接收缓冲区接收到的数据的长度, count:=MSComm1.InBufferCount,则count值就是接收缓冲区接收到的数据的长度,对InBufferCount 赋值MSComm1.InBufferCount:=0,可以清空接受缓冲区MSComm1.OutBufferCount:=0; //清空发送缓冲区OutBufferCount属性:当前发送缓冲区中数据的长度,对OutBufferCount 赋值MSComm1. OutBufferCount:=0,可以清空发送缓冲区MSComm1.InputMode:=comInputModeText;// 以文本方式取回数据MSComm1.InputMode:=comInputModeBinary; //设置接收数据模式为二进制形式InputMode属性:串口接收数据的模式, comInputModeText(0)表示以文本(ASCII)方式取回数据,comInputModeBinary(1)表示以二进制方式取回数据comInputModeText, comInputModeBinary为预定义常量,分别表示0,1 RcvByte:=MSComm1.InputInput属性:通过Input属性可以读取串口中接收到的数据,RcvByte:=MSComm1.Input表示读取串口接收到的数据,其中RcvByte的数据类型为: array of Byte 或array of Variant.在读取之前先设置RcvByte的长度:SetLength(RcvByte,len),如果一次读取所有数据,则SetLength(RcvByte, MSComm1.InBufferCount)MSComm1.Output:= OutputDatOutput属性:通过Output属性可以发送数据, MSComm1.Output:=OutputDat,则将OutputDat中的数据发送出去,其中OutputDat数据类型为array of Byte,发送前要设置OutputDat的长度, SetLength(OutputDat,len),然后向OutputDat中填入数据,再清空发送缓冲区MSComm1.OutBufferCount:=0,然后再发送MSComm1.Output:=OutputDatMSComm1.InputLen:=0;////////////// 一次读取所有数据/////////InputLen属性:一次从Input属性中读取数据的长度, MSComm1.InputLen:=1,表示一次读取一个字节,如果MSComm1.InputLen:=0,则表示一次读取全部数据MSComm1.SThreshold:=0;//一次发送所有数据,发送数据时不产生OnComm 事件SThreshold属性:通过该属性设置产生OnComm 事件(发送时产生)的阀值,若MSComm1.SThreshold:=0, 则一次发送所有数据,发送数据时不产生OnComm 事件, 若MSComm1.SThreshold:=5,当发送缓冲区的字节数从5字节减少到4字节时, 产生OnComm 事件MSComm1.RThreshold:=1;//////////// 每接收1个字节就产生一个OnComm 事件RThreshold属性: 通过该属性设置产生OnComm 事件(接收时产生)的阀值,若MSComm1.RThreshold:=0,不产生OnComm 事件,若MSComm1.RThreshold:=5,接收缓冲区每收到5字节时,则产生OnComm 事件MSComm1.PortOpen:=True; //打开串口PortOpen属性:设置端口的打开与关闭,打开端口MSComm1.PortOpen:=True,关闭端口MSComm1.PortOpen:=FalsemPort:=CommPort;CommPort属性:设置端口号, mPort:=1, 设置端口号为COM1CommEvent属性: 常用的两个comEvReceive, comEvSendOnComm 常数常数值描述comEvSend 1 发送事件。

现有电子秤一台，使用串口与计算机进行通讯。

编写VB程序来访问串口，达到读取电子秤上显示的数据。

该电子秤为BE01型仪表，输出为RS-232C标准接口，波特率为300-9600、偶校验、7个数据位、2个停止位。

所有字符现有电子秤一台，使用串口与计算机进行通讯。

编写VB程序来访问串口，达到读取电子秤上显示的数据。

该电子秤为BE01型仪表，输出为RS-232C标准接口，波特率为300-9600、偶校验、7个数据位、2个停止位。

所有字符均发送11位ASCII码，一个起始位。

在VB中与串口通讯需要引入控件MSComm串口通讯控件（在Microsoft Comm Control 6.0中）。

具体程序如下：控件简称：MSCDim Out(12) As Byte '接收var中的值Dim var As Variant '接收MSC.input中的数值Dim nRece As Integer '计算MSC.inputbuffer的个数Dim i As Integer, j As Integer '随即变量，计算循环************************************************************************** **Private Sub Form_Load()ClearTextWith MSC.CommPort = 1 '设置Com1为通信端口.Settings = "9600,E,7,2" '设置通信端口参数 9600赫兹、偶校验、7个数据位、2个停止位.（这里需要进一步说明的是：.Setting=”BBBB,P,D,S”。

含义是：B：Baud Rate（波特率）；P：Parity（奇偶）；D：Data Bit；S：Stop Bit）.InBufferSize = 40 '设置缓冲区接收数据为40字节.InputLen = 1 '设置Input一次从接收缓冲读取字节数为1.RThreshold = 1 '设置接收一个字节就产生OnComm事件End WithEnd Sub************************************************************************** **Private Sub ClearText()Text3.Text = ""Text2.Text = "5"Text1.Text = ""End SubPrivate Sub Command1_Click()ClearText' nRece = 0 '计数器清零With MSC.InputMode = comInputModeBinary '设置数据接收模式为二进制形式.InBufferCount = 0 '清除接收缓冲区If Not .PortOpen Then.PortOpen = True '打开通信端口End IfEnd WithEnd SubPrivate Sub MSC_OnComm()DelayTime ‘用来延续时间ClearTextWith MSCSelect Case .CommEvent '判断通信事件Case comEvReceive: '收到Rthreshold个字节产生的接收事件SwichVar 1If Out(1) = 2 Then '判断是否为数据的开始标志.RThreshold = 0 '关闭OnComm事件接收End IfDoDoEventsLoop Until .InBufferCount >= 3 '循环等待接收缓冲区>=3个字节' nRece = nRece + 1For i = 2 To 12SwichVar iText1.Text = Text1.Text & Chr(Out(i))NextText1.Text = LTrim(Text1.Text)Text2.Text = Text2.Text & CStr(nRece).RThreshold = 1 '打开MSComm事件接收Case Else' .PortOpen = FalseEnd SelectEnd WithEnd Sub************************************************************************** **Private Sub DelayTime()Dim bDT As BooleanDim sPrevious As Single, sLast As SinglebDT = TruesPrevious = Timer (Timer可以计算从子夜到现在所经过的秒数，在Microsoft Windows中，Timer函数可以返回一秒的小数部分)Do While bDTIf Timer - sPrevious >= 0.3 Then bDT = FalseLoopbDT = True（通信传输速率为9600bps，则最快速度1.04ms发送一个字节，仪表每秒发送50帧数据，每帧数据有4个字节，即每秒发送200个字节，平均5.0ms 发送一个字节，连续读取串口数据时要在程序中添加循环等待程序）Private Sub SwichVar(ByVal nNum As Integer)DelayTimevar = Nullvar = MSC.InputOut(nNum) = var(0)End Sub（设置接收数据模式采用二进制形式，即 InputMode=comInputModeBinary，但用Input 属性读取数据时，不能直接赋值给 Byte 类型变量，只能通过先赋值给一个 Variant 类型变量，返回一个二进制数据的数组，再转换保存到Byte类型数变量中。

MSComm控件进行串口编程步骤：1. 在建立的程序工程中插入MSComm控件。

2. 添加MSComm控件ID 的控制变量（或者对象）。

3. 对串口进行初始化，设置MSComm控件的属性。

4. 添加串口事件的消息处理函数OnComm（）函数，在函数中根据应用需要，编写数据处理代码5. 编写串口发送等其他代码。

6. 关闭串口。

+MSComm控件常用属性：mPort：设置并返回通信端口号2.Settings：以字符串的形式设置并返回波特率、奇偶校验、数据位、停止位3.PortOpen：设置并返回通信端口的状态。

也可以打开和关闭端口4.Input：从接收缓冲区返回和删除字符5.Output：向传输缓冲区写一个字符6.InputLen：设置并返回Input属性从接收缓冲区读取的字符数。

7.InBufferSize：设置或返回输入缓冲区的大小。

8.OutBufferSize：设置或返回输入缓冲区的大小。

9.InBufferCount：设置或返回输入缓冲区内等待读取的字节个数。

10.OutBufferCount：设置或返回输入缓冲区内等待读取的字节个数。

对MSComm控件通过Get/Set函数对来获取或设置控件的属性，每个属性均有与之对应的Get/Set函数对。

用法说明mPort：设置并返回通信端口号Void CMSComm::SetCommPort(short n); 设置串口号Short CMSComm::GetCommPort(); 查询当前串口号说明：n可以设置成1到16中的任何数（缺省值为1）。

但是，如果用PortOpen属性打开一个并不存在的端口是，MSComm控件会产生错误68（设备无效）；必须在打开端口之前设置CommPort属性。

2.Settings：以字符串的形式设置并返回波特率、奇偶校验、数据位、停止位Void CMSComm：：SetSettings（LPCTSTR lpszNewValue）；CString CMSComm：：GetSettings（）；说明：当端口打开时，如果设置值lpszNewValue非法，则MSComm控件产生错误380（非法属性值）。

MSComm控件的应用（串口编程）MSComm控件通过串行端口发送和接收数据,为应用程序提供了串行通讯功能。

在基于对话框的应用程序中加入一个MSComm控件非常简单。

只需打开“Project->AddToProject->Components and Controls->Registered Activex Controls”,然后选择控件：Microsoft Communication Control,version 6.0插入到当前的工程中。

CMS m类的相关文件 mscomm.cpp 和 mscomm.h 就加到工程中了。

从工具箱中把MSComm控件拖到对话框上，给控件关联成员变量m_Comm。

1.初始化串口，一般在OnInitDialog()函数中m_Comm.SetCommPort(1); //选择COM1m_Comm.SetInputMode(1); //设置数据通讯格式为二进制数组格式0.为文本格式//1.为二进制数组格式m_Comm.SetSettings("9600,n,8,1");//设置波特率为9600bps，无奇偶校验位，数据位8//位，停止位1位m_Comm.SetRThreshold(1); //设置为每次接到一个字节数据就触发OnComm事件m_Comm.SetInputLen(0);//设置当前接收区数据长度为0,表示全部读取波特率：110、300、600、1200、2400、4800、9600、14400、19200、28800、38400、115200 奇偶校验:E偶校验、M标号校验、N无校验、O奇校验、S空格校验数据位：4、5、6、7、8停止位：1、1.5、22.打开串口if(!m_Comm.GetPortOpen()) //如果串口是关闭的，则行打开串口{m_Comm.SetPortOpen(true);m_Comm.GetInput(); //清除串口输入缓冲区中残留数据}else{AfxMessageBox("串口打开失败!");}3.关闭串口if(m_Comm.GetPortOpen()){m_Comm.SetPortOpen(false);}4.接受数据，OnComm()函数中，数据保存在RcvData中VARIANT m_input;char *str;int len,nEvent;CString RcvData;nEvent = m_Comm.GetCommEvent();switch(nEvent){case 2:len=m_Comm.GetInBufferCount(); //接收缓冲区的字符数目if(len>0){m_input=m_Comm.GetInput();str=(char*)(unsigned char*)m_input.parray->pvData;}*(str+len) = '\0’;RcvData.Format("%s", str);}5.发送数据，把str数据发送出去int i,Count;Count=str.GetLength();CByteArray m_Array;m_Array.RemoveAll();m_Array.SetSize(Count);for(i=0;i<Count;i++)｛m_Array.SetAt(i,str[i]);｝m_Comm.SetOutput(COleVariant(m_Array));。

在数据采集系统中，常采用PC机作上位机和单片机作下位机的主从工作方式，本文使用VB6.0中的通信控件Microsoft Communication Control（简称MSComm），对其属性和事件进行相应编程操作，以实现PC机的RS232串行接口和单片机AT89S51的异步串行通信接口之间的相互通信。

Commport：设置通讯所占用的串口号。

表示对Com1进行操作。

设置或返回串行端口号，其取值范围为1—99，默认（缺省）值为（1）。

Setting：对串口通讯的相关参数。

包括串口通讯的比特率，奇偶校验，数据位长度、停止位等。

其默认值是“9600,N,8,1”，表示串口比特率是9600bit/s，不作奇偶校验，8位数据位，1个停止位。

波特率：110，300，600，1200，2400，9600（默认），14 400，19 200，28 800，38 400，（保留），56 000（保留），128 000（保留），256 000（保留）。

奇偶校验值：E（奇偶，Even），M（标记，Mark）,N(默认，Default,None),O（奇偶，Odd）,S(空格，Space).数据位值：4，5，6，7，8（默认）。

停止位值：1（默认），1.5，2。

Portopen：设置串口状态，值为True时打开串口，值为False时关闭串口。

Input：从输入寄存器读取数据，返回值为从串口读取的数据内容，同时输入寄存器将被清空。

从接收缓冲区移走一串字符；InputLen：属性用来确定被Input属性读取的字符数。

如果 InputLen 属性值设置为0，则Input属性将缓冲区中的全部的内容。

InputMode：属性确定读取的数据类型，设置从输入寄存器中读取数据的形式。

若值为0，则表示以文本形式读取；设置InputMode属性值为com InputMode-Text；值为1，则表示以二进制形式读取Input属性为com InputModeBinary,则Input属性将通过一个Variant类型值返回一个二进制数据的数组。

MSComm控件在VS2010和VC6++中是不同的，下面以VS2010中为例，说明该控件的使用：1、打开串口，并初始化void CSMommTestDlg::OnBnClickedBtn(){// TODO: 在此添加控件通知处理程序代码if (m_Comm.get_PortOpen())//如果发现串口原来是打开的，关闭串口m_Comm.put_PortOpen(FALSE);m_Comm.put_CommPort(1);//选择COM1端口m_Comm.put_InBufferSize(1024);//设置输入缓冲区大小m_Comm.put_OutBufferSize(512);//设置输出缓冲区大小m_Comm.put_Settings("9600,n,8,1");//设置波特率9600，无校验，8个数据位，1个停止位if (!m_Comm.get_PortOpen()){m_Comm.put_PortOpen(TRUE);//打开串口m_Comm.put_RThreshold(1);//每当接收缓冲区中有1个字符，则接收串口数据m_Comm.put_InputLen(0);//设置当前缓冲区长度为0m_Comm.get_Input();//预读缓冲区以清除残留数据}else{AfxMessageBox("打开端口失败！");}}2、OnComm事件处理，当接受到信息的时候会触发这一事件void CSMommTestDlg::OnCommMscomm(){// TODO: 在此处添加消息处理程序代码VARIANT variant_inp;COleSafeArray safearray_inp;CString strInput;if (m_Comm.get_CommEvent()==2)//值为2表示接收缓冲区内有字符{variant_inp=m_Comm.get_Input();//读取缓冲区消息strInput=variant_inp.bstrVal;SetDlgItemText(IDC_EDIT_RECV,strInput);}}3、发送消息void CSMommTestDlg::OnSendClickedBtn(){// TODO: 在此添加控件通知处理程序代码CString str;GetDlgItemText(IDC_EDIT_SEND,str);m_Comm.put_Output(COleVariant(str));//发送数据}。

MSComm控件实现串口通信的方法碧峰晨曦摘要：详细介绍了MSComm控件，并在VC++6.0中利用MSComm控件开发了基于对话框的串口通信实例。

关键词：串口通信，MSComm，VC++图书编号：TP3110.引言串口通信具有实现简单、价格低廉、通信稳定、数据传输可靠等优点，因而广泛应用于各种工业控制系统中。

MSComm控件是微软公司开发的专门用于串口通信的控件。

该控件为开发串口通信程序提供了更加快捷、容易的方法。

在VC++中，对控件属性的操作都是通过特定的函数来实现的，这些函数都是CMSComm类的成员函数。

当声明了一个CMSComm类对象后，就可以通过如下格式调用成员函数来访问控件属性了：<对象名>.<成员函数名>(<参数表>)或<对象名>-><成员函数名>(<参数表>)1.MSComm控件属性及事件1.1 MSComm控件属性MSComm控件有许多属性，最主要的几个属性如下：1)CommPort:设置该属性值可以获取当前程序使用的串口编号。

2)Setting:设置或者获取串行通信的通信参数(包括波特率、奇偶校验类型、数据位数及停止位数等)。

3)PortOpen:设置该属性可以打开或关闭串口。

4)Input:从接收缓冲区中返回并删除数据。

5)Output:向串口通信输出缓冲区写入数据。

6)CommEvent:当MSComm控件在运行时发生错误或产生各种事件时，向程序返回错误或事件类型。

1.2 MSComm控件的事件该控件只有一个事件，即OnComm事件。

当CommEvent属性值发生变化时就会触发OnComm事件。

根据CommEvent属性值来分别执行各种情况下的处理程序。

2 MSComm控件实例应用2.1插入MSComm控件在VC++6.0中新建一个基于对话框的工程，命名为Test。

默认情况下，VC++6.0中不会包含MSComm控件，所以需要我们手动将MSComm控件加载到VC++6.0中。

VB是Visual Basic的简称，是由美国微软公司于1991年开发的一种可视化的、面向对象和采用事件驱动方式级程序设计语言，可用于开发Windows 环境下的各类应用程序。

它简单易学、效率高，且功能强大可以与Windows 专业开发工具SDK相媲美。

在Visual Basic环境下，利用事件驱动的编程机制、新颖易用的可视化设计工具，使用Windows内部的广泛应用程序接口（API）函数，动态链接库（DLL）、对象的链接与嵌入（OLE）、开放式数据连接（ODBC）等技术，可以高效、快速地开发环境下功能强大、图形界面丰富的应用软件系统。

他的简单易学可以使我们快速实现自己想在Windows下的软件功能。

小则可以做计算器、上位机等符合自己需要的小软件；大则可以连接数据库做些管理系统，比如某公司的人事管理系统。

这里要说的是MSCOMM控件在VB中的使用方法。

MSComm 作为一个串行通讯控件为程序员串口通讯编程节省了很多时间。

在应用中加入一个MSComm控件非常简单。

在VB的常用控件里是没有MSCOMM控件的，我们可以通过工程部件勾取Microsoft comm control 6.0 来添加MSCOMM控件。

下面，让我们来了解其使用方法：1．串口通信基础知识一般悦来，计算机都有一个或多个串行端口，它们依次为com1、Com2、…，这些串口还提供了外部设备与PC进行数据传输和通信的通道。

这些串口在CPU和外设之间充当解释器的角色。

当字符数据从CPU发送给外设时，这些字符数据将被转换成串行比特流数据；当接收数据时，比特流数据被转换为字符数据传递给CPU，再进一步说，在操作系统方面，Windows用通信驱动程序（COMM.DRV）调用API函数发送和接收数据，当用通信控件或声明调用API函数时，它门由COMM. DRV解释并传递给设备驱动程序，作为一个VB程序员，要编写通信程序．只需知道通信控件提供给Windows通信AP1函数的接口即可．换句话说，只需设定和监视通信控件的属性和事件即可。

免费的图析VC++6.0中使用mscomm串口控件东南大学计算机学院杨全胜按下列图所示建立一个基于对话框的MFC程序这样就得到了下图所示的界面：右键点击sport的对话框界面，在弹出的菜单中选择属性，打开下面的属性对话框：建立下图所示的对话框控件：各控件属性如下：下面再做第二个对话框——配置对话框右键点击下图左边的Dialog，在弹出的菜单中选择Insert Dialog这样就得到下图鼠标右键点击上图右边的对话框，在弹出的菜单中选择属性，并建立下列属性：建立下图的各种控件：其中“串口号“、”波特率“、“数据位”、“停止位”、“奇偶位”字样都是static Text控件，如“串口号：”文字的控件属性为：这些文字的下拉框都是Combo Box控件，他们的属性为：下面右键点击工具栏的空白处，在打开的菜单中选择“定制窗口…”,在下面的定制对话框中查看分类里将下面的两个按钮移动到某个菜难栏中，其中左上的那个按钮是”类生成“按钮。

设置好后，左键点击刚才的“串口配置”对话框，然后再点击“类生成”按钮。

出现下面的对话框点击OK后出现下面对话框，按下面图填好点击Change按钮，按下图来设置Change Files对话框按OK后得到下面的对话框这样得到新的类如下图：双击下图IDC_COMN控件，按下图设置其成员变量：得到下图的结果使用上述方法建立下列控件的成员函数下面我们来将mscomm控件加进项目：在sportDlg.h中加入MSComm控件：#include "mscomm.h"protected:CMSComm m_ComPort;public:CSportDlg(CWnd* pParent = NULL); // standard constructorint m_baund;int m_comn;int m_databit;int m_jiaoyan;int m_stopbit;在CSportDlg::OnInitDialog()中：DWORD style=WS_VISIBLE|WS_CHILD;if (!m_ComPort.Create( NULL,style,CRect(0,0,0,0),this,ID_COMMCTRL)){TRACE0("Failed to create OLE Communications Control\n");return -1;// fail to create}m_baund = 2; // 配置窗口参数初始化m_comn = 0;m_databit = 3;m_jiaoyan = 0;m_stopbit = 0;// 缺省的串口初始化m_ComPort.SetCommPort(1); // 选择串口号m_ComPort.SetInBufferSize(1024); //接收缓冲区m_ComPort.SetOutBufferSize(1024);//发送缓冲区m_ComPort.SetInputLen(0);//设置当前接收区数据长度为0,表示全部读取m_ComPort.SetInputMode(1);//以二进制方式读写数据m_ComPort.SetRThreshold(1);//接收缓冲区有大于等于1个字符时，将引发接收数据的OnCommMscomm事件m_ComPort.SetSettings("9600,n,8,1"); //设置波特率等参数if(!m_ComPort.GetPortOpen()) //打开串口m_ComPort.SetPortOpen(TRUE);elsem_ComPort.SetOutBufferCount(0);按照下列图为“配置”按钮添加功能函数：双击BN_CLICKED得到功能函数void CSportDlg::Onconfig(){// TODO: Add your control notification handler code here}添上下面的代码，就可以得到该函数的功能void CSportDlg::Onconfig() // 配置按钮被按下{// TODO: Add your control notification handler code hereCSconfig con;//将端口配置初始化数据传递的配置对话框中con.m_baund = m_baund;con.m_comn = m_comn;con.m_databit = m_databit;con.m_jiaoyan = m_jiaoyan;con.m_stopbit = m_stopbit;if(con.DoModal()==IDOK) // 配置对话框是“确定”按钮按下，需要重新配置端口{m_ComPort.SetPortOpen(FALSE);m_ComPort.SetCommPort(m_comn+1); //设置串口号m_ComPort.SetInBufferSize(1024); //接收缓冲区m_ComPort.SetOutBufferSize(1024);//发送缓冲区m_ComPort.SetInputLen(0);//设置当前接收区数据长度为0,表示全部读取m_ComPort.SetInputMode(1);//以二进制方式读写数据m_ComPort.SetRThreshold(1);//接收缓冲区有1个及1个以上字符时，将引发接收数据的OnCommMscomm事件CString conf;switch(m_baund) // 设置波特率{case 0:conf = "2400,";break;case 1:conf = "4800,";break;case 2:conf = "9600,";break;default:conf = "9600,";}switch(m_jiaoyan) // 设置校验方法{case 0:conf = conf + "n,";break;case 1:conf = conf + "o,";break;case 2:conf = conf + "e,";break;default:conf = conf+"n,";break;}switch(m_databit) // 设置数据位{case 0:conf = conf + "5,";break;case 1:conf = conf + "6,";break;case 2:conf = conf + "7,";break;case 3:conf = conf + "8,";break;default:conf = conf+"8,";break;}switch(m_stopbit) // 设置停止位{case 0:conf = conf + "1";break;case 1:conf = conf + "1.5";break;case 2:conf = conf + "2";break;default:conf = conf+"1";break;}m_ComPort.SetSettings(conf); //设置波特率等参数if(!m_ComPort.GetPortOpen()) //打开串口m_ComPort.SetPortOpen(TRUE);}}用上述方法添加发送按钮的功能函数void CSportDlg::Onsendbtn(){// TODO: Add your control notification handler code here UpdateData(TRUE);int len;CByteArray array;len=m_send.GetLength();array.RemoveAll();array.SetSize(len);for(int i=0;i<len;i++)array.SetAt(i, m_send[i]);m_ComPort.SetOutput(COleVariant(array)); // 发送数据}下面我们经过增加事务截获功能来增加串口接收功能：在sportDlg.h中增加：protected:afx_msg void OnCommMscomm();DECLARE_EVENTSINK_MAP()在sportDlg.cpp中增加：BEGIN_EVENTSINK_MAP(CMainFrame,CFrameWnd )ON_EVENT(CMainFrame,ID_COMMCTRL,1,OnCommMscomm,VTS_NONE) //映射//ActiveX控件事件END_EVENTSINK_MAP()void CSportDlg::OnCommMscomm() // 串口事件到来{V ARIANT variant_inp;COleSafeArray safearray_inp;LONG len,k;BYTE rxdata[2048]; //设置BYTE数组An 8-bit integerthat is not signed.CString strtemp;switch(m_ComPort.GetCommEvent()){case 1: // comEvSend发送数据break;case 2: // comEvReceive读取数据串口接收事件到来// MessageBox(_T("读取数据事件"), _T("TRACE"), MB_OK);variant_inp=m_ComPort.GetInput(); //读缓冲区safearray_inp=variant_inp; //V ARIANT型变量转换为ColeSafeArray型变量len=safearray_inp.GetOneDimSize(); //得到有效数据长度// 接受数据for(k=0; k<len; k++){safearray_inp.GetElement(&k,rxdata+k); //转换为BYTE型数组BYTE bt=*(char*)(rxdata+k); //字符型strtemp.Format("%c",bt); //将字符送入临时变量strtemp存放m_receive+=strtemp;}break;default: // 传输事件出错m_ComPort.SetOutBufferCount(0);break;}UpdateData(FALSE); //更新对话框内容}。