VBA制作定时器

1、打开Access数据库，新建一个空的数据库。

2、点击工具栏创建-->窗体设计。

3、窗体的具体布局如图所示。Label1的初始值设置为0.

4、找到窗体属性，找到计时器间隔设置参数为1000并选择计时器触发属性为【事件过程】，点击后面的 "..."按钮进入事件过程编写代码。

5、定义flag类型为布尔值类型变量。

timer事件中，当flag为真时，Label1标签加一

6、找到开始计时按钮的点击事件，进入代码编辑，设置flag=true。

7、停止计时按钮点击事件，设置flag=false

8、点击窗体视图进行测试。点击开始计时按钮从0开始计时，点击停止计时按钮就会停止。