摘要:
1、使用MSComm读串口信息Private Sub Command1_Click() If Me.MSComm1.PortOpen = True Then Me.MSComm1.PortOpen = False Me.MSComm1.CommPort = Me.cbCom.ListIndex + 1 Me.MSComm1.Settings = Me.txtSettings.Text Me.MS... 阅读全文
摘要:
和在网上找的例子一样,这里只是将Form处的代码写的更具体点'-----------------------------------------'以下为模块中的代码:'-----------------------------------------Option ExplicitPublic OldWindowProc As LongPublic TheForm As FormPublic The... 阅读全文