VBS倒计时关机命令

 很久很久之前知道WIN+R 输入shutdown -s -t 60 可以实现关机。
想设定时间关机，

就又重新搜索了下bat关机命令。然而搜索过来，发现可以
实现关机，但有时候想自定义倒计时多长时间实现关机，没找到
代码。直接用shutdown命令还要把分钟或者小时换算成秒，比较
麻烦。后来决定自己整一个。不多说了，直接主题吧：
代码如下：
------------------------------------------------------------
y=inputbox("请输入倒计时关机时间【单位：分钟】")
if y="" then
set D=createobject("wscript.shell")
msgbox("您已取消倒计时关机")
D.run"cmd.exe /c shutdown -a"
else
z=y*60
x=msgbox("系统将在"&y&"分钟后关机",vbokcancel)
if x=vbok then
set D=createobject("wscript.shell")
msgbox("系统将在"&y&"分钟后关机")
D.run"cmd.exe /c shutdown -s -t " &z
elseif x=vbcancel then
set D=createobject("wscript.shell")
msgbox("您已取消倒计时关机")
D.run"cmd.exe /c shutdown -a"
end if
end if
---------------------------------------------------------------
使用方法：新建文本文档，复制红色代码，另存为**.vbs 双击即可。