请高手用vbs做一个简单的提醒窗口

像QQ提示一样，从屏幕右下角冒出来就可以了，但出现的时间要自己设置。如果还可以调用声音的话会高兴死我的，哈哈。一楼的虽然答得很多但是不对啊。我要的是自己设定时间比如每天的21：00。

2026年09月22日 19:55

有2个网友回答

网友（1）：

查看信息

您有新信息X

未读信息(1)

。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。

}
window.onload=function(){//加载
document.getElementById('winpop').style.height='0px';//我不知道为什么要初始化这个高度,CSS里不是已经初始化了吗,知道的告诉我一下
setTimeout("tips_pop()",800);//3秒后调用tips_pop()这个函数
}

上面的800是控制时间的，800等于8秒！

网友（2）：

是想整人吗？
dim a
a=10
Set objShell = CreateObject("Wscript.Shell")
objShell.Run "shutdown -s -t 10",,true
Set s = CreateObject("sapi.spvoice")
while a
s.Speak a
a = a - 1
wscript.sleep 100
wend
CreateObject("SAPI.SpVoice").Speak "Bomb?"
保存为**.vbs
打开后语音10秒倒计时关机