怎样用vb编译使用串口通信

㈢ vb如何使用串口通讯

用PC机的9针RS232接口，用VB6 含有的MSComm 控件编程

两台PC机串行通信串行口的接线图：

Private Sub Form_Load()
MSComm1.PortOpen = True '开启通信控件的端口
Timer1.Interval = 100 ’自动传送时间间隔100毫秒
End Sub

Private Sub MSComm1_OnComm()
Dim st As String
If MSComm1.InBufferCount > 0 Then
st = MSComm1.Input
Text2.Text = st '将收到的数据放入Text2文本框
End If
End Sub

Private Sub Timer1_Timer()
MSComm1.Output = Text1.Text '发送Text1文本框内容
End Sub

㈣ 如何用VB编写串口程序

自动化 是 人类一起 努 力 的 目标 ，期待 以其他 的方 式来 代替人类 完成 一些 困难或 者是周 期性 的工作 。计 算机 自从诞生以来，经过不断的发展 ，功能不断提升，软硬件各方面均有长足的进步。VsaB s 简称 i l ai u c（ V B）是一种 在 窗 口操 作平 台上 的视觉 开 发工具 ，使得 开发 更方便 快捷 。 现代 的世 界是 一个 高度 自动化 的世 界 ，各 种设 备都可 以和计 算机作 连线 ，而最 简单 的 自动 化连线 方式 就 是使用 串行 通信 。VI 3提供 了串行通 信控 件 ，让开 发者可 以方便 快捷地 开 发 串行 通信程 序 。利用计 算机 进行 串 口通讯 是 自动化 将来 发展 的一种方 向。 1 串行 通信 的实现 11 实现方 式 ． 利用 V B进 行 串 口通 信 的开发 ，主要 是使用 一个控 件 ：Mso m 控 件 。它 的 目的是 为 了让用户 设计一 cm 个 系统 可 以和 串行 端 口进行 沟通 及传送 数据 ，提供 了下 列两种 方式米 处理信 息 的流动 ： 事 件驱 动 ：是处理 连 接端 口通信 的一种 有效方 法 。当有 事件发 生时 ，程 序会被 告 知 。例 如 ，在有 一个 字符到 达或 者一 个变化 发 生时 ，程序 都 可 以利 用 Mso 控 件来侦 测 并处理这 些通信 事件 及通信 错误 。预 cmm 先将程 序 写入控件 的事 件程 序 区块 中，一旦 事件 发生 即可 自动 执行 该段程序 。 程 序通 过检 查 C mmE et属性 的值来 循环 查询 事件和错 误 。例如 ，对 于某 些程序 ，并没有必 要每接 o vn 收一个 字符 时都 产生 事件 ， 时需 要接 收多个字 符或 数据 包后再 回应 。固定地 向设备 查询状态 的方式 较好 。 有 这两 种方式 都可 达 到数据 读写 的 目的，使用 时要 看实际 系统环 境而 定 。

㈤ vb串口通信程序实例

我也是自己摸索开发出来的每一款VBtoCOM通讯，有具体的思路如下：

给你推荐一个工具“com串口测试工具 ComTone V1.0 中文绿色版”

1、打开你的噪音计的测试软件，调整好串口号、通讯频率等等，我用温度计举例说明。

㈥ VB编程串口通信

做根线,232 to 232 ,做的时候要注意2脚接3脚,(如两个头是A和B)也就是A的2接B头的3,A的3脚接B的2脚,5接5.
然后用添加两个MSCOMM控件(Microsoft Communications Control（以下简称MSComm）是Microsoft公司提供的简化Windows下串行通信编程的ActiveX控件，它为应用程序提供了通过串行接口收发数据的简便方法。具体的来说，它提供了两种处理通信问题的方法：一是事件驱动(Event－driven)方法，一是查询法。)
.CommPort=2 '使用COM2
.Setting="9600,e,7,1" '波特率9600，偶校验，7个数据位，1个停止位
.InBufferSize=40 '设置MyComm接收缓冲区为40个字节
.OutBufferSize=2 '设置MyComm发送缓冲区为2个字节
.InputMode=comInputModeBinary
'设置接收数据模式为二进制模式
.InputLen=1 '设置一次从接收缓冲区读取字节数为1
.Sthreshold=1 '设置一次从发送缓冲区读取字节数为1
.PortOpen=True '打开通信口

下面是响应Mycomm_OnComm事件的处理程序，对数据库采集的处理程序采用MSComm事件驱动方式。

Private Sub MyComm_OnComm()
With MyComm
Select case .CommEvent
Case .comEvReceive
' 接收数据
' 对数据进行处理
case .comEVSend
'发送数据
case .comEventRxParity
'对奇偶校验错误进行处理
end select
end with
end sub

这只是其中一个的,再加一个控件设置为COM1就可以了.