VB中怎样用Timer控件控制其他事件？

vb6.0可通过对timer控件的enabled
属性、interval
属性在运行进行设置使timer控件启动、停止和重新开始。
timer
控件
通过引发
timer
事件，timer
控件可以有规律地隔一段时间执行一次代码。
enabled
属性，返回或设置一个值，该值用来确定一个窗体或控件是否能够对用户产生的事件作出反应。
通过把
enabled
设置为
false
来使
timer
控件成为无效，将取消由控件的
interval
属性所建立的倒计数。
interval
属性，返回或设置对
timer
控件的计时事件各调用间的毫秒数。
当interval
属性为0时，timer
控件无效。
option explicit
private sub command1_click()
timer1.interval = 1000
timer1.enabled = true
end sub
private sub command2_click()
timer1.enabled = false
end sub
private sub command3_click()
timer1.interval = 0
end sub
private sub form_load()
timer1.interval = 0
timer1.enabled = false
end sub
private sub timer1_timer()
label1 = time
end sub