计时器(timer)这个控件的应用重点是它的Interval属性和timer事件。本文来补充一个例子，运行时在计时器控件的timer事件中控制label控件的位置形成动画效果，如下图：

本例通过在timer事件中操作标签控件的top属性来实现标签上下移动的动画。如果要制作左右移动的动画，原理是一样的，在timer事件中操作标签控件的left属性即可。

本例制作过程：

1、新建表单，width属性值设为290，height属性值设为160，caption属性值设为“编程入门网-用timer实现动画”，AutoCenter属性值设为.t.，保存为“动画.scx”。

2、向表单上添加一个label控件，caption属性值设为“编程入门网”，fontsize属性值设为12，forecolor属性值设为“255,0,0”。

3、向表单上添加一个timer控件，interval属性值设为50。

4、添加事件代码：

timer控件的timer事件代码：

if thisform.label1.top<0 &&成立说明label已经移出了表单的上边界，则重置它的位置 thisform.label1.top=300 thisform.label1.top=thisform.label1.top-5 &&向上移动5像素else thisform.label1.top=thisform.label1.top-5 endif

5、运行“动画.scx”。

本例代码在Win2003+VFP6.0环境下调试通过。

本文源自：翔宇亭——IT乐园（http://），转载请保留此信息！