[求助]如何做定时报警?
关于定时报警问题我做了个窗体,想在以零点为起点,每间隔1:30弹出对话框报警一次,不知道如何做,请大家帮助
我想用timer控件做,但不行
要用 Timer 做,把 Interval 属性设为 90000 (即 1 分 30 秒转化成毫秒后的数值),再在 Timer 事件中加一句 MsgBox "警告", vbExclamation ,就可以实现简单的报警了。
是1小时30分,不是1分30秒
不,你可以换一种计时方法,将 Interval 属性设为 1000。然后声明全局变量 Hour, Minute。在 Timer 事件中写:
Minute = Minute + 1
If Minute = 60 Then
Minute = 0
Hour = Hour + 1
End If
If Hour = 1 And Minute = 30 Then '当计算到 1:30 时
'执行代码
End If
谢谢,我试试