Private WithEvents MSComm  As MSCOMMLib.MSComm
Set MSComm = CreateObject("MSCOMMLib.MSComm.1") 我定义了MSComm的类型,为什么会有“type mismatch”的错误