工作很重要，但别忘了休息
2006-08-11 17:06
330 查看
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
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
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- 一个开发团队、软件公司，团队工作氛围很重要，没有好氛围难出好产品、好项目
- 休息了两天，现继续工作！
- 工作虽然很重要，但是健身更重要
- 工作,心态很重要...
- win7系统边休息边下载的离开模式让你省电工作两不误
- 【读图】如何为了更高效的工作而休息！
- 一周无聊的工作终于过去了，周六休息～
- 排日程 某保密单位机要人员 A，B，C，D，E 每周需要工作5天，休息2天。
- 我们工作到底为了什么？（这篇文章很重要，强烈推荐）
- 一个开发团队、软件公司，团队工作氛围很重要，没有好氛围难出好产品、好项目
- 工作休息之余的生活乐趣
- 工作和休息已没有明显的界线
- 我们工作到底为了什么（这篇文章很重要）----强烈推荐
- 如何平衡工作和休息
- 大数据揭秘高效工作秘诀：工作52分钟休息17分钟
- 专家建议：“电脑族”应工作两小时休息一刻钟
- 突然看到，想想也是，工作或是生活遇到这样的事情，应该休息一下子了。
- 一个开发团队、软件公司，团队工作氛围很重要，没有好氛围难出好产品、好项目
- 我们工作到底为了什么（这篇文章很重要）----强烈推荐
- 我们工作到底为了什么（这篇文章很重要）----强烈推荐