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,保留,设为零 
注解 
这个函数调用后会立刻返回,系统关闭过程是在后台进行的。注意先中止自己的应用程序,使关闭过程更显平顺。当然,您的进程必须有足够的优先权,否则也不能执行这种操作 

解决方案 »

  1.   

    关闭(或重启)Windows  要关闭Windows,可利用API函数ExitWindowsEx(),它能够实现“注销当前用户”、“关闭Windows”以及“关闭Windows并重启”等功能,具体格式和用法如下:  ExitWindowsEx(关闭类型参数,系统保留参数);  其中,系统保留参数无特定意义,一般写0即可;关闭类型可以是以下几种:  EWX_FORCE:强制关闭,Windows不会发送任何消息给正运行的程序,这可能导致数据丢失;  EWX_LOGOFF:关闭所有正在运行的程序,注销当前用户并重新登录;  EWX_POWEROFF:关闭Windows并关机,当然,系统必须支持电源管理;  EWX_REBOOT:关闭Windows并重新启动;  EWX_SHUTDOWN:关闭Windows,缓冲区内的数据将被写入磁盘。
      

  2.   

    Declare Function ExitWindows Lib "User" (ByVal dwReturnCode As Long, ByVal wReserved As Integer) As Integer
         注释:执行 
         Dim DUMMY 
         DUMMY=ExitWindows(0,0)
      

  3.   

    关闭(或重启)Windows  要关闭Windows,可利用API函数ExitWindowsEx(),它能够实现“注销当前用户”、“关闭Windows”以及“关闭Windows并重启”等功能,具体格式和用法如下:  ExitWindowsEx(关闭类型参数,系统保留参数);  其中,系统保留参数无特定意义,一般写0即可;关闭类型可以是以下几种:  EWX_FORCE:强制关闭,Windows不会发送任何消息给正运行的程序,这可能导致数据丢失;  EWX_LOGOFF:关闭所有正在运行的程序,注销当前用户并重新登录;  EWX_POWEROFF:关闭Windows并关机,当然,系统必须支持电源管理;  EWX_REBOOT:关闭Windows并重新启动;  EWX_SHUTDOWN:关闭Windows,缓冲区内的数据将被写入磁盘。
      

  4.   

    Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
    Private Sub Command1_Click()
    '关闭系统
    aa = ExitWindowsEx(EWX_SHUTDOWN, 1)
    End Sub
      

  5.   

    Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
    Private Const EWX_SHUTDOWN = 1
    Private Sub Command1_Click()
    '关闭系统
    aa = ExitWindowsEx(EWX_SHUTDOWN, 1)
    End Sub
      

  6.   

    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,保留,设为零 
    注解 
    这个函数调用后会立刻返回,系统关闭过程是在后台进行的。注意先中止自己的应用程序,使关闭过程更显平顺。当然,您的进程必须有足够的优先权,否则也不能执行这种操作