
无效的串行端口是指你的语法中采用的串口数据格式不对,或者当前串口被占用,你在写代码时,在打开串口时,首先检查一下端口是否被打开,如果被打开,则先关闭再打开,另外,你用到的串口用完后一定要关闭的
Private Sub MSComm1_OnComm()
Select Case MSComm1CommEvent
' Case comEvCD
' Case comEvCTS
' Case comEvDSR
' Case comEvRing
Case comEvReceive
Dim inbuf() As Byte, i%, buf$
buf = ""
inbuf = MSComm1Input
Rev_num = UBound(inbuf)
ReDim lnum(0 To Rev_num) As Integer
For i = 0 To Rev_num
lnum(i) = inbuf(i)
buf = buf + Str(inbuf(i)) + " "
Next i
Text1Text = Text1 + buf
' Case comEvSend
End Select
End Sub
经测试,代码未发现问题。
以上就是关于请问,你vb的串口问题“invalid port number”解决了么,我也出现了同样问题全部的内容,包括:请问,你vb的串口问题“invalid port number”解决了么,我也出现了同样问题、VB编写串口收发数据时出现8020错误、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)