PowerPoint 2013 中VBA控件应用举例.pdfVIP

第1 页/总10 页 2013 年11 月10 日星期日 PowerPoint 2013 中VBA 控件应用举例 摘要：。本文以PowerPoint 2013 为例，使用“开发工具”选项卡的控件和 VBA 代 码，开发简单的选择题试卷。 关键字：PowerPoint 2013, Office 2013,开发工具, 控件,VBA, 选择题,试卷 步骤 1. 新建一个PowerPoint 2013 空白演示文档： 2. 单击“文件”选项卡 第1 页/总10 页 第2 页/总10 页 2013 年11 月10 日星期日 3. 单击“另存为” 4. 将其另存为 “启用宏的PowerPoint 演示文稿”： 5. 进入第2 张幻灯片，单击选定正文占位符 第2 页/总10 页 第3 页/总10 页 2013 年11 月10 日星期日 6. 使用键盘的“Delete”键将正文占位符删除： 7. 在标题占位符中输入试题描述（题干）： 第3 页/总10 页 第4 页/总10 页 2013 年11 月10 日星期日 8. 使用“开发工具” ｜“控件”｜“选项按钮” 9. 在题干（或标题）下方添加四个“选项按钮” 10. 选定第一个选项按钮，单击“开发工具” ｜“控件”｜“属性” ： 第4 页/总10 页 第5 页/总10 页 2013 年11 月10 日星期日 11. 在弹出的“属性”对话框中，选择“按分类序”，设置Caption 属性为“A 西施”: 第5 页/总10 页 第6 页/总10 页 2013 年11 月10 日星期日 12. 在上图“属性”对话框中，单击“字体” ｜“Font” | “宋体”右侧的…按钮： 13. 设置字体属性： 第6 页/总10 页 第7 页/总10 页 2013 年11 月10 日星期日 14. 鼠标拖动控件到合适的高度和宽度： 15. 双击第 1 个控件 （或使用“开发工具” ｜“代码” ｜“Visual Basic”命令），进入 Microsoft Visual Basic for Application(VBA)窗口： 第7 页/总10 页 第8 页/总10 页 2013 年11 月10 日星期日 16. 在VBA 给的出两行代码间补充代码： 17. 同样的过程，为第2、3、4 选项分别设计属性和VBA 代码： 18. 第2、4 个控件的VBA 代码与第1 个控件代码相同，第3 个控件代码与其余 第8 页/总10 页 第9 页/总10 页 2013 年11 月10 日星期日 不同： 19. 关闭VBA 窗口，在PowerPoint 中进入放映视图 （使用F5），并分别单击四个 选项控件： 第9 页/总10 页 第10 页/总10 页 2013 年11 月10 日星期日 20. 如果对本程序进行扩展，加入全局变量，可对多张幻灯片的答题正确与否进 行统计，得到整份试卷的答题成绩。