这段代码留作纪念:保存为yofi.vbs加入到开始菜单
(2009-10-05 23:57:51)
标签:
坏坏娇娇闹闹it |
set WshShell = WScript.CreateObject("WScript.Shell")
'对话框标题
alerttitle = "生命是夏日最美的那朵莲花!"
'提醒内容,vbnewline为换行符
alerttext = vbnewline & vbnewline
&
"呀,小哥哥,你好健康好有活力啊……我喜欢你眼睛中的单纯和坚定,还有大大的……嘿嘿,我们的孩子也在为爸爸加油,他(她)急切地要出来啊~~~"
& vbnewline & vbnewline
& "别忘了锻炼,好好吃饭,你的健康就是娇娇和我们的孩子的,记住啊,小坏坏~~~"
& vbnewline & vbnewline
& "加油,加油,加油!!"&
vbnewline & vbnewline &
vbnewline
for i = 1 to 12'12为提醒的次数
WScript.Sleep(1000*60*30)'每30分钟提醒一次
msgbox alerttext,4096,alerttitle
next
'对话框标题
alerttitle = "生命是夏日最美的那朵莲花!"
'提醒内容,vbnewline为换行符
alerttext =
for i = 1 to 12
WScript.Sleep(1000*60*30)
msgbox alerttext,4096,alerttitle
next
前一篇:新生儿护理注意事项
后一篇:大学教授为吴英鸣不平

加载中…