工作很重要，但別忘了休息

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