Select Case e.Port.PortName
Case "COM1"
If Forms("A").Opened Then
Forms("A").Controls("开始").PerformClick()
Forms("B").Controls("no").Value = e.Port.ReadExisting()
End If
Case "COM2"
Forms("B").Controls("no").Text = e.Port.ReadExisting()
End Select
置入以上代码，执行无效。在A窗口打开的状态下，并未正确执行按钮点击。
我本意是想在COM1接收到数据时，执行一个函数，函数包含了对某一张表的行数据的新增，但是发现函数在此处也无法执行
调试
Case "COM1"
If Forms("A").Opened Then
msgbox(1)
Forms("A").Controls("开始").PerformClick()
msgbox(2)
Forms("B").Controls("no").Value = e.Port.ReadExisting()
End If
然后"开始"按钮点击事件第一行也加上msgbox看看能不能弹出
所有msgbox没有弹出？说明窗口没有打开，或者是没有接收到串口数据
但是窗口A我已经打开，且A窗口上的textbox被置入了串口读到的数据