vb.net 串口实时接收数据的问题?
现在用下位机给Wince发数据,接收方式为两个Textbox,Textbox1接收电流Textbox2接收电压,下位机发送十六进制数,这边显示为十进制数
但我想这两个文本框接收的数据随着焊机的变化,也就是下位机的发送来实时显示
比如:发送 01 F4 00 1C 这是Textbox1显示是500,Textbox2显示是28
再次发送另一组数:01 F5 00 1E 这是Textbox1显示是500,Textbox2显示是30
,
,
,
如果通过串口接收实现显时显示?
感谢!
--------------------编程问答-------------------- 在VB6可以用MSCOMM来实现。 --------------------编程问答-------------------- 30分太少了
--------------------编程问答-------------------- 楼上的程序验证过没? --------------------编程问答--------------------
Public Delegate Sub SetTextCallback([text] As String) '定义委托
Private Sub SerialPort1_DataReceived(ByVal sender As Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived
Dim DATA2Send As String
Dim temp As String
ISrouting = True
temp = SerialPort1.ReadLine()'如果你的下位机是有换行符 或 回车符作为一行的结尾的话
'处理temp (包括 用strings.left取左边4个字节,right取右边;然后转成十进制等)赋值到DATA2Send
SetText(DATA2Send)
End sub
Sub SetText(ByVal [txt] As String)
If Me.TextBox1.InvokeRequired Then
Dim dsettext As New SetTextCallback(AddressOf SetText)
Me.Invoke(dsettext, [txt].ToString)
Else
TextBox1.Text = [txt]
End If
End Sub
在我现成的程序里面节选的,如果有问题都是删减的时候不小心删了,删了自后没有重新验证
补充:.NET技术 , VB.NET