Sử dụng Mscomm kiểm soát ở thị giác cơ bản cho Modbus

[saudrehman]

hi guys i am mới vào VB
i am triển khai thực hiện một giao diện VB cho một đồng hồ năng lượng. Một máy tính sẽ gửi và nhận khung Modbus từ mét nergy.
i đang sử dụng các đối tượng điều khiển comm trong VB
sẽ làm việc này
giả sử tôi cần phải trnasmit này khung Hex 01 06 00 08 00 01 CRC
sau đó sẽ làm việc này
MSComm1.PortOpen = True
MSComm1.Output = Chr (& H0) & Chr (& H1) & Chr (& H0) & Chr (& H6) & Chr (& H0) & Chr (& H0) & Chr (& H0) & Chr (& H7) & Chr (& H0) & Chr (& H0) & Chr (& H0) & Chr (& H1) & Chr (& hd0) & Chr (& HF9)
và tôi nhận được những phản ứng tương tự từ mét nếu OK
Dim ValResult Như đôi
ValResult = Val (MSComm1.Input)
Nếu ValResult Sau đó
MsgBox "hợp lệ phản ứng"

Khác
MsgBox "Không có phản ứng"
Cuối Nếu
mscomm1.portopen = false
plz tell me whats wrong