如何出现关机窗口！
如何出现关机窗口！
我急着要！
问题点数：20、回复次数：3Top
1 楼shawls（VB Fan)(QQ:9181729）回复于 2001-02-27 20:19:00 得分 20
新建一个工程，在窗体上加一个按钮！
加入一下代码：
Private Declare Function ShutDownDialog Lib "shell32" Alias "#60" (ByVal YourGuess As Long) As Long
Private Sub Command1_Click()
'示例:
ShutDownDialog 0&
End Sub
Top
2 楼sundayboys（sunboy）回复于 2001-02-27 20:20:00 得分 0
ExitWindowsEx
VB声明
Declare Function ExitWindowsEx Lib "user32" Alias "ExitWindowsEx" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
说明
退出windows，并用特定的选项重新启动
返回值
Long，非零表示成功，零表示失败。会设置GetLastError
参数表
参数 类型及说明
uFlags Long，指定下述一个或多个标志（用OR运算符合并到一起）
EWX_FORCE 强迫中止没有响应的进程
EWX_LOGOFF 中止进程，然后注销
EWX_SHUTDOWN 关掉系统电源（如果可能的话，ATX电源就可以）
EWX_REBOOT 重新引导系统
EWX_SHUTDOWN 关闭系统
dwReserved Long，保留，设为零
注解
这个函数调用后会立刻返回，系统关闭过程是在后台进行的。注意先中止自己的应用程序，使关闭过程更显平顺。当然，您的进程必须有足够的优先权，否则也不能执行这种操作
Top
3 楼vbplayboy（VB花花公子）回复于 2001-02-27 20:25:00 得分 0
我试过小山的方法了可行给他加分吧Top
