thiết lập lại comm cổng trong VB6

[xanseviera]

làm thế nào để thiết lập lại cổng comm trong VB6?

 Private Sub Command6_Click () MSComm1.PortOpen = True MSComm1.Output = "a" MSComm1.Output = "b" MSComm1.Output = "c" MSComm1.PortOpen = False 'Đóng COMM cổng End Sub Private Sub Command4_Click ( ) MSComm1.PortOpen = True MSComm1.Output = "g" MSComm1.Output = "h" MSComm1.Output = "i" MSComm1.PortOpen = False 'Đóng cổng COMM End Sub

tôi muốn để thiết lập lại cổng từ command6 để command4. làm thế nào để làm gì? sum1 có thể giúp tôi. TQ

 

[lockman_akim]

tôi không hiểu những gì u thực sự muốn .. u có thể xplain hơn ..

 

[xanseviera]

tôi đã nhận nó rồi ... i tìm thấy lỗi về lập trình PIC của tôi. TQ giúp đỡ