在安装Windows应用程序时,由于更改了系统设定,常常必须要重新启动Windows才能使更改有效。这就造成频繁的退出Windows,显得十分繁琐。实际上可以使用Visual Basic语言编写了个小程序来实现Windows的重新启动,甚至可以实现系统的重新启动。其方法是调用Windows的应用接口函数API:ExitWindows。它支持两个参数。好个参数决定了退出Windows的方式。可选择参数有:&h42——重新启动Windows、&h43——系统热启动,第二个参数为恒为0。建立应用程序的步骤如下:
①进入Visual Basic设计环境,新建个工程项目Project1,在窗体中设置按钮数组Command1(0)、Command1(1)和Command1(3)。各个对象的属性如下:
Form1:Caption:启动工具
backcolor:&H00C00COC0&
Command1(0)Caption:程序重新启动Windows
Command1(1)Caption:系统热启动
Command1(3)Caption:退出
②代码设计。首先在窗体的通用代码区(General)内对所调用的WindowsAPI函数进行声明如下:
Declare Function exitWindows Lib"User"(ByVal dwReturnCode As Long,ByVal wReserved As Integer)As Integer
程序代码如下:
Sub Command1_Click(Lndex As Integer)
Select Case Lndex
Case 0
i=exitWindows(&H43,0) '热启动
Case 1
i=exitWindows(&H42,0) '重新启动Windows
Case 3
End'退出
End Select
End Sub
③程序调试通过后以定的文件名存盘,激活File菜单中的Make Exe File...,可以编译成可执行文件,然后退出Visual Basic环境,在程序管理器中新建个程序项,在程序项特性对话框的命令行栏中输人编译生成的EXE文件的正确路径,并选择个合适的图标,点“确认”就在相应的组窗口中生成了图标。你就可以在安装软件过程中使用这工具大大简化更新启动的步骤,有兴趣的读者不妨试—试。