Thông báo

Collapse
No announcement yet.

Help!!! Truyền dữ liệu từ đầu cân điện tử lên máy tính.

Collapse
X
 
  • Lọc
  • Giờ
  • Show
Clear All
new posts

  • Help!!! Truyền dữ liệu từ đầu cân điện tử lên máy tính.

    Rắc rối của em 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


    mong mấy anh giup cho!!

  • #2
    thất vọng quá

    Comment


    • #3
      Nguyên văn bởi dinhvankhoi Xem bài viết
      thất vọng quá
      Đinh văn khôi thật là quá đáng,không trả lời thì cũng không nên cư xử như vậy

      Comment

      Về tác giả

      Collapse

      dinhvankhoi Tìm hiểu thêm về dinhvankhoi

      Bài viết mới nhất

      Collapse

      Đang tải...
      X