สอบถามการรับค่าที่ได้จากเครื่องชั่งเข้ากับเครื่องคอมพิวเตอร์ และนำค่าที่ได้ออกไปใช้งาน

... ใส่ความคิดเห็นตรงนี้.......

ต้องขออภัยด้วยจริงๆค่ะ น้องไม่ค่อยมีความรู้ค่ะ เพิ่งหัดทำ

concept ของโปรแกรมที่จะทำคือ
1. Scan QR เพื่อ แสดง Item กับ Standars master
2. ชั่งน้ำหนักที่เครืองชั่ง
3. เทียบน้ำหนัก Standard กับ น้ำหนักที่ชั่งได้

ปัญหาตอนนี้คือ ค่านำนักจากเครื่องชั่งที่รับมา มันวิ่งไม่หยุดเลยค่ะ พอจะมีวิธิการ หรือ เทคนิควิธีแนะนำเพื่อนำค่าที่รับได้ออกมาใช้งานต่อได้มั้ยค่ะ

Code การเชื่อมต่อ Port ก็ได้มาจากกระทู้ในเว็บนี้แหล่ะค่ะ และเอามาอะแด๊ปเอา แต่ไปต่อไม่ได้



Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label7.Text = dtime


myPort = IO.Ports.SerialPort.GetPortNames()
cmbBaud.Items.Add(2400)

For i = 0 To UBound(myPort)
cmbPort.Items.Add(myPort(i))
Next
cmbPort.Text = cmbPort.Items.Item(0) 'Set cmbPort text to the first COM port detected
cmbBaud.Text = cmbBaud.Items.Item(0) 'Set cmbBaud text to the first Baud rate on the list

'===Connect
SerialPort1.PortName = cmbPort.Text 'Set SerialPort1 to the selected COM port at startup
SerialPort1.BaudRate = cmbBaud.Text 'Set Baud rate to the selected value on

''Other Serial Port Property
SerialPort1.Parity = IO.Ports.Parity.None
SerialPort1.StopBits = IO.Ports.StopBits.One
SerialPort1.DataBits = 8 'Open our serial port
SerialPort1.Open()

'btnConnect.Enabled = False 'Disable Connect button
'btnDisconnect.Enabled = True 'and Enable Disconnect button
'=======

End Sub
Private Sub SerialPort1_DataReceived(ByVal sender As Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived
ReceivedText(SerialPort1.ReadExisting()) 'Automatically called every time a data is received at the serialPort
End Sub
Private Sub ReceivedText(ByVal [text] As String)
'compares the ID of the creating Thread to the ID of the calling Thread
If Me.txtSN.InvokeRequired Then
Dim x As New SetTextCallback(AddressOf ReceivedText)
Me.Invoke(x, New Object() {(text)})
Else
Me.txtSN.Text &= [text]
End If
End Sub

... ใส่ความคิดเห็นตรงนี้.......ขอบคุณค่ะ กำลังลองทำลองทำดูค่ะ

... ใส่ความคิดเห็นตรงนี้.......ขอบคุณค่ะ จะลองทำดูตามที่แนะนำ นะ่คะ่

... ใส่ความคิดเห็นตรงนี้.......เครื่องชั่งที่ใช้อยู่เป็น Rs232 to USB ค่ะ ส่งค่ามาตลอดเลย พยายามปรับและใช่ช่วงหน่วงเวลาแล้ว แต่ก็ยังไม่เป็นผล เราสามารถที่จะเขียนโค๊ด รับค่าแต่เฉพาะ กรณีที่มีการกระทำ หรือ ชั่งงานได้มั้ยค่ะ รบกวนแนะนำการเขียนโค๊ดทีค่ะ ขอบคุณมากค่ะ

... ใส่ความคิดเห็นตรงนี้.......ขอบคุณค่ะ เครื่องชั่ง Fidelity 19ea & 19es ตอนนี้ติดต่อผู้ขาย ถึงรูปแบบในการส่งข้อมูลของเครื่อง ตามที่คุณแนะนำและ ผู้ขายอาจจะต้องนำเครื่องชั่งไป Set โปรแกรมที่ตัวเครื่องชั่งใหม่ให้ค่ะ เพื่อให้ได้ ฟังก์ชั่นที่ เมื่อเครื่องชั่งนิ่ง จะส่งค่าน้ำหนัก ทันที ขอบคุณมากเลยค่ะ สำหรับคำแนะนำและแนวทาง เดี๋ยวไว้รอผู้ขายเอาเครื่องชั่งไป Set แล้วเอากลับมาส่งใหม่ ได้ผลยังไง จะเอามาแจ้งอีกทีนะ่คะ่

... ใส่ความคิดเห็นตรงนี้.......เราก็มีแผนทำโปรเจคแบบนี้เหมือนกันค่ะ เจ้าของกระทู้พอจะแชร์ข้อมูลให้ได้ไหมคะ