PowerPoint 课件中基于VBA的习题练习_第六章习题课件

PowerPoint 课件中基于VBA的习题练习由刀豆文库小编整理，希望给你工作、学习、生活带来方便，猜你可能喜欢“第六章习题课件”。

PowerPoint 课件中基于VBA的习题练习

陈柳 1（西南中文大学数学与计算机系，重庆634001）

摘要： 主要阐述如何在PowerPoint课件中应用VBA调用数据库来设计习题。

关键字： VBA ；PowerPoint；习题

1.引言

要在PowerPoint课件中设置选择题、是非题以及填空题，可以在演示文稿的幻灯片中添加“选项”按钮、“多选框”来完成。„„

2.在PowerPoint中添加“选择”按钮设计选择题

如图1所示，在幻灯片中插入一段文本来作为题目：“VFP6.0能存储图像火声音数据的字段是（）。”，容纳后添加OptionButtonA、OptionButtonB、OptionButtonC、OptionButtonD四个选项按钮，其Caption分别为： A 货币型、B备注型、C 通用型、D字符型。添加一个CmdQD（确定）命令按钮以及一个文本框，双击CmdQD（确定）命令按钮，在打开的Visual Basic 编辑器中输入以下VBA代码，就可以完成可见中设置选择题的任务。

图1

课题中设置选择题和是非题

输入的VBA代码为： Private sub cmdQD_Click()If optionbuttonA.Value=true then TextBox1.text=”错了，答案为：通用型！” „„ End sub 这样，一个选择题的题目就这样完成了，„„

3.3.PowerPiont课间与Acce数据库德连接

如图2所示，在打开的VB编辑器中，创建一个名为“练习”窗口（UserFormLX），并插入“上一个”、“下一个”、“开始”、“结束”及“答案”等五大命令按钮，四个选择按钮，一个文本框和一个文字标签等，在由VBA调用Acce数据库，实现课间与习题库的连接。完成做习题、查看答案以及统分或计算成绩的操作。

3.1数据库德引用与变量设置1 要实现VBA与Acce题库的连接，在打开的VB编辑器中，执行“工具”菜单项下的“引用”命令，激活“引用”对话 1收稿日期：2009.08.08 基金项目：西南中文大学数学与计算机系重点学科教研资助课题中子题目 作者简介：陈柳（1975—），四川宜宾人，硕士，计算机教授。

框，在打开的“引用”列表中选择Microsofu ActiveX Data Objects 2.6Library项，然后单击“确定”按钮，把它引用的PowerPoiont幻灯片中，并用VBA语句进行以下变量的设置： 定义变量和数组 „„

3.2命令按钮中的VBA语句

（1）“开始”命令按钮主要用于建立与数据库的连接和给数组赋值。通过语句Connection.Open constring,引用语句Recordset.Open“tablename”,connection,adOpenStatic,引用ADO中Recordset对象的Open方法来打开数据库德tablename表以及提供对表的检索。Do While…Loop循环中将数据库XtJ.mdb的表xzt中的数据给数组tm()赋值。其中的VBA语句为： Prive sub CmdbuttonKS_Click()„„

Dim constring as string Constring =”provider=Microsoft.jet.oledb.4.0”&”data sourse=”&C:VBAxtj.mdb” Cnnxtj.Open constring „„ End sub(2)“答案”命令按钮为输出答案的“文字标签”赋值。其中的VBA的语句为： „„

(3)“下一题”命令按钮为下一题的题目及Ａ、Ｂ、Ｃ、Ｄ选项所对应得“文字标签”赋值。其中的ＶＢＡ语句为： Private sub CmdbuttonTX)Click()labelDA.Caption=”” a=a+1 if a=11 then a=0 textBox1.text=tm(a, 1)textBox2.text=tm(a, 2)textBox3.text=tm(a, 3)„„ End sub „„

“练习”窗口中还包含“判断题”、“多选题”、“填空题”等选项卡，编制“判断题”、“多选题”、“填空题”的方法与之相识，不再赘述。

编制“判断题”、“多选题”、“提空题”的方法与之相似，不再赘述。

4.结束语

一个数学课间，除了有丰富的课堂教学内容之外，在课间中加入诸如习题、测验、考试等与教学相关的辅助内容，往往成为教学课件中的亮点而使PowerPoiont教学课件大为增色。参考文献：

[1]（美）Davis,G.H.Mastering VBA Second Edition [M].Wiley Publishing.Inc.[2]晶辰工作室。VB6.0中文版实用参考手册—语句、函数、对象与方法篇[M].电子工业出版社，1998年9月 [3]罗朝盛。Visual Basic 6.0 程序设计教程（第3版）[M].人民邮电出版社，2009年2月

VBA—Based Exercise Design in PowerPoint Courseware

Chen Liu(Department of Mathematics and Computer , the Southwest Chinese University , Chongqing 634001.china)Abstract: ‘Ibis paper expatiates on how to design exercises in PowerPoint course ware by using VBA to invoke database Keywords: VBA;PowerPoint;Exercise