关于VB持续获取电子秤数据并显示在文本框中

无心向佛 2017-05-23 09:19:11
电子秤应该是自动连续发送数据的。
电子秤用串口调试助手收到的数据如下:

怎样才能在lable控件中持续显示重量如下图:


我自己写的程序好像把ST 8.447 g所有数据全部都获取过来了,我要的是只获取8.447

求各位大哥帮忙写一下程序。。万分感谢



...全文
686 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
jainkai 2017-11-18
  • 打赏
  • 举报
回复
楼主 你这么获取全部数据的啊 可以把源码贴一下吗
of123 2017-05-24
  • 打赏
  • 举报
回复
Dim a As String
a = "ST 0008.447 g"
Label1 = Val(Mid(a, 5))
zdingyun 2017-05-24
  • 打赏
  • 举报
回复
    Dim a, b
    a = "ST  0008.447 g"
    b = Val(Mid(a, 5, 8))
    MsgBox b
脆皮大雪糕 2017-05-23
  • 打赏
  • 举报
回复
试试这个是不是你想要的

Dim a As String, b As String
a = "ST  0008.447 g"
b = Format(Trim(Replace(Replace(a, "ST", ""), "g", "")), "0.000")
MsgBox b

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧