Office中国论坛/Access中国论坛

标题: 关于定时提醒 [打印本页]

作者: jexii 时间: 2005-10-11 00:58
标题: 关于定时提醒
set WshShell = WScript.CreateObject("WScript.Shell")

alerttitle = "定时提醒"

alerttext = vbnewline & vbnewline & "休息一下。" & vbnewline & vbnewline & vbnewline

for i = 1 to 12

WScript.Sleep(1000*60*45)

msgbox alerttext,4096,alerttitle

next

这段程序也是网上找到的,功能是每隔45分钟弹出一个提示窗口,现在我想实现的功能是指定下午4.30分弹出提示,不知道该怎么改

万分感谢

作者: jexii 时间: 2005-10-11 15:53
无人理?

作者: 乙肝自由联盟 时间: 2005-11-10 17:34
用任务计划可以不。如果程序设计中，我使用时钟控制，应用程序要一直运行。请指点，谢谢！！--乙肝自由联盟

作者: liguangming 时间: 2006-3-8 01:23
在VB窗体上设一个定时器，每一分钟计一次数，然后当计数满45时，则弹出一个消息提醒。提醒重新计数。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)