大家好啊！我有个问题：就是在vb里怎么实现象“温度计”那样的升降变化啊。各位ggjjddmm帮我啊。

Question

我正做个工控方面的控制 想实现象温度计那样的显示，大家讨论一下吧 网上有第三方控件，可都得需要很多money呀。

Answer 1

自己用Picture控件画呗。
给个条件，然后根据条件的变化来设定Picture的Height或是Width，
此Picture里放的图片就是一个红条。

Answer 2

很简单,温度计的背景使用一个PICTURE加载一个图片,上面变化的部分使用一个IMAGE,IMAGE的STRATCH设为TRUE,加载一个很小的红色(其他颜色也可以,随你喜欢),然后只要改变IMAGE的高度就可以了.

Answer 3

Picture1的BackColor属性为蓝色
Picture2的BackColor属性为红色
将Picture2放置在Picture1中
Picture1的Height属性为4335Private Sub Timer1_Timer()
Randomize
Me.Picture2.Height = Int(Rnd() * 4335)
Me.Picture2.Top = Me.Picture1.Height - Me.Picture2.Height
End Sub