vba编程在演示文稿中应用

《vba编程在演示文稿中应用》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、浅谈VBA在演示文稿制作中的使用郭琳琳（福建省惠安职业中专计算机教研组福建泉州362100）摘要：随着信息技术的发展，多媒体教学已经变为现代教育的重要辅助工具,在使用PowerPiont过程中，很多情况下需要利用交互功能来丰富课件成为用户的需求，这就需要在PowerPoint中嵌入VBA编程来实现。本文主要阐述VBA编程在PowerPoint课件制作屮的使用。关键词：VBA；PwerPoint；交互课件一、引言随着信息技术的发展，多媒体教学成为当代教学课堂中的主流，PowerPiont的易用性和多功能性使得使用演示文稿

2、制作课件成为大部分教育工作者的所爱，PowerPoint屮的VBA可以实现很多复杂的交互，其强大的编程能力让课件的制作简单快捷，制作出来的PPT课件具有交互性和灵活性，并iL使课程教学富有生动性和趣味性。大部分情况下演示文稿是服务于讲述和演示，很多情况下对于演示文稿中交互的功能的需求，就需耍用VBA脚本来实现。然而，面对复杂的VBA编程，很多人都会觉得无从下手。本文就从以来介绍VBA编程具体在演示文稿中的使用。二、PowerPoint对象模型和VB控件箱VBA将MicrosoftOffice中的每个应用程序都看成一个对

3、象。每个应用程序都有各自的Application对象代表。介绍几个常用的几个集合和对象，Presentation代表一个PowerPoint演示文稿，Slide代表PowerPoint文稿中的单张幻灯片，Shape代表幻灯片中的单个形状，Placeholders代表指定幻灯片中占位符的所有Shape对象的集合，TextFrame代表Shape对象中的文本框。说到VBA编程，就不得不提到控件工具箱，我们需要利用其中的控件搭建需要的环境。双击幻灯片屮的控件或用菜单命令“工具/宏/Visualbasic编辑器”即可进入VBA

4、编程状态。三、编程实例进入VBA环境后，需要在“属性”窗门屮对控件的属性进行设置，然后在相应控件内编写代码，运行调试，下面以两个实例来进行说明VBA的运用。3.1单项选择题操作步骤如下：1、建立一张新幻灯片在幻灯片上录入题目：“世界上第一台计算机诞生于那一年？”(这个题目的正确答案是B1946年)2、控件设置：打开控件工具箱，拖动一个命令按钮在提干后面控件名称为CommandButton!,拖动一个标签放在按钮旁边名称为Labell，拖动四个单选按钮布题干下面，四个单选控件名称分别为OptionButtonl、Opti

5、onButton2、OptionButton3、OptionButton4。3、修改单选控件属性：选中OptionButtonl，单击控件箱内“属性”图标打开“属性”对话框，选择“Caption”选项，光标移到其右边的文本框，把“OptionButtonl”修改为“A.1934年”，然后鼠标点击幻灯片上OptionButton2控件，同上方法修改为“B.1946年”，OptionButton3控件的Caption值为“C.1944年”，OptionButton4控件的Caption值为“D.1948年”。以同样的方法修

6、改按钮CommandButtonl的Caption值为“奔看正确答案”，修改标签Labell的Caption值为空，到此为止就完成/题目的设计部分。4、编写代码：单击控件CommandButtonl,单击控件工具箱里“查看代码”的工具进入代码编辑状态。这时候出现下面的语句：PrivateSubCommandButtonl_Click()EndSub这两行是函数的开始和结束部分，需要我们在中间部分编辑代码，我们在函数中间部分写入如下代码，使得完整的程序如下：PrivateSubCommandButtonl_Click()

7、IfOptionButton2.Value=TrueThenLabel1.Caption="答案正确"ElseLabel1.Caption="答案错误正确答案是"&OptionButton2.CaptionEndIfEndSub3.2多选题的制作操作步骤如下：1.题目的设计同单选题2.选项：用复选框（CheckBox）,其他设置同单选题。3.“查看答案”命令按钮，因为是多选题，答案有多个，所以要书写多个条件,条件之间用and连接，表示同吋满足这几个条件，例如第•一、三的选项是正确的，则在编写代码部分需要输入如下语句：I

8、fCheckBox1.Value=TrueAndCheckBox3.Value=TrueThen给出正确的提示信息同单选题Else给出错误的提示信息同单选题endif注：提示代码部分仍然可以用标签显示，如同单选部分赋值个标签的Caption值。3.3填空题的制作操作步骤如下：1.题目的设置同单选题，填空的地方用文本框。2.判断正误