兰清昭

摘要：通过在PPT授课课件中插入VBA控件，用于降低精准教学数据采集的难度，在提高课件交互性的同时，又实时、高效、准确记录学生的课堂学习行为表现。对采集的有效数据进行分析后调整后续课堂教学进度和策略，从而进一步提高大学课堂教学的质量。

关键词：VBA控件；精准教学；授课课件；实时记录；行为表现；代码；教学进程

中图分类号：G64 文献标识码：A 文章编号：1009-3044（2016）25-0115-03

精准教学的初衷是在通过设计测量过程来追踪小学生的学习表现和支持数据决策。后来发展为用于评估任意给定的教学方法有效性的框架，可对任何学科、任何学段的教学进行评估。传统的测量过程中大量的各种数据都是手工记录和分析，势必会降低教学的效率，给教师增加额外的教学工作量，还有可能短时中断教学进程。

由于信息技术和多媒体技术的发展，采用多媒体课件授课提高了课程教学的效率。而当下很多教师用于实际教学过程的课件大多数是用Microsoft PowerPoint应用软件设计制作的（简称PPT课件 ）。该软件制作的课件既能体现整个教学过程，同时如果在课件文稿中加入适当的VBA控件，还可以提高师生互动的交互性，同时还可高效、实时、准确记录学生在课堂上的一些学习行为表现，课后教师用1到几分钟时间通过对课件中记录的学生课堂学习行为数据进行分析得到相关学生掌握知识点的准确度，依此制定和提示新的教学进程。从而达到促进课程知识的有效、高效教学的目的。

1 课堂教学课件设计困惑

任课教师的课堂教学课件设计与用于课程自学的课件设计思想是有区别的。用于课程自学的课件，由于没有具体教师直接实时参与教学过程，它制作的课件应具有图、文、声音、动画等效果，从多方位引导学生的学习过程，但缺乏学生学习效果的实时真实反馈，从而无法根据实际情况改变教学的进度以达到提高学生掌握知识点的精准度。

任课教师的课堂教学课件设计除了知识点的实时介绍和解析以外，还应掌握学生对知识点的正确理解度和应用能力程度。而当下的课程教学用教材上的习题或实训基本上都有参考答案，如果只要求学生实时完成教材上的习题或实训是无法准确实时掌握学生的学习行为表现数据。为了既能实时掌握学生的学习行为表现又不降低教学的效率，那么在课件中适当的位置设计练习与测试题目显得尤其重要和必要，并将其结果高效、实时、合理且以学生认可的方式记录在课件中就更重要了。这就对教师课堂教学用的课件设计提出了更高的要求。在当下流行的PPT授课课件中适当加入VBA控件就能解决这些问题。

2 加入VBA控件的课堂教学课件设计实例

为了达到高效、精准教学的目的，在课件启用之前创建以授课班级为文件名的记录课堂学习行为表现的空文本文件（如20150602.txt），并将该文本文件与授课课件放在同一文件夹下。

2.1 授课课件设计关键之一：灵活多样的抽答方式

为了达到知识点精准教学的目的，在引入、展示、解析完一个知识点后，为了即时检测学生对某一知识点的理解、掌握及应用能力，势必应让学生理解教材上相应的例题并完成教材后附的习题，但由于高校选用教材上大多数的例题都有分析和完整答案，而习题基本上都附有参考答案。即使让学生回答也不能检测到其真实学习效果，所以在教学课件中适当的位置加入练习和检测题目，并将练习和检测的结果实时记录，课后分析采集到的数据作为安排后续课程教学进度和策略的依据，从而达到切实提高课堂教学质量的目的。

因此在课件相应的展示画面上在展示练习检测题目的同时，还应能实时控制和记录学生的行为表现。这就需要在相应的展示画面上加上交互的VBA按钮操作控件和文本输入控件，并在控件上编写相应的控制代码完成学习行为表现的实时、高效记录。

下图1所示为《Visual Basic程序设计》课程控制结构中的for-next循环后讲解后设计的检测题画面；下图2所示为循环控制结构这一小节完成后设计的练习检测题的部分画面。

为了提高课件的交互控制和实时自动记录学习行为表现，在课件界面上增加了VBA控件文本框和命令按钮。文本框可用于直接交互输入回答问题的学生学号及提交的答案；命令按钮“抽答”用于能在参与回答问题的同学较多时，从中随机抽取学生回答，超过学生总数1/3的同学都能并都有意愿回答问题时，可输入全班同学的人数，从中随机抽取回答问题的学生学号或序号，这样体现学生在课堂学习行为表现记录的公平性，同时也可以鼓励和督促所有同学积极参与问题的思考与解答。

“抽答”按钮的关键代码如下：

Private Sub CommandButton1_Click（）

Randomize

n = Val（InputBox（"请输入要回答问题的学生人数="））

If n > 2 Then

m1 = Int（Rnd * n + 1）

Do

m2 = Int（Rnd * n + 1）

Loop Until m1 <> m2

MsgBox "回答问题的学生序号是：" & m1 & "和" & m2

If Len（Trim（TextBox1）） <> 0 Then

TextBox1 = TextBox1 & vbLf & m1 & vbLf & m2

Else

TextBox1 = TextBox1 & m1 & vbLf & m2

End If

End If

End Sub

2.2 授课课件设计关键之二：自动、有效、准确保存学习行为表现数据

通过命令按钮“保存”用于自动保存学生的实时行为表现数据到文件中。自动准确收集学生学习行为表现的数据（如：答题时刻、答题情况、参考答案等），用于课后进行精准教学数据分析。

Private Sub CommandButton2_Click（）

Open "e：＼vb＼2016-1cai＼20150602.txt" For Append As #1 某授课班级的表现放在一个文件中

answer = InputBox（"请输入正确参考答案"， "参考答案"）

Print #1， vbCrLf & "答题日期与时间：" & now

Print #1， "答题情况：" & TextBox1

Print #1， vbCrLf & "参考答案是：" & answer

CommandButton2.Enabled = False

Close

End Sub

3 授课课件教学实施过程

授课课件在某知识点、某节、某章介绍讲解完后设计一定的练习与检测题目。

在实施教学时，首先展示题目，每一屏的展示题目让学生有3-5分钟的思考和演算的时间，与此同时教师将当前课件的焦点定位在VBA交互控件（文本框）上，3-5分钟后实时输入要回答该题目的学生学号或序号来记录学生的学习行为表现，如果想回答问题学生的人数较多时，因为是选择题，一个题目最多允许两个同学回答，为了体现回答问题机会的公平性，就采取不同的抽答方式，点击“抽答”按钮会出现如下图3所示的回答问题人数对话框，自动随机产生回答问题的学号或序号，根据抽取的结果再请相应的学生回答问题，同时在文本框中实时记录抽中学生答题情况。

其次在学生回答完毕后，再展示正确答案并根据学生答题情况进行点评和纠错分析。

最后点击保存按钮，出现如下图4所示的输入正确答案的对话框，对照参考答案输入正确答案，课件将自动将该次练习或检测的结果形成文件保存，这些数据作为课程平时成绩评定的依据之一。同时在课后对采集的数据进行分析，制定下一步的教学计划和策略。

4 该授课课件与精准教学理念相结合的实施效果与结论

如下表1是该课件与精准教学理念结合实施与否在期末考试的两种题型上得分情况。

由于在教学过程中，在程序阅读方面实施了精准教学理念，不断强化与检测，学生在该方面的平均得分率达到70%左右；在编程和程序填空方面未实施精准教学理念，而是通过课后习题和上机实训来完成这方面能力的培养，由于课后习题有答案，上机实训编程和程序填空的结果无需实时、即时提交（通常1～2周提交一次），这样教师无法即时掌握学生的真实学习情况，学生的平均得分率在50%以下。

由此得出一个结论：在当前信息技术支持下（PPT课件制作中的VBA控件技术），在大学课堂教学中有必要也有条件实施精准教学，既高效、准确地掌握学生的学习过程行为表现，也有利于大学课堂教学质量和效率的提高。

参考文献：

[1]祝智庭，彭红超.信息技术支持的高效知识教学：激发精准教学的活力[J].中国电化教育，2016（1）：18-25.

[2]王建忠.Visual Basic程序设计[M].北京：科学出版社，2015年12月第二版.

[3]李政，梁海英，李昊，林广朋.VBA应用基础与实例教程[M].北京：国防工业出版社，2012.