PIC Vietnam

Go Back   PIC Vietnam > Truyền thông > Giao tiếp cổng COM và LPT

Tài trợ cho PIC Vietnam
Trang chủ Đăng Kí Hỏi/Ðáp Thành Viên Lịch Bài Trong Ngày Vi điều khiển

Giao tiếp cổng COM và LPT RS232, RS485 và LPT là những giao tiếp cơ bản và kinh điển khi mới học về vi điều khiển...

 
 
Ðiều Chỉnh Xếp Bài
Prev Previous Post   Next Post Next
Old 28-03-2011, 10:33 AM   #1
dvkhoi06d1
Nhập môn đệ tử
 
Tham gia ngày: Mar 2011
Bài gửi: 5
:
Help!!! Truyền dữ liệu từ đầu cân điện tử lên máy tính.

Em đang làm đồ án giao tiếp với máy tính như sau: đọc số liệu từ đầu cân hiển thị lên máy tính,em dùng VB6, em cho số liệu hiển thị trên TEXTBOX thì nó chỉ hiện mấy dấu chấm hỏi :????? KG em rối quá không biết làm sao nữa!
Đầu cân em dùng là YH-T3 ,mã truyền lên lên máy tính là mã ASCII

các sư huynh giúp em với !!!
code em viết như sau:

Private Sub Form_Load()
If MSComm1.PortOpen = True Then MSComm1.PortOpen = False

MSComm1.CommPort = 1 'chon cong de giao tiep la cong 1

MSComm1.InputLen = 0 'doc het noi dung cua bo dem

MSComm1.Settings = "4800,N,8,1" 'cac thong so mo cong

MSComm1.RThreshold = 4

MSComm1.InputMode = comInputModeBinary 'chon kieu du lieu nhan theo kiêu nhi phan

MSComm1.PortOpen = True
Timer1.Interval = 1000
Timer1.Enabled = True

End Sub

Private Sub MSComm1_OnComm()
Select Case MSComm1.CommEvent
Case comEvReceive
Dim nhandulieu As Variant
nhandulieu = MSComm1.Input
text1.Text = nhandulieu
text1.Text = nhandulieu & "KG"
End Select
End Sub
dvkhoi06d1 vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn
 


Quyền Sử Dụng Ở Diễn Ðàn
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Mở
Smilies đang Mở
[IMG] đang Mở
HTML đang Tắt

Chuyển đến


Múi giờ GMT. Hiện tại là 09:58 PM.


Được sáng lập bởi Đoàn Hiệp
Powered by vBulletin®
Page copy protected against web site content infringement by Copyscape
Copyright © PIC Vietnam