在网上搜到一段接收COM口的代码：
（2） 在VFP中，建立一个新的表单
（3） 插入标签 (命名为重量)  
（4） 插入文本 (命名为 TEXT1，用来显示重量数据)
（5） 建立 Microsoft Communication Control1 控件 在工具栏中点插入ole容器控件，选择 Microsoft Communication Control 控件（NAME 为 OLECONTRO1）
（6） 设置 commport = 2 （串口2）
（7） 设置 settings = 1200，e，7，2（1200 波特率，偶校验，7 个数据位，1 个停止位）
（8） 设置 Rthreshold = 17 表示当缓冲区中有 17 个数据等待接受时，产生 OnComm
（9） 在表单的 init 事件中写 thisform.olecontrol1.portopen=.t.，
      释放事件中写 thisform.olecontrol1.portopen = .f.  
（10） 在控件 olecontrol1 的 OnComm 事件中写如下程序代码   
      if = 2    && 缓冲区中有 17 个字符等待接受，产生 OnComm 事件   
      dbbl=subs(this.input,1,17)   && 取串口数据   
      thisform.text1.value=subs(dbbl,5,6)  && 取字符串中的重量数据   
      thisform.refresh
      endif
为什么运行的时候是一串数字和问号在TEXT1中循环滚动？怎么才能接收到正确的称重数据，并在TEXT1中显示出来，让TEXT1中的内容和电子称显示屏上显示的数据相同？

期待高手帮助

好象之前有个类似的贴
https://bbs.bccn.net/viewthread.php?tid=435946&extra=page%3D1%26amp%3Bfilter%3D0%26amp%3Borderby%3Dlastpost%26amp%3Bascdesc%3DDESC&page=1

和这个贴子上的情况不一样

看似是有关系哦，分析一下这句：“为什么运行的时候是一串数字和问号在TEXT1中循环滚动？”。
TEXT1只能显示可打印文本，否则就有“乱码”现象。

thisform.text1.value=subs(dbbl,5,6)  && 取字符串中的重量数据

这个是6字节二进制数格式，它到底是不是你需要的重量，要看对方发送数据的协议是怎样约定的。不要想当然用二进制转换函数。

[ 本帖最后由 TonyDeng 于 2014-9-28 11:31 编辑 ]

数值用 6 个字节存放很有个性。

字节多少还是小事，关键是字节序！

太高深了

取出后加多两个空字节，变8字节（64位数值）就可以用现成的二进制转换函数。