1、交互式网络实验模拟系统的设计与实现Internet Environment Experiment Simulation System Developed Using VB吕晓奕 * 孟昭鹏 * 张树俊 * 天津大学电子信息工程学院计算机系 E-mail: * 天津大学网络教育学院 E-mail: 随着计算机和网络在世界上的快速发展和普及，网络教学也得到了广泛的开展。现代远程教育要将大量的实例与图解动态地演示出来，引入虚拟实验可以帮助学习者完成实验教学环节，提高学习者的工程实践能力，同时也节约教学资源。虚拟实验系统的实现是目前网络教学系统开发中的难点问题之一，本文主要介绍为了计算机网络课程中需要
2、进行的实验环节，而采用 VB 开发的网络实验模拟系统。本文着重分析了在 Windows NT 安装过程模拟实验的设计中遇到的问题及其解决方法。关键词： VB ProgressBar MsgBox UpDown PasswordChar 1 引言现代远程教育与传统的教学方式相比，除没有学习时间、地点的局限和可以由学习者自己安排学习时间和学习进度之外，还可以充分利用计算机独有的特色，增强学习的趣味性和交互性。网络教学不是单纯将文字、图片移到网上，而要将大量的实例与图解动态地演示出来，将平时在普通教室中无法看到和感受到的东西展示在广大的用户面前。虚拟实验可以帮助学习者完成实验教学环节，提高学习者的工
3、程实践能力，同时也节约教学资源。虚拟实验系统的实现是目前网络教学系统开发中的难点问题之一。2 模拟试验的实现方法本系统主要通过对计算机网络课程中需要进行的实验环节进行模拟，在学习者的参与下完成Windows NT 的安装、远程访问服务器安装等功能,具有真实感和交互性。下面详细地介绍采用 Visual Basic 实现有关 Windows NT 的安装过程的模拟实验系统的主要步骤。2.1 模拟试验开始启动后,用户将进入 Windows NT 基于文本的安装阶段，出现 Windows NT 安装欢迎界面。在基于文本的安装阶段，实验者不能通过点击鼠标来实现控制，只能通过按动键盘来实现各种功能选择和页
4、面转换。其中按键是通过 KeyDown 事件和 KeyUp 事件来实现的。按下键 （KeyDown） 及松开键 （KeyUp）事件报告键盘本身准确的物理状态，与此成对照的是，KeyPress 事件并不直接地报告键盘状态。KeyDown 和 KeyUp 事件通过 Keycode 和 Shift 两参数返回输入字符的信息。其中 Keycode 指示按下的物理键,Shift指示 SHIFT、CTRL 和 ALT 键的状态。实现这一功能的代码为：Private Sub Form_KeyDown （KeyCode As Integer, Shift As Integer）Select Case KeyC
5、odeCase Is = vbKeyF3 /如果按下的为 F3 键Form1.ShowCase Is = vbKeyReturn /如果按下的为 ENTER 键Form2.HideForm3.ShowEnd SelectEnd Sub2.2 检测大容量存储设备模拟程序将询问是否自动检测大容量存储设备。如果用户所用的大容量存储设备在 HCL 中，则这些设备将检测到并显示在屏幕上。如果用户所用的大容量存储设备不在 HCL 中，则可以按 S 键进行手工设置。在模拟实验中要求用户默认其所使用的大容量存储设备在 HCL 中，如果用户键入 S 则安装程序将弹出一个如图 1 所示的对话框来提示用户应该进行的
6、操作。图 1 检测大容量存储设备的提示这里使用的是预定义对话框中的一种名为 MsgBox 的函数，其实现方法为：在程序执行过程中，如果出现了错误操作，系统会弹出一个对话框告诉实验者此处执行错误并告知正确的操作方向。使用InputBox 函数实现用户输入相关信息的要求。系统用消息对话框来显示信息时，用 MsgBox 函数获得“是”或者“否”的响应，并显示简短的消息，比如：错误、警告或者对话框中的期待，可选取一个按钮来关闭该对话框。实现上述功能的部分代码为：Private Sub Form_KeyDown （KeyCode As Integer, Shift As Integer）Select C
7、ase KeyCodeCase Is = vbKeySA=MsgBox（“本实验默认进行这个检测，请点击“确定”“, vbExclamation + vbOKOnly, “Windows NT Server 4.0 安装模拟“）End Select /如果按 S 键，则弹出消息对话框End Sub2.3 检测硬件、配置硬盘分区、选择文件系统和安装目录安装模拟程序将检测并显示出计算机中的其他的硬件设备信息列表。如果用户所用的某硬件设备与上述信息不符，可以使用上、下方向键更改对应列表项。如果所用硬件设备与上述显示信息相符，则配置用于存放系统文件的硬盘分区，该硬盘分区的容量大小必须满足前面所提到的安
8、装时硬盘空间最小需求。在相应的安装画面中出现硬盘分区以及尚未分区的自由硬盘空间。要求实验者为该硬盘分区选择文件系统（NTFS 或 FAT）以及在哪一个目录下进行安装。接下来安装程序将提示是否对硬盘进行检测。完成选择之后，安装模拟程序将继续复制必要的系统安装文件，然后提示重新启动计算机，即进入安装程序的下一阶段-基于图形模式的安装阶段。图 2 安装程序复制文件，进行资料收集2.4 安装程序复制更多的文件，并开始收集与计算机有关的更多资料。这一个步骤中的复制文件进度表示是通过在一个 Form 上添加 ProgressBar 控件和 Timer 控件来实现的，ProgressBar 控件可以形象地表
9、示工作的完成进度。现在对其实现过程做一个介绍：在 Form 对象的 Load 事件中，设置 Timer 控件的 Interval 属性。每隔 Interval 时间，ProgressBar 控件的Value 属性被更新一次。在 Load 事件中将 ProgressBar 控件的 Max 属性设置为超时间隔。Max 属性的值应为 Timer 停止之前，希望它持续计时的时间。同时为准确地反映经过的时间，ProgressBar 的 Min 属性应设置为 1。用 Enabled 属性启动 Timer。实现这个步骤的部分代码为：Private Sub Form_Load （）ProgressBar. M
10、ax = 100ProgressBar.Min = 1End SubPrivate Sub Timer1_Timer （）If ProgressBar.Value + 5 ProgressBar.Max Thenme.Hideform1.ShowTimer1.Enabled = FalseEnd IfEnd Sub2.5 输入用户信息并选择服务器类型安装模拟程序将要求用户输入用户的姓名、所在的组织的名称、选择“许可协议模式” ，然后要求用户输入计算机名，以区分网络中的不同的计算机。接下来要求用户选择服务器类型，共有三种类型的服务器：主域控制器、备份控制器或成员服务器。这个过程中安装模拟程序将出
11、现提示用户选择“许可协议模式”对话框。在该界面中，使用了UpDown 控件来实现数字的滚动。用户可单击这个按钮来递增或递减数值。实现这个步骤的部分代码为：Private Sub Form_Load （）UpDown 控件名为“updToggle ”。OptionButton 控件名为“optToggle ”。Text1.Text = 0With UpDown1.BuddyControl = Text1.Min = 0.Max = 50.Increment = 1.Wrap = TrueEnd WithEnd Sub UpDown 控件的 Value 属性。Private Sub updown1
12、_Change（）Text1.Text = UpDown1.ValueEnd Sub2.6 设置“管理员账号密码”安装模拟程序将创建一个默认帐号-Administrator 帐号，即管理员帐号，它被授予用于管理计算机的所有管理权限。安装模拟程序将出现提示用户输入管理员帐号对话框。这个对话框中的密码的输入要求使用不回显的文本框。在应用程序中，有时需要用户录入一些不宜在屏幕上直接显示的内容，如用户口令或机密数据。在 VB 中可以使用的一种方法是利用文本框的KeyPress 事件，但为了处理用户对文字的编辑（如删除、插入） ，则还要再用其他变量存放真正输入的内容，而且必须书写大量复杂的控制程序，因此
13、这种方法比较繁琐。我们利用可以影响 TextBox 控件显示文本的 PasswordChar 属性实现上述功能。实现功能的有关代码为：Private Sub Form_Load（）If Text1.PasswordChar = “ ThenText1.PasswordChar = “*“ElseText1.PasswordChar = “End IfIf Text2.PasswordChar = “ ThenText2.PasswordChar = “*“ElseText2.PasswordChar = “End IfEnd Sub2.7 创建紧急修复磁盘、选择可选组件并配置网络安装模拟程序将
14、建议创建紧急修复磁盘，该磁盘用于保存当前的系统设置，可用于当系统损坏时进行紧急修复来恢复正常。随后让用户选择安装各种组件，包括 Windows Messaging、多媒体、游戏以及其他附件。完成此步以后，安装模拟程序将提示用户选择连接网络的方式、安装 IIS、检测、选择并配置网卡、选择网络协议以及网络服务2.8 调整网络绑定在启动网络之后，安装模拟程序将提示调整网络绑定。网络绑定是使计算机上的安装的网络服务、网络协议及网卡之间建立通信的过程，也就是使这三者之间相互结合来完成网络通信功能。可以通过调整网络绑定来提高计算机的网络性能。此时安装模拟程序将出现提示用户选调整网络绑定对话框。在这对话框中
15、，使用了 TreeView 控件和 Combo 控件。使用 Set 语句处理 Node 类型的对象，以管理对其他 Node 对象的引用，用该对象变量返回相关节点的属性。然后向 Nodes 集合中添加 Node 对象。要将 Node 添加到树中，可以用 Add 方法。该方法包括两个参数 relative 和 relationship，它们确定节点被加到何处。第一个参数 relative 指定节点名称，第二个参数 relationship 指定新加入的节点与名为 relative 的节点之间的关系。Add 方法的其他参数是 key、text 和 image。用这些参数，可以在创建 Node 对象时
16、，为其赋予 Key、Text 和 Image 属性。添加节点的第二个方法是：声明 Node 类型的对象变量，然后使用带 Add 方法的 Set 语句。该 Set 语句将该对象变量设置为新节点。然后就可以用该对象变量设置节点的属性。2.9 创建或加入一个域安装模拟程序将要求用户输入要创建的域名或者要加入的域名。可以选择加入域或者也可以选择加入工作组，并且对于在安装时选择加入工作组的计算机，还可以在安装完成之后利用“控制面板”中的“网络”选择加入域。完成以上各项设置后，安装模拟程序就准备完成安装。3 结论虚拟实验可以帮助学习者完成实验教学环节，提高学习者的工程实践能力，同时也节约教学资源。随着计算
17、机和网络在世界上的快速发展和普及，远程教育也必将得到广泛的应用，本虚拟试验系统的实现为网络教学引入了新的教学途径，使网络教学更好的满足用户的要求。参考文献1 Terry W.ogletree. Windows NT 安装、配置与定制. 机械工业出版社, 1998.5.2 詹文军.Windows NT 4.0 组网与管理基础教程. 机械工业出版社,1998.5.3 冷向君.于振宇编,Visual Basic 5.0 中文版入门与提高. 清华大学出版社,1998.8.4 陈照昌.中文版 Windows NT 4.0 安装配置实用指南. 机械工业出版社,1998.5.With the rapid d
18、evelopment and popularization of the computer and Internet, E-learning carry on extensively. Modern distance education needs to dynamically show the large numbers of the examples and figures. Virtual experiments help the learners to complete the experiment portion of their education and advance lear
19、ners practice capabilities, and also can save the teaching resources. Nowadays, the realization of the virtual experiment system is one of the difficulties during the E-learning system development. This paper mainly introduces the experiment simulation system in Internet environment, which is made for experiment portion of the Computer Network course and developed using Visual Basic. This paper mainly analyses and resolves the problems met during the process to develop the simulative experiment of the Windows NT installation.Key words: VB ProgressBar MsgBox UpDown PasswordChar
