始创于2000年 股票代码:831685
咨询热线:0371-60135900 注册有礼 登录
  • 挂牌上市企业
  • 60秒人工响应
  • 99.99%连通率
  • 7*24h人工
  • 故障100倍补偿
您的位置: 网站首页 > 帮助中心>文章内容

在VisualBasic中终止Windows95

发布时间:  2012/6/24 16:58:49
#关闭计算机系统

可以使用WindowsAPI的ExitWindowsEx函数来从VisualBasic程序中重新启动计算机系统。要使用该函数,需要将如下声明语句包含在窗体的通常声明部分中:

PrivateDeclareFunctionExitWindowsExLib"user32"(ByVal
uFlagsAsLong,ByValdwReservedAsLong)AsLong

ExitWindowsEx函数需要2个参数,可以使用一个或多个下面的标识的组合来告诉ExitWindowsEx函数希望进行关机过程。

EWX_FORCE所有的进程都被强制终止。

EWX_LOGOFF所有的进程被强制终止,并且用户退出登录(loggedoff)。

EWX_POWEROFF计算机系统被关机,并且如果支持节电特性,则计算机被物理关机。

EWX_REBOOT计算机系统被关机并重新启动。

EWX_SHUTDOWN计算机被物理地安全地关机。

下面的样例程序中使用了上面的三个标识的组合。该标识组合(EWX_LOGOFF,EWX_FORCE,以及EWX_REBOOT)告诉Windows95退出所有正
在执行的进程,使用户退出网络登录,使计算机系统处于准备状态以供用户关机。

#样例程序

该样例程序显示了如何关闭计算机系统。

1.在VisualBasic中开始一个新的项目,采用缺省的方法建立Form1。

2.将如下常量和声明语句添加到Form1的通常声明部分中(注意该声明语句需要书写在一行内):

PrivateDeclareFunctionExitWindowsExLib"user32"(ByVal
uFlagsAsLong,ByValdwReservedAsLong)AsLong

ConstEWX_LOGOFF=0

ConstEWX_SHUTDOWN=1

ConstEWX_REBOOT=2

ConstEWX_FORCE=4

ConstEWX_POWEROFF=8

ConstEWX_RESET=EWX_LOGOFF EWX_FORCE EWX_REBOOT

3.在Form1上添加一个命令按钮控件,采用缺省的方法建立Comand1。将它的Caption属性设置为“重新启动计算机”。

4.将如下代码添加到Command1的单击事件中:

PrivateSubCommand1_Click()

DimXAsLong

X=ExitWindowsEx(EWX_RESET,dwReserved)

EndSub

按下F5来运行上述样例程序,单击命令按钮,即可重新启动计算机系统。->

 




本文出自:亿恩科技【www.enkj.com】

服务器租用/服务器托管中国五强!虚拟主机域名注册顶级提供商!15年品质保障!--亿恩科技[ENKJ.COM]

  • 您可能在找
  • 亿恩北京公司:
  • 经营性ICP/ISP证:京B2-20150015
  • 亿恩郑州公司:
  • 经营性ICP/ISP/IDC证:豫B1.B2-20060070
  • 亿恩南昌公司:
  • 经营性ICP/ISP证:赣B2-20080012
  • 服务器/云主机 24小时售后服务电话:0371-60135900
  • 虚拟主机/智能建站 24小时售后服务电话:0371-60135900
  • 专注服务器托管17年
    扫扫关注-微信公众号
    0371-60135900
    Copyright© 1999-2019 ENKJ All Rights Reserved 亿恩科技 版权所有  地址:郑州市高新区翠竹街1号总部企业基地亿恩大厦  法律顾问:河南亚太人律师事务所郝建锋、杜慧月律师   京公网安备41019702002023号
      1
     
     
     
     

    0371-60135900
    7*24小时客服服务热线