PowerPoint中利用VBA制作课堂小测验

日期：2007年11月19日作者：查看:[大字体中字体小字体]

　　PowerPoint附带的VBA功能使其具有了制作智能课件的能力。本文就是基于PowerPoint中的VBA来制作智能的物理课堂小测验的一个例子。

　　一、基本构想

图1

　　本例很简单，就两道题：界面如图1所示，就是题目、选项和一个按钮，在最后一道题所在的页面上把“下一题”按钮改成“得分”按钮。由界面可知，我们需要一个文本框，四个选项按钮和一个命令按钮。功能方面我希望在单击“下一题”按钮时，界面能够转到下一题;单击“得分”按钮时，在成绩文本框中能够显示出这次测验的成绩就可以了。本例的两道题的正确选项分别为“B”、“C”。

　　二、制作过程

　　1、运行PowerPoint2003，单击“文件”-“保存”命令，弹出“另存为”对话框，文件名设为“测验”，单击“保存”命令。

　　2、单击“插入”-“文本框”-“水平”命令，这时鼠标变成“1”字型，在编辑区内单击鼠标左键拖动鼠标拉出一个方框，在框内输入第一题的题目“1.人造地球卫星的轨道半径越大，则”。

　　3、下面我们来制作选项。单击“视图”-“工具栏”-“控件工具箱”命令，弹出“控件工具箱”，单击“控件工具箱”上的“选项按钮”控件，鼠标变成十字型，按下鼠标左键拖动鼠标拉出一个方框。单击“控件工具箱”上的“属性”命令，弹出“属性”对话框，把“名称”改为“ti1”，把“caption”改为“A.速度越小，周期越小”，其它设为默认。如图2所示。

图2

　　其余的三个选项的名称分别为“ti2”、“ti3”、“ti4”，“caption”分别为“B.速度越小，周期越大”、“C.速度越大，周期越小”、“D.速度越大，周期越大”。

　　4、“下一题”按钮的制作。单击“控件工具箱”中“命令按钮”控件，这时鼠标变成十字型，如前在编辑区内拖拉出一个方框，松开鼠标方框会变成一个按钮。选中它，单击鼠标右键，在弹出的快捷菜单中选择“属性”命令，把“命令按钮”属性中的“caption”设为“下一题”。

　　这样，第一题的界面就制作完成了。第二题我们可以按照第2-4步做出来，只是要把题目、各个选项值换一下，另外需要添加一个文本框命令，其名称设为“sum”，命令按钮的名称改为“得分”。

　　三、添加代码

　　1、单击“控件工具箱”上“查看代码”控件，弹出“Microsoft visual basic”编辑器，单击“插入”-“模块”命令，弹出“模块”编辑窗口，在“模块”编辑窗口输入“public fen(2) as integer”。

　　2、选中第一题中“下一题”按钮，单击“控件工具箱”上“查看代码”控件，弹出“Microsoft visual basic”编辑器，在“Private Sub CommandButton1_Click()”和“End Sub”之间输入

　　If ti2.Value = True Then
　　fen(0) = 2
　　Else
　　fen(0) = 0
　　End If
　　With SlideShowWindows(1).View
　　.GotoSlide (2)
　　End With

　　3、选中最后一题中“得分“按钮，单击“控件工具箱”上“查看代码”控件，弹出“Microsoft visual basic”编辑器，在“Private Sub CommandButton1_Click()”和“End Sub”之间输入

　　If ti3.Value = True Then
[1] [2] 下一页
PowerPoint中利用VBA制作课堂小测验相关文章：
·PowerPoint中利用VBA制作课堂小测验
·清凉幽默，我有我甜美_QQ堂
·新手学堂：Linux操作系统下进行硬盘扩容
·新手学堂：Linux操作系统安全性能检查笔记
·昕儿，我来接你回家_QQ堂
·新手学堂 Linux系统Sudo命令的使用说明
·新手学堂：Linux中关于关机和重启的命令
·新手学堂 Linux操作系统的内核编译步骤
·对∧起.偶昨天有个老婆老_QQ堂
·屈原节快乐_QQ堂
PowerPoint中利用VBA制作课堂小测验相关软件
·新泡泡堂《勇闯章鱼岛》客户端下载
·FC任天堂红白机中文模拟器+经典游戏大集合试玩
·《泡泡堂》泡泡堂段位版
·三希堂法帖第二十八册
·三希堂法帖第二十七册
·《QQ堂2.1宠爱》Beta2客户端
·我在天堂等你
·掌上泡泡堂
·三希堂法帖二十五册
·三希堂法帖第二十四册

上一篇:Flash卡通动画实例：花丛中的小蜜蜂

下一篇:FreeBSD 6.2快速架设网站服务器教程

特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作
者.文章版权归文章原始作者所有.对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转
载的文章有版权问题请联系编辑人员,我们尽快予以更正. 转载请注明来源：http://www.hackhome.com

PowerPoint中利用VBA制作课堂小测验

精品推荐

热点TOP10

特别推荐