vb编写关机程序

来源：百度知道 编辑：UC知道 时间：2024/05/27 06:59:12
Private Sub Timer1_Timer()
V = MsgBox("确认要关机吗？", vbYesNo + vbQuestion, "???")
If V = vbYes Then
If glngWhichWindows32 = mlngWindowsNT Then
AdjustToken
End If
shell "cmd /c shutdown -u -t 1"
End If
End Sub
忘了问了，我想问这段程序分别是什么意思。。。能不能帮忙注释下。
glngWhichWindows32
mlngWindowsNT
AdjustToken
shell "cmd /c shutdown -u -t 1

特别是SHELL “CMD /C SHUTDON -U -T 1"
这是什么意思，貌似有许多这样得参数可用，能不能帮忙找些，并说说原理。

shell "cmd /c shutdown -u -t 1"

为什么不能关机啊。。。好像这条命令不好用。。是不是360之类的给阻挡了。但也没有提示啊

glngWhichWindows32 = mlngWindowsNT是对系统平台作判断，是否为NT系统
NT系统下使用AdjustToken获得权限验证
shutdown 使用参shutdown /?
用法: shutdown [-i | -l | -s | -r | -a] [-f] [-m \\computername] [-t xx] [-c "co
mment"] [-d up:xx:yy]

没有参数 显示此消息(与 ? 相同)
-i 显示 GUI 界面，必须是第一个选项
-l 注销(不能与选项 -m 一起使用)
-s 关闭此计算机
-r 关闭并重启动此计算机
-a 放弃系统关机
-m \\computername 远程计算机关机/重启动/放弃
-t xx 设置关闭的超时为 xx 秒
-c "comment" 关闭注释(最大 127 个字符)
-f 强制运行的应用程序关闭而没有警告
-d [u][p]:xx:yy 关闭原因代码
u 是用户代码
p 是一个计划的关闭代码
xx 是一个主要原因代码(小于 256 的正整数)