首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

VB串口通讯报错解决思路

2012-01-11 
VB串口通讯报错笔记本电脑没有串口,我用蓝牙管理软件来虚拟了一个串口,与另外一个蓝牙温度传感器设备连接,

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

[解决办法]
你看控制面板里有没有能通讯的功能模块
没有的话就安装驱动吧

探讨
查了很多文献,国外碰到这个问题的较多,很多人用来与手机的红外或者蓝牙通讯。google了一下,8020 read comm device。貌似有人说这是驱动程序的问题?

[解决办法]
探讨
引用:
改为
Dim buffer As Byte
而且摆在最上面的通用区,不能摆在 Comm1_OnComm这个事件里面

这个你得设定啊
Comm1.InputMode = comInputModeBinary '二进制模式接收


没有用。

热点排行