Question

关于VB中Label的问题!VB高手帮帮忙

我想让Label从窗体的一边飞到一定位置停止,请问如何设置写代码啊?
大家帮忙啊!本人感激不尽!
麻烦一下,能把具体些的代码写出来吗?谢谢啦!

我想让那个Label飞到一定位置定在那里,如何实现啊?

Answer 1

用一个时间控件，然后设置时间空间的interval设为100毫秒。每次tick事件设置label的left值加1，然后判断left的值，如果值满足设定的条件，就把时间控件disable。这样就可以了。

Answer 2

Private Sub Timer1_Timer()
Label1.Left = Label1.Left + 100
If Label1.Left >= Form1.Width - Label1.Width Then
Timer1.Enabled = False
End If
End Sub

在窗体上添加一个timer和label

设置timer的interval为10

其他全不用动，运行就下就能看见了。