111,094
社区成员




With Frm_PMS
On Error Resume Next
.Comm2.CommPort = 1
.Comm2.Emulation = 0
.Comm2.Settings = "1200, E, 7, 1"
.Comm2.PortOpen = True
.Comm2.ForeColor = 11
.Comm2.BackColor = 1
.Comm2.AutoProcess = 1
.Comm2.RTSEnable = True
End With
Port1.PortName = "COM1"
Port1.BaudRate = 1200
Port1.DataBits = 7
Port1.StopBits = 1
Port1.Parity = System.IO.Ports.Parity.Even
Port1.Handshake = Handshake.RequestToSendXOnXOff
Port1.RtsEnable = True
Port1.ReadTimeout = 1000
Port1.ReadBufferSize = 4096
Port1.WriteBufferSize = 4096
Port1.WriteTimeout = 1000
'Handshake和RtsEnable用不用都不行!