您的位置首页生活百科

VB快速关机源代码

VB快速关机源代码

在公共指哪举标准模块中声明WIN API: Public Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long 在按钮事件中用如下代码可关机: Private Sub Command1_Click() ExitWindowsEx 1, 0 End Sub 在唯碧按钮事件中用如下代码可重启: Private Sub Command1_Click() ExitWindowsEx 2, 0 End Sub上述代码在WIN9X系统未见问题,在WIN2000不能实现。缓乱WINXP有些版本无问题。以下是“逍遥忘我”网友的答复:Shell "shutdown.exe -s -f -t 0",vbhide