定时提醒小程序：VBScript

　　

---

　　天天坐在电脑前的朋友要每隔一段时间活动一下，不然身体会变得越来越差。下成的vbs脚本可以每隔一段时间来提醒你。

set WshShell = WScript.CreateObject("WScript.Shell") '对话框标题 alerttitle = "定时提醒" '提醒内容,vbnewline为换行符 alerttext = vbnewline & vbnewline & "休息一下，活动一下胳膊，脖子，腰部。" & vbnewline & vbnewline & vbnewline & "生命在于运动"& vbnewline & vbnewline & vbnewline for i = 1 to 12 '12为提醒的次数 WScript.Sleep(1000*60*45) '每45分钟提醒一次 msgbox alerttext,4096,alerttitle next

将上面代码存为：定时提醒.vbs ，然后双击远行，进程中会有一个wscript.exe的进程，结束后他就不会提醒了。

对话框效果：