如何用VB编写串口程序

如何用VB编写串口程序

使用VB编写串口程序是一件很简单的事情，因为VB集成了串口控件，只需将控件导入，然后简单的设置一下就可以实现串口的收发。

准备：

首先看控件区有无串口控件，如果出现下图第一种情况，表明串口控件并未被启用，选择工程→部件→Micosoft comm Control6.0选项，点击应用，即可添加串口控件。

绘制界面：

绘制两个text控件用于存储串口需要收发的数据。一个button控件用于发送指令，添加串口控件。

编写程序：

Private Sub Command1_Click()

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

End Sub

Private Sub Form_Load()

MSComm1.PortOpen = True '打开串口

MSComm1.InputMode = comInputModeText ' 设置串口接收方式为文本模式

End Sub

Private Sub MSComm1_OnComm()

Dim str As String

Select Case MSComm1.CommEvent '监听事件

Case 2

str = MSComm1.Input

Text1.Text = str

End Select

End Sub

查看效果：

串口数据的收发都正常。