|
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 |