Question

vb 定时小程序 ！

当到了text2、text3指定时间后显示"时间到"的msgbox提示！

Answer 1

interval=1000
text1=3:30
Private Sub Timer1_Timer()
text2=format(now,mm)
text3=format(now,ss)
if text2 & text3 = text1 then msgbox "时间到!!"
End sub

Answer 2

用TIMER控件。在TIMER事件里判断当前时间与TEXT里的时间是否一致。。

Answer 3

以前做过一个定时响铃的，呵呵