必威注册电子书籍教程中心网文荟萃客户留言繁體中文
设为首页
加入收藏
联系必威注册
您当前的位置:92动力网 -> 教程中心 -> 编程经验 -> Visual Basic -> 教程内容 退出登录 用户管理
栏目导航
· Visual Basic· Delphi
· Visual C++· C++ Builder
· JAVA DotNet· 其他相关
热门教程
· 如何在Visual Basic...
· 使用Visual Basic操...
· 使用VB6.0设计Activ...
· VB动态调用外部函数...
· 建立一个程序员自己...
· 如何编写高质量的VB...
· [图文] 为更新到Visual Bas...
· 再谈在VB中调用VC++...
· 用VB语言编程实现JP...
· 用DTS实现SQL数据库...
相关教程
· Windows 95 VxD C S...
· 如何在Visual Basic...
· 在Visual InterDev中...
· 在Visual J++中编写...
· 在Visual Baisc.NET...

在Visual Basic中终止Windows 95
作者:佚名聽聽来源:本站整理聽聽发布时间:2005-12-28 23:51:32聽聽发布人:admin

减小字体 增大字体

在Visual Basic程序中,可以使用Windows API函数来重新启动计算机
系统,文本介绍如何退出Windows 95并关闭计算机系统。

# 关闭计算机系统

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

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

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

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

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

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

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

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

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

# 样例程序

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

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

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

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

Const EWX_LOGOFF = 0

Const EWX_SHUTDOWN = 1

Const EWX_REBOOT = 2

Const EWX_FORCE = 4

Const EWX_POWEROFF = 8

Const EWX_RESET = EWX_LOGOFF + EWX_FORCE + EWX_REBOOT

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

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

Private Sub Command1_Click()

Dim X As Long

X = ExitWindowsEx(EWX_RESET, dwReserved)

End Sub

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

[] [返回上一页] [打 印] [收 藏]
∷相关教程评论∷    (评论内容只代表网友观点,与本站立场无关!) [更多评论...]
关于本站 - 网站帮助 - 广告合作 - 下载声明 - 网站地图 - 管理登录
Copyright 2019 必威注册. All Rights Reserved .
浙ICP备05047688号