我从Form_Load
调用此方法,错误发生在代码Private Sub...
的第一行。我添加了工具箱MSCOMM
Private Sub OpenPort()
MSComm1.Settings = "19200,8,N,1"
MSComm1.CommPort = 4
MSComm1.PortOpen = True
End Sub
答案 0 :(得分:0)
错误表示MSComm1
没有Settings
属性。
MSComm1
是什么类型的?它是一个控件吗?发生错误后,请在监视窗口中查看MSComm1
。它有Settings
吗?
答案 1 :(得分:0)
错误是:
我忘记在最后一行代码之后Exit Sub
End Sub
答案 2 :(得分:0)
你写了
MSComm1.Settings = "19200,8,N,1"
***write this***
MSComm1.Settings = "19200,N,8,1"
错位N和8.