1、电脑上面新建一个文本文档。
2、将新建的文本文档重命名成vbs格式的文件，如：多时段弹出提示信息.vbs。（.vbs是文件的后缀名）
3、在重命名的vbs文件上面单击右键，选择“编辑”。
4、输入以下vbs脚本程序，按下【Ctrl+S】保存并关闭。
Dim ho, mi, se, xx, xb, ti, st, i, i1, i2, i3,i4
On Error Resume Next '忽略运行过程中可能出现的错误
i3 = 0 '初始值设置为0
Do
Set 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 If
If (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 If
If (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 If
WScript.Sleep 1000
Set WshShell = Nothing
Loop
5、双击vbs文件运行程序。
6、待到指定的时间时，将会弹出相关的提示信息。
