giúp em truyền dữ liệu qua rs232

[anhquang206]

hiện em đang làm đồ án tốt nghiệp nhưng gặp rắc rối về rs232
trên CCS em viết xuất ra với hàm printf("co nguoi di qua");
sau khi kết nối được với PC nhưng sao nó k xuất ra được VB không biết code có lỗi gì k mong mọi người giúp, thanks

Private Sub MSComm1_OnComm()
Dim a As String
If MSComm1.CommEvent = comEvReceive Then
a = MSComm1.Input 'Nhan chuoi du lieu to VCOM
thongke.Items = a + Format(Now, "dd-mm-yyyy hh:nn:ss")
End If
End Sub