免费完整VB串口程序源码下载链接https://download.csdn.net/download/luckyext/90393287

串口通信（Serial Communication）是一种设备间进行数据传输的通信方式，在VB6（Visual Basic 6.0）中，因为VB集成了串口控件，只需将控件导入，然后简单的设置一下就可以实现串口的收发。VB6中串口通信通常使用Microsoft Communications Control（MSComm）控件来实现。

首先我们需要准备串口调试工具和开发环境。

免费的串口调试助手链接 https://download.csdn.net/download/luckyext/90360251

查看VB6控件区有无串口控件，如果没有串口控件，选择：工程→部件→Micosoft comm Control6.0选项, 点击应用, 即可添加串口控件及绘制界面

设备串口控件的波特率、数据位、停止位等参数，例：9600,n,8,1

打开串口，用ctrMSComm.PortOpen方法

数据发送，只需将发送内容赋给ctrMSComm.Output

例：

Private Sub Command1_ Click()

MSComm1.Output = Text1.Text‘发送数据

End Sub

数据到达后会触发Private Sub ctrMSComm_OnComm()函数

例：

Private Sub ctrMSComm_OnComm ()

Dim str As String

If ctrMSComm.CommEvent = comEvReceive Then '监听事件

str = ctrMSComm.Input

Text2.Text = str

End If

免费完整VB串口程序源码下载链接https://download.csdn.net/download/luckyext/90393287

注意事项

串口通信一定要注意保证通信双方的串口配置相同，否则会产生数据乱码。最好要有串口调试工具，提高开发效率。