以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]请高手帮忙写个接收串口数据的代码：  (http://www.foxtable.com/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
--  
二楼正解，之前做过一份串口的案例，也是按这个思路设计的。