|
phạm minh tuấn nói rất đúng bạn nên đóng gói thành 1 farme có byte dầu là byte start,byte 2 là byte chỉ số byte data ,và byte cuoi là byte stop
giao diện vb nhận data bạn có thể nhận bằng phương pháp thăm dò hoặc phương pháp ngắt
nếu bạn sử dụng ngắt bạn đặt MSComm1.Rthreshold = số byte nhận ở bài của bạn ta đặt 11 khi đó cứ khi bộ nhớ đệm nhạn được 11 byte thì sẽ nhảy đến sự kiện ngắt on com
Private Sub MSComm1_OnComm()
dim a[11]
dim i
If MSComm1.CommEvent = comEvReceive Then
a[i]= MSComm1.Input
i++
end sub
khi đó bạn sẽ được 1 mảng dữ liệu nhận về
hoặc bạn có thể sử dụng thăm dò sem bộ nhớ đệm khi nòa nhận đủ 11 byte thì đọc và xóa bộ đệm để nhận gói 11 byte tiếp theo
If MSComm1.InBufferCount >10 Then
a[i] = MSComm1.Input
em nối có chỗ nào không đúng mong các bác chỉ giáo!!!! thankS!
còn bạn hãy thử làm xem nhé
|