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