交互式网络试验模拟系统的设计与实现.doc

交互式网络实验模拟系统的设计与实现 Internet Environment Experiment Simulation System Developed Using VB 吕晓奕* 孟昭鹏 ** 张树俊** * 天津大学电子信息工程学院计算机系 E-mail: lvxiaoyi@ ** 天津大学网络教育学院 E-mail: mengzp@ 随着计算机和网络在世界上的快速发展和普及，网络教学也得到了广泛的开展。现代远程教育要将大量的实例与图解动态地演示出来，引入虚拟实验可以帮助学习者完成实验教学环节，提高学习者的工程实践能力，同时也节约教学资源。虚拟实验系统的实现是目前网络教学系统开发中的难点问题之一，本文主要介绍为了计算机网络课程中需要进行的实验环节，而采用VB开发的网络实验模拟系统。本文着重分析了在Windows NT安装过程模拟实验的设计中遇到的问题及其解决方法。 关键词： VB ProgressBar MsgBox UpDown PasswordChar 1 引言 现代远程教育与传统的教学方式相比，除没有学习时间、地点的局限和可以由学习者自己安排学习时间和学习进度之外，还可以充分利用计算机独有的特色，增强学习的趣味性和交互性。网络教学不是单纯将文字、图片移到网上，而要将大量的实例与图解动态地演示出来，将平时在普通教室中无法看到和感受到的东西展示在广大的用户面前。虚拟实验可以帮助学习者完成实验教学环节，提高学习者的工程实践能力，同时也节约教学资源。虚拟实验系统的实现是目前网络教学系统开发中的难点问题之一。 2 模拟试验的实现方法 本系统主要通过对计算机网络课程中需要进行的实验环节进行模拟，在学习者的参与下完成Windows NT的安装、远程访问服务器安装等功能,具有真实感和交互性。下面详细地介绍采用Visual Basic实现有关Windows NT的安装过程的模拟实验系统的主要步骤。 2.1 模拟试验开始 启动后,用户将进入Windows NT基于文本的安装阶段，出现Windows NT安装欢迎界面。在基于文本的安装阶段，实验者不能通过点击鼠标来实现控制，只能通过按动键盘来实现各种功能选择和页面转换。其中按键是通过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 KeyCode Case Is = vbKeyF3 //如果按下的为F3键 Form1.Show Case Is = vbKeyReturn //如果按下的为ENTER键 Form2.Hide Form3.Show End Select End Sub 2.2 检测大容量存储设备 模拟程序将询问是否自动检测大容量存储设备。如果用户所用的大容量存储设备在HCL中，则这些设备将检测到并显示在屏幕上。如果用户所用的大容量存储设备不在HCL中，则可以按S键进行手工设置。在模拟实验中要求用户默认其所使用的大容量存储设备在HCL中，如果用户键入S则安装程序将弹出一个如图1所示的对话框来提示用户应该进行的操作。 图1 检测大容量存储设备的提示 这里使用的是预定义对话框中的一种名为MsgBox的函数，其实现方法为：在程序执行过程中，如果出现了错误操作，系统会弹出一个对话框告诉实验者此处执行错误并告知正确的操作方向。使用InputBox函数实现用户输入相关信息的要求。系统用消息对话框来显示信息时，用 MsgBox 函数获得“是”或者“否”的响应，并显示简短的消息，比如：错误、警告或者对话框中的期待，可选取一个按钮来关闭该对话框。实现上述功能的部分代码为： Private Sub Form_KeyDown （KeyCode As Integer, Shift As Integer） Select Case KeyCode Case Is = vbKeyS A=MsgBox（本实验默认进行这个检测，请点击“确定”, vbExclamation + vbOKOnly, Windows NT Serve