使用vbs脚本程序多时段弹出提示信息

1、电脑上面新建一个文本文档。

2、将新建的文本文档重命名成vbs格式的文件，如：多时段弹出提示信息.vbs。（.vbs是文件的后缀名）

3、在重命名的vbs文件上面单击右键，选择“编辑”。

4、输入以下vbs脚本程序，按下【Ctrl+S】保存并关闭。Dim ho, mi, se, xx, xb, ti, st, i, i1, i2, i3,i4On Error Resume Next '忽略运行过程中可能出现的错误i3 = 0 '初始值设置为0DoSet WshShell = CreateObject("Wscript.Shell")st = vbYesNo + vbInformation + vbDefaultButton1 '弹窗提示类型ho = Hour(Now) '小时mi = Minute(Now) '分钟se = Second(Now) '秒钟ti = "温馨提示" '提示的标题xx = "请休息5分钟再工作！" '提示内容xb = "准备下班，赶紧把工作做完！" '提示内容yx = "程序已经启动"If i3<>1 then i3 = 1 i = WshShell.popup(yx, 10, ti, st) '弹窗提示10秒后自动关闭End IfIf (ho = 9 Or ho = 11 Or ho = 15 Or ho = 16) And mi = 30 And se < 5 Then i = WshShell.popup(xx, 10, ti, st) '弹窗提示10秒后自动关闭End IfIf (ho = 11 And mi = 30 And se < 5) Or (ho = 17 And mi = 00 And se < 5) Then i = WshShell.popup(xb, 10, ti, st) '弹窗提示10秒后自动关闭End IfWScript.Sleep 1000Set WshShell = NothingLoop

5、双击vbs文件运行程序。

6、待到指定的时间时，将会弹出相关的提示信息。