1)截获WM_KEYDOWN,使用SetFocus
2)ExitWindowEx (windowsApi 的函数看help即可);
3)作一个window hook吧,就是使用钩子,有按件就 SetWindowPos 吧
你的程序激活.

解决方案 »

  1.   

      kxy,能否将第三个问题的解决方案写得更详细些。谢谢!
      

  2.   

    写windows hook不是一两句就能说清楚的,建议你找书来看.window编程的书
    都有.
    如果你作的是专用软件,可以这样解决,不用编程,但是要保证你的程序安装后机器中不要
    按装其他的自运行软件.
    windows自运行一般有两个方法
    1)在启动菜单中加入

    2)HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run
    中加入
    ,保证你的程序是最后一个运行的.
      

  3.   

    ExitWindowEx模块声明部分的格式如何,请指教。
      

  4.   

    以下是windows API 的帮助
    The ExitWindowsEx function either logs off, shuts down, or shuts down and restarts the system. BOOL ExitWindowsEx(    UINT uFlags, // shutdown operation
        DWORD dwReserved  // reserved
       );
     ParametersuFlagsSpecifies the type of shutdown. This parameter must be some combination of the following values: Value Meaning
    EWX_FORCE Forces processes to terminate. When this flag is set, Windows does not send the messages WM_QUERYENDSESSION and WM_ENDSESSION to the applications currently running in the system. This can cause the applications to lose data. Therefore, you should only use this flag in an emergency.
    EWX_LOGOFF Shuts down all processes running in the security context of the process that called the ExitWindowsEx function. Then it logs the user off.
    EWX_POWEROFF Shuts down the system and turns off the power. The system must support the power-off feature.Windows NT: The calling process must have the SE_SHUTDOWN_NAME privilege. For more information, see the following Res section. Windows 95: Security privileges are not supported or required.
    EWX_REBOOT Shuts down the system and then restarts the system. Windows NT: The calling process must have the SE_SHUTDOWN_NAME privilege. For more information, see the following Res section. Windows 95: Security privileges are not supported or required.
    EWX_SHUTDOWN Shuts down the system to a point at which it is safe to turn off the power. All file buffers have been flushed to disk, and all running processes have stopped. Windows NT: The calling process must have the SE_SHUTDOWN_NAME privilege. For more information, see the following Res section. Windows 95: Security privileges are not supported or required.
     dwReservedReserved; this parameter is ignored.  Return ValuesIf the function succeeds, the return value is nonzero.
    If the function fails, the return value is zero. To get extended error information, call GetLastError. ResThe ExitWindowsEx function returns as soon as it has initiated the shutdown. The shutdown or logoff then proceeds asynchronously. 
    During a shutdown or log-off operation, applications that are shut down are allowed a specific amount of time to respond to the shutdown request. If the time expires, Windows displays a dialog box that allows the user to forcibly shut down the application, to retry the shutdown, or to cancel the shutdown request. If the EWX_FORCE value is specified, Windows always forces applications to close and does not display the dialog box. The ExitWindowsEx function sends a separate notification message, CTRL_SHUTDOWN_EVENT or CTRL_LOGOFF_EVENT as the situation warrants, to console processes. A console process routes these messages to its HandlerRoutine functions, which are added and removed by calls to the SetConsoleCtrlHandler function. ExitWindowsEx sends these notification messages asynchronously; thus, an application cannot assume that the console notification messages have been handled when a call to ExitWindowsEx returns. Windows NT: To shut down or restart the system, the calling process must use the AdjustTokenPrivileges function to enable the SE_SHUTDOWN_NAME privilege. For more information about security privileges, see Privileges. 
    Windows 95: Security privileges are not supported or required.See AlsoAdjustTokenPrivileges, ExitWindows, HandlerRoutine, SetConsoleCtrlHandler 
      

  5.   

    能否把问题说的详细点吗?
    1.开发环境(硬件,软件);
    2.VB的版本;
    3.问题的细节。
    E-mail:[email protected]
      

  6.   

      我的意思是怎样在vb模块中对此函数(ExitwindowEx)进行声明,
    即 Declare Function ....Lib  ...的形式。
      

  7.   

       我们做的这一软件为专用软件,主要用来工厂生产过程的自动控制(环境较为恶劣),
    控制时只使用工控机面板上的按键,所以给编程带来了一些麻烦。
       平台为windows98,软件用vb6开发。因为考虑到不用鼠标,则开机时程序能自动加载
    ,程序退出时亦应安全关机。
       
      

  8.   

    可以考虑将你的程序作为系统外壳(shell),修改注册表即可,具体的资料网上肯定找得到。
      

  9.   

    kxy在吗?
    我的意思是怎样在vb模块中对此函数(ExitwindowEx)进行声明,
    即 Declare Function ....Lib ...的形式。
      

  10.   

    kxy在吗?
    我的意思是怎样在vb模块中对此函数(ExitwindowEx)进行声明,
    即 Declare Function ....Lib ...的形式。
      

  11.   

    难道不知道有VB API Viewer?
    即使没有,有API格式,还不能翻译?
    int,long,ULONG,DWORD=long
    short int=integer
    LPCTSTR=string
    BOOL=boolean
    BYTE,CHAR,UCHAR=Byte
    such as 
    int *iNum=iNum as long
    int iNum=byval iNum as long
    ...
      

  12.   

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

  13.   

     安全关机我是这样用的:shell "c:\windows\rundll32.exe user.exe,exitwindows"
    不知有没有更好的方法?