Giao tiếp VB-PIC6F877A

[dung h]

chương trình của bạn viết chưa đúng nên nó chạy không như bạn muốn
có vài điểm đó là
if(count=2) dấu = là thục hiện phép gán .bạn sai lỗi cấu trúc cơ bản
khi muốn so sánh thì phải == tức if(count==2)

máy tính giao tiếp với vdk tất cả bằng mã ascii
dữ liệu ở text1.text là kiểu xâu ký tự
khi bạn truyền nhiều byte từ vb xuống vdk thì ta cứ truyền cả xâu xuống khi đó vb tự động tách tùng ký tự trong sâu và chuyển thành mã ascii truyền đi
mscomm1.output = text1.text
và khi đó ở vdk bạn sẽ dùng 1 mảng để lưu các phần tử nhận được rồi chuyển thành số bạn muốn
khi vdk muốn truyền nhiều byte len vb thì bạn phải tách data đó ra làm nhiều byte và truyền lần lượt ascii của nó lên vb(vd 123 tach thành số trăm 1 ,2 chục ,3 dv)

cách tối ưu nhất để truyền nhiều byte từ pc xuống vdk và ngược lại từ vdk lên vb đó là ta đóng gói dữ liệu ta thành các frame gói dữ liệu với cấu trúc lần lượt các byte là:
|START||so byte data||....data...||stop|
chúc thành công!