Foxtable(狐表)用户栏目专家坐堂 → 请LXL版主指教,有关串口接收的数据包格式


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

主题:请LXL版主指教,有关串口接收的数据包格式

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


加好友 发短信
等级:狐精 帖子:3313 积分:23134 威望:0 精华:1 注册:2009/3/31 11:25:00
请LXL版主指教,有关串口接收的数据包格式  发帖心情 Post By:2010/7/1 16:28:00 [只看该作者]

电子吊称中的仪表串口发送微机的到数据包是十六制的。但接收的一串串“25517013481272311660041760016226”这样的数字,这不是厂家说的十六制呀?

 

项目:代码如下

With Ports("COM1")
    Dim cnt As Integer = .BytesToRead
    If cnt > 0 Then '缓冲区是否有数据
       Dim Val(cnt - 1) As Byte
       .Read(val,0,cnt)
         Dim v As String
         For Each t As Byte In Val
             v = v & t
         Next
         if forms("电子称重").opened then
             forms("电子称重").controls("textbox8").value = forms("电子称重").controls("textbox8").value & v
         else
             forms("电子称重").open()
             forms("电子称重").controls("textbox8").value = v

         end if
    End If
End With

 

请教下,是代码有问题吗?

[此贴子已经被作者于2010-7-8 10:10:35编辑过]

 回到顶部
总数 25 1 2 3 下一页