以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]请高手帮忙写个接收串口数据的代码:  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=31143)

--  作者:lsf5138
--  发布时间:2013/4/10 20:18:00
--  [求助]请高手帮忙写个接收串口数据的代码:

数据形式:共10位(bit) 1位bit开始位,8位bit数据位,1位bit停止位。
串行口以连续方式发送数据,格式如下(均为ASCII):
=,X1,X2,X3,X4,X5,X6,符号
=为分隔符。 重量先发低位,后发高位。 当重量为正时,符号为空 当重量为负时,符号为“-”。
例子:重量为;123.45kg   仪表发送:=54.321
      重量为:12345kg    仪表发送:=543210
      重量为:-123.45kg  仪表发送:=54.321-

从第8位到第2位bit数据位 提取重量值显示到窗口数值框中


--  作者:有点甜
--  发布时间:2013/4/10 22:59:00
--  

Dim s As String = "54.321-"
s = Strings.StrReverse(s)
Dim v As Double
If Double.TryParse(s,v) Then
    messagebox.show(v)
End If


--  作者:唐尸三摆手
--  发布时间:2013/4/11 8:30:00
--  
二楼正解,之前做过一份串口的案例,也是按这个思路设计的。