首页 >> 读书频道 >> 电脑 >> 在VB中终止Win9X
 
· CSS2中有哪些新特点?
· 回调(CallBacks
· 使Shell指令具Wai
· 使Shell指令具Wai
· 从任务列表中隐藏
· 闪烁的标题栏
· VB实现SQL功能上
· 使用XML上传文件下
· 使用XML上传文件上
· 关于算法的一些想法
· 得到光驱的盘符
· 用API函数遍历文件一
 
· 电视剧《刁蛮公主》下载和
· 美容养颜手册
· 加油金顺剧情分集介绍完整
· 红楼梦:120回全本[清
· 素质教育在美国
· 全唐诗卷四十六
· 韩剧《布拉格恋人》剧情介
· 夜航船[作者:明·张岱]
· 局外人[作者:韩·可爱淘
· 现场流行病学
· 源氏物语[日本:紫式部]
· 武林寓言故事
 
· (出租)中动商场部分及写
· (出租)中动动漫基地&#
· 喜剧学院
· 《善德女王》剧情介绍
· 魔女18号 剧情
· 丑女无敌剧情介绍
· 魔女幼熙剧情介绍
· 龙游天下剧情介绍
· 震撼世界的七日剧情介绍
· 静静的白桦林剧情介绍
· 心情日记—老公今天我想对
· 旗舰剧情介绍
欢迎来到月影社区!如果您觉得这里不错,请推荐给您的朋友们。月影社区:http://wf66.com/

在VB中终止Win9X


查看有无更新版本

关键字:VB 2006-9-18

 

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

可以使用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来运行上述样例程序,单击命令按钮,即可重新启动计算机系统。

在VB中终止Win9X

[ 1 ]
在VB中终止Win9X num

打印本页 关闭

关于我们版权声明本站导航友情连结作品演示 TOP↑