求个定时器程序，很简单的就可以

Question

很久没碰这个了，上学的时候还学了的，呵呵，一直做数据库开发，忘记TIMER怎么用了。时间紧迫希望各位大侠帮忙写下
要求：定时（这个时间间隔在1秒以内）监控执行
int checkstat (void)
该函数值为1时执行
readdate()函数

Answer 1

看的不是很懂
是不是要1秒后执行readdate()函数 
还是当int checkstat (void) 
的值为1是执行  readdate()函数 
。

Answer 2

Timer控件的 .Interval属性 就是设置触发周期的，单位是 ms ，把它设置成1000就可以了。在它的 Timer() 事件中写处理代码：Private Sub Timer1_Timer()
    If (checkstat(void) = 1) Then readdate
End Sub

Answer 3

Private Sub Form_Load()
     Timer1.Interval = 1000
End SubPrivate Sub Timer1_Timer()
   if ... then ...
   
End Sub

Answer 4

Timer1.Interval = 1000'表示每秒执行
然后使用if then 判断是否达到条件