怎样用vb编写一个事件，到某个时间点触发程序

Question

请教各位高手，用vb怎样做一个，当系统时间到了某一个值的时候，自动触发事件的程序？
需要用什么代码呀？可以具体一点吗？

Answer 1

最简单的方法。假设定在10：00：00
dim a,b as string
a=time()
b="10:00:00"
if cdata(a)=cdata(b) then
要触发的事件
endif

Answer 2

放一个Timer，代码如下：

Private Sub Form_Load()
Timer1.Interval = 1000
End Sub

Private Sub Timer1_Timer()
If Format(Now, "hhmmss") = "214000" Then '晚上9点40，根据需要自行修改
'做什么什么事情
End If
End Sub

Answer 3

加一个Timer1 interval＝1000（正好是一秒，不需要很快的，不然占内存啊），如果你要的时间是12:00:00

Private Sub Timer1_Timer()
If Time = "12:00:00" Then 你要的事件
End Sub

Answer 4

用Addhandler添加一个句柄用来促发时间