利用VB6.0实现学生居家Flash操作监测考试与练习

方伟

本文先利用VB6.0 对考试要求、评分源码和考试文件进行封装、释放，再利用 jsfl文件对学生完成后的fla文件进行分析，最后利用VB6.0汇总成绩添加到问卷星答卷收录。

Flash操作被多个地区作为了初中信息技术的必考科目，如怎样让学生随时知道自己的操作是否正确，是否有疏漏，培养学生的独立思考和自我纠错的自学能力，并且让教师详细了解每个学生的做题情况。尤其是在疫情网课和周末学生居家期间，了解学生的真实学习情况是近几年摆在我们面前亟待解决的问题。

经过长时间研究，笔者通过让VB6.0即时书写jsfl评分文件，然后让jsfl文件对学生操作后的fla文件进行分析，最后让VB6.0将分析添加到问卷星答卷，可以实现远距离了解与掌控学生考试或练习情况的效果。具体作法如下。

一、考试文件的封装与释放

打开VB6.0程序，打开VB资源编辑器，将需要学生操作的源文件拖放到对话框。然后将待操作文件封装在程序中，在登录窗口写入以下代码：

这样，学生在执行程序时候，会将源文件自动释放到学生电脑“c：＼源文件”目录下，方便调用。

二、在“问卷星”中新建一个考卷，存放学生成绩

如果教师自己租用服务器、网络空间和域名，需要一笔很大开支，而免费的服务器又太慢太卡，还会受到种种限制。经过笔者不断摸索，发现“问卷星”免费提供的在线考试可以远程记录考试内容和分数。

登录“问卷星”网址“https：//www.wjx.cn”，新建试卷，设置好姓名，题型都用填空题。教师可以根据填空内容设置分数，完成后发布，并记下试卷的网址。学生每次评分或提交试卷，让程序在相应的位置填写数据。这样，教师只需查看每个学生每道题目的得分，就可以有的放矢地进行个别指导。

三、学生登录界面的设置与记录

在VB6.0程序中新建窗体，名称改为“deng”。工程引用勾选 Microsoft Internet Controls。在窗体中绘制一个Label 标签，Caption 改为“姓名”，右侧绘制一个Text 文本框。下方绘制一个Command 按钮，Caption改为“登录”。再在窗体边缘绘制一个 WebBrowser 网络控件，让控件在显示窗体外防止篡改。接着添加一个Timer 控件，Interval 设置为 500。

四、做题要求界面的设置

再新建一个窗体，名称改为“zuo”。在窗体中靠左上角绘制一个文本框，用于展示题目要求。右侧绘制几个Option按钮，。下方并列绘制四个Command按钮，Caption分别改为“演示”、“评分”、“重做”、“交卷”。在下方绘制一个Image 控件，展示需要完成的效果图。程序运行时将需要让学生完成的fla文件、演示视频、效果图文件释放到“C：＼源文件”文件夹中，方便调用。

文本框中显示题目要求代码：

Private Sub Option1_Click（）

Text1.Text = "1.请打开试卷目录C：＼EXAM中“走迷宫.fla”，按要求完成下列操作：" & vbCrLf Text1.Text = Text1.Text & "①将“背景2” 图层重命名为“标题”，并在第1帧插入文字“走迷宫”，设置文字为黑体，字号40。" & vbCrLf

……

If Dir（"C：＼EXAM ＼走迷宫.fla"） = "" Then FileCopy "C：＼源文件＼走迷宫.fla"， "C：＼EXAM＼走迷宫.fla"

重做按鈕让源文件复制覆盖学生操作文件即可。

交卷按钮 Private Sub Command4_Click（） 中重复一下评分部分代码，将 MsgBox 部分删除，关闭程序后在“C：＼test”中就可以找到自己哪几个小题做对了。这样，不仅问卷星上有学生成绩记录，学生电脑端也有成绩记录，方便远程查看和本地核对。

作者单位：山东省莱州市土山中学