Foxtable(狐表)用户栏目专家坐堂 → 求助:身高测量仪串口监视器读取代码


  共有7418人关注过本帖平板打印复制链接

主题:求助:身高测量仪串口监视器读取代码

帅哥哟,离线,有人找我吗?
sophia
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:334 积分:2722 威望:0 精华:0 注册:2010/5/20 13:07:00
求助:身高测量仪串口监视器读取代码  发帖心情 Post By:2013/2/21 19:15:00 [只看该作者]

今天写了一个身高测量仪的串口数据代码但是报错
说明书的说明是这样

直接传送

此种方式下人体秤不受计算机控制,每测量完成后立即通过串口发送测量结果。发送格式如下:

例:W:0825 H:1825     表示体重=82.5kg 身高=182.5cm

注:      1 字符为ASCII码,并以回车(0d) 换行(0a) 结束。

             2 此方式是人体秤开机后默认通讯方式。

 

通讯协议

通讯协议:RS-232

通讯格式:波特率=4800bt  起始位=1bit  数据位=8bit 停止位=1


我只想读取身高数据到数据库相应字段里,代码如下


Dim s As String = e.Port.ReadExisting

Dim Values() As String

Values = s.split(":")

Dim r As Row =Tables("驾证业务").current

r("身高") = Values(2)

forms("身高测量").controls("sh").text = Values(2) & "cm"




执行后提示:


错误代码位置:串口监视器.DataReceived

system.IndexOutOutOfRangeException:索引超出了数组界限。

在 UserCode.DataReceived(DataReceivedEventArgs e)


不知为何 是不是因为



注:      1 字符为ASCII码,并以回车(0d) 换行(0a) 结束。

上述代码错误在哪里,应该怎么改


 回到顶部