要实现自动倒计时退出的消息框，代码如下：
Set wsh = CreateObject("WScript.Shell") wsh.popup "设置完毕，3秒后自动退出！",3,"完毕！",0 set wsh=nothing