VB里面单击按钮运行程序

我想设计一个定时关机的程序，按下按钮运行“shutdown.exe -s -t 10 -c 即将关机”，请问如何在VB里面编写代码？
顺便问一下，不用shutdown.exe还有什么别的办法实现关机？

Shell () 函数额可以调用第三方程序。 shutdown是windows管理关机的程序，直接调用
Shell "cmd.exe /c shutdown -s -t 10 -c"

另外，你说要别的办法，用windows API： ExitWindowsEx
ExitWindowsEx需要获取权限

主要代码:
Private Sub Form_Load()
Dim hProcessHandle As Long
Dim hTokenHandle As Long
Dim tmpLuid As LUID
Dim tkpNew As TOKEN_PRIVILEGES
Dim tkpPrevious As TOKEN_PRIVILEGES
Dim lBufferNeeded As Long
'获取当前进程的一个伪句柄
hProcessHandle = GetCurrentProcess()
OpenProcessToken hProcessHandle, TOKEN_ADJUST_PRIVILEGES Or TOKEN_QUERY, hTokenHandle
LookupPrivilegeValue "", "SeShutdownPrivilege", tmpLuid
tkpNew.PrivilegeCount = 1
tkpNew.TheLuid = tmpLuid
tkpNew.Attributes = SE_PRIVILEGE_ENABLED
lBufferNeeded = 0
'允许当前应用程序有关闭操作系统的权限
AdjustTokenPrivileges hTokenHandle, False, tkpNew, Len(tkpPrevious), tkpPrevious, lBufferNeeded
End Sub
Private Sub Command1_Click()
'重新启动计算机
ExitWindowsEx EWX_REBOOT, 0
End Sub
Private Sub Command2_Click()
'关闭计算机
ExitWindowsEx EWX_FORCE Or EWX_SHUTDOWN, 0
End Sub
Private Sub Command4_Click()
ExitWindowsEx EWX_LOGOFF, 0
End Sub追问

这是怎么回事？

温馨提示：内容为网友见解，仅供参考

当前网址：https://11.t2y.org/zz/87sqf7vqf.html