Vừa đọc lại tài liệu vb, mình tìm được cách giải quyết rồi nhá
Đại khái là:
Tạo ra 2 cái này
With MSComm1
.Settings = "19200,E,8,2"
.CommPort = 2
.RThreshold = 1
.SThreshold = 0
.InputMode = comInputModeText
.InputLen = 0
.Handshaking = comNone
.InBufferSize = 1024
.OutBufferSize = 1024
If .PortOpen = False Then
.PortOpen = True
End If
End With
và
With MSComm2
.Settings = "19200,E,8,2"
.CommPort = 3
.RThreshold = 1
.SThreshold = 0
.InputMode = comInputModeText
.InputLen = 0
.Handshaking = comNone
.InBufferSize = 1024
.OutBufferSize = 1024
If .PortOpen = False Then
.PortOpen = True
End If
End With
rùi sau đó thì dùng thoai
Không biết là có đúng không nữa, test đã
