如何在应用程序中实现关机功能

原创 2001年05月12日 06:50:00

 

      VB 6.0开发应用程序时,用户要求在程序内部加入直接关机功能, 使操作全部集中于应用程序的内部进行。为此,笔者编制程序,进行Windows API函数调用,成功地实现了Windows 9x“关闭系统”仿真功能,满足了用户要求,现将设计过程列举如下:

  一、设计关机系统界面

  新建工程文件及窗体Form1,Form1中加入选项控件Option1、 Option2 、 Option3,将它们Caption 属性依次设为“关闭计算机(S)”、“重新启动计算机(R)”、“关闭所有程序并以其他用户身份登录”;再加入命令按钮Command1和Command2、Command3且Caption属性分别设为“是”、“否”、“帮助”。即设计一个Windows 98“关闭系统”的仿真界面。

  二、通用事件代码中对API 函数ExitWindowsEx( )进行声明

  VB 6.0应用程序设计时,调用丰富Windows API 函数能完成VB本身没有提供或无法实现的功能,这些函数都属于“操作系统”级别,能使应用程序增添不少色彩。其中ExitWindowsEx( )函数具备关闭Windows系统的功能,调用前必须进行声明:

  Declare Function ExitWindowsEx Lib ″user32″( ByVal uFlags As Long,ByVal dwReserved As Long) As Long

  参数说明:此函数有两个参数vFlags、dwReserved,其中vFlags参数决定用户需要做的关机操作,dwReserved参数是作为保留而没有使用。

    vFlags 参数可以取以下几种常量(或相应值):

    EWX_ShutDown   1 关闭计算机

    EWX_ReBoot     2 重新启动计算机

    EWX_LogOff     0 关闭所有程序并以其他用户身份登录

  三、关机功能所有程序代码清单如下:

  ′通用代码中对ExitWinwodsEx( )函数声明

  Private Declare Function ExitWindowsEx Lib ″user32″ (ByVal uFlags As Long,ByVal dwReserved As Long) As Long

  Const ShutDown = 1

  Const ReBoot  = 2

  Const LogOff  = 0

    Private Sub Command1_Click()

  Dim Sh As Long

  If Option1.Value = True Then  

   ′关闭计算机选项

  Sh = ExitWindowsEx(ShutDown, dwReserved)

    End If

    If Option2.Value = True Then

     ′重新启动计算机选项

    Sh = ExitWindowsEx(ReBoot, dwReserved)

    End If

    If Option3.Value = True Then

     ′关闭所有程序并以其他用户

     身份登录选项

    Sh = ExitWindowsEx(LogOff, dwReserved)

    End If

    End Sub

    Private Sub Command2_Click()

    Unload Me

    End Sub

    F5运行程序,即进行关机操作!该功能加入用户开发的应用程序,相当实用。

Android学习之调用系统相机实现拍照功能

一、今天,来介绍如何调用系统自带的相机进行拍照,主要有以下2种实现的方式: 1、Camera应用程序包含了一个意图过滤器,即intent filter,它使得开发人员能够提供与Camera应用程序同...
  • u012561176
  • u012561176
  • 2015年11月28日 12:26
  • 5325

怎么实现调用手机系统拨号和呼叫程序

Permission     在Android系统中,敏感操作(涉及隐私的,安全的,可能产生费用的)都需要申请相应的权限,且当应用程序被安装到设备上之前,会列举当前应用程序所申请的权限,用户可以选择继...
  • q394895302
  • q394895302
  • 2015年12月31日 13:35
  • 1126

MFC: 获得关机消息;阻止Windows关机

WM_QUERYENDSESSION消息是Windows向你询问Windows能否关闭,WM_ENDSESSION消息表示提示你Windows即将关闭。故当应用程序退出时, WM_QUERYENDSE...
  • mao0514
  • mao0514
  • 2017年02月22日 15:56
  • 3817

精彩编程与编程技巧-应用程序中实现关机功能...

  • 2009年10月09日 00:03
  • 2KB
  • 下载

让CORTANA实现关机,打开你想要打开的应用程序

在开始菜单中,找到“Windows 附件”,然后找到“Internet Explorer”,右键单击,然后点击“打开文件所在的位置": 在资源管理器的地址栏中,单击“Programs”,转到当前用...
  • Lucky_JIE_AK
  • Lucky_JIE_AK
  • 2016年07月30日 17:05
  • 3230

VC++ 实现定时关机或休眠-MFC 对话框应用程序介绍文档

  • 2015年03月31日 18:37
  • 437KB
  • 下载

VC++ 实现定时关机或者休眠-MFC 对话框应用程序

  • 2015年03月31日 18:29
  • 58KB
  • 下载

一个简单的任务管理器,实现 了应用程序和进程二个功能

  • 2010年03月27日 16:55
  • 7.05MB
  • 下载

在JAVA应用程序中如何实现FTP的功能

  • 2007年06月30日 13:15
  • 83KB
  • 下载

在JAVA应用程序中如何实现FTP的功能 (转).txt

  • 2010年12月26日 21:45
  • 3KB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:如何在应用程序中实现关机功能
举报原因:
原因补充:

(最多只允许输入30个字)