|
Private Declare Function SHRestartSystemMB Lib "shell32" Alias "#59" (ByVal hOwner As Long, ByVal sExtraPrompt As String, ByVal uFlags As Long) As Long
Const EWX_LOGOFF = 0
Const EWX_SHUTDOWN = 1
Const EWX_REBOOT = 2
Const EWX_FORCE = 4
Const EWX_POWEROFF = 8
Private Sub Form_Unload(Cancel As Integer)
SHRestartSystemMB Me.hWnd, PROMPT, EWX_LOGOFF
End Sub
关键字:VB,关机,对话框,SHRestartSystemMB
2007-1-5 9:02:52 |
