Trích:
Nguyên văn bởi rikimaru87
đệ gửi nhiệt độ lên VB . cứ sau 1 s .
printf("%u",nhietdo);
hàm nhận ở VB:
Private Sub MSComm1_OnComm()
If MSComm1.CommEvent = comEvReceive Then
Text1.Text = Text1.Text + MSComm1.Input
End If
End Sub
kết quả :
có lúc ra 1 chuỗi kí tự PPPPPPPPPP
có lúc ko nhận dc j hết ?
huhu giúp em với
|
Bạn thử sửa lại với đoạn code sau xem sao:
Code:
....
Text1.Text = Text1.Text + asc(MSComm1.Input)
....