以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]请教地磅称重数据稳定之后才可以保存的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=71716)
--  作者：nuhou
--  发布时间：2015/7/16 17:53:00
--  [求助]请教地磅称重数据稳定之后才可以保存的问题

从com口读取到的数值显示在label里面，然后用按钮保存数值。

 

现在想实现的是，显示一个数值稳定不变化之后1秒或者2秒，按按钮才可以保存。这样可以防止汽车在上地磅的过程中，可以保存数值。

 

请教应该怎么实现，谢谢了！！！
--  作者：大红袍
--  发布时间：2015/7/16 18:12:00
--  

 去编写timertick事件，间隔弄成1、2秒

 

static pval as double = 0

Dim diff As Double = pval - e.Form.Controls("Label1").Text

If Math.Abs(diff) < 0.5 Then

    msgbox(pval)

Else

    pval =  e.Form.Controls("Label1").Text

End If