MSCOMM 8015错误(不能设置通信状态)

Question

MSCOMM 8015错误(不能设置通信状态)?请问这问题如何解决?
请各位帮忙,在线等待.........

Answer 1

Dim Read As String
Dim Second As String
Dim abc As String
Dim Flag As Boolean
'设置并返回波特率、奇偶校验、数据位、停止位参数
DBComm.CommPort = 1   ' 使用 COM1
DBComm.Settings = "2400,E,7,1"   ' 2400 波特，无奇偶校验，8 位数据，一个停止位。
DBComm.InputLen = 0    ' 当输入占用时，
   ' 告诉控件读入整个缓冲区
DBComm.PortOpen = True  ' 打开端口怎么会那样呀

Answer 2

可能是设置Settings 属性的问题，代码贴出来看看。

Answer 3

If Frm_Print.MSComm1.PortOpen = True Then Frm_Print.MSComm1.PortOpen = False
    Frm_Print.MSComm1.CommPort = Val(bpPort)
    Frm_Print.MSComm1.Settings = "57600,N,8,1"
    Frm_Print.MSComm1.Handshaking = comNone
    Frm_Print.MSComm1.RThreshold = 1
    Frm_Print.MSComm1.SThreshold = 1
    Frm_Print.MSComm1.PortOpen = True
    If (Err.Number = 8002) Or (Err.Number = 8005) Then
        MsgBox "Incorrect Communication Port selected.", vbInformation, "COM Port Error"
        OpenCommPort = False
        
    Else
        OpenCommPort = True
    End If
我在自己机器上打,没问题.到另外一台上打8015错误!
这样有问题吗?