VB串口通讯报错
笔记本电脑没有串口,我用蓝牙管理软件来虚拟了一个串口,与另外一个蓝牙温度传感器设备连接,用于获取温度。蓝牙管理软件安装完毕后,可以与传感器顺利进行连接,并获取数据,我用串口调试助手打开相应的串口,可以顺利看到温度数据。
之后准备用vb自己编写程序,来获取温度。mscomm参数设置与串口助手中设置的一致。可以打开相应的串口,但是一旦接收到数据,就会报错,8020号错误,读comm设备错误。
text2中可以看到结果为1 ,说明通讯已经建立,端口打开都没有问题的。
Private Sub Comm1_OnComm()
Dim buffer As String
Text2.Text = Comm1.InBufferCount
buffer = Comm1.Input 出错语句。
Text1.Text = buffer
End Sub
Private Sub Form_Load()
Comm1.CommPort = 2
Comm1.Settings = "9600,N,8,1"
Comm1.RThreshold = 1 '设置接收一个字节就产生OnComm事件
Comm1.PortOpen = True '打开端口
If PortOpen = False Then '判断通信口是否打开
If Err Then '错误处理
MsgBox "串口通信无效"
Exit Sub
End If
End If
End Sub
[解决办法]
你看控制面板里有没有能通讯的功能模块
没有的话就安装驱动吧