论在ｐｏｗｅｒｐｏｉｎｔ中巧用ｖｂａ控制ｆｌａｓｈ动画的播放

《论在ｐｏｗｅｒｐｏｉｎｔ中巧用ｖｂａ控制ｆｌａｓｈ动画的播放》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、论在PowerPoint中巧用VBA控制F1ash动画的播放论文关键词：PowerPoint；VBA；Flash动画播放控制论文摘要：本文针对一线教师在制作PowerPoint时对插入的Flash动画难以进行灵活控制的问题，提出通过设置按钮、利用VBA编程来灵活控制Flash的播放，并详细介绍了实现的方法。一、引言在信息化教育日益普及的今天，随着多媒体技术的迅速发展与学校多媒体计算机使用的普及，教师运用多媒体教学越来越普遍。PowerPoint作为一种使用广泛的课件制作工具，因其简单易学、省时省力、操作灵活、兼容性好的优点而受到广

2、大用户，特别是广大一线教师的普遍欢迎。在很多中小学课堂中，PowerPoint是作为教学辅助工具而出现的，在必要的时候，在其中嵌入一些音乐或者Flash动画有利于帮助学生理解教学内容，然而大多数的素材都是在互联网上下载的，通过网络下载的音乐或动画文件只是部分地适用于教师的课堂教学，也就是说，课堂教学中只需要使用文件的一个片段，但对于中小学教师来说,将这些文件按照自己的教学要求裁剪下来，无疑是一个巨大的挑战，费时费力，很多教师会因此而放弃对一些优秀素材的使用。本文仅就此问题来讨论在PowerPoint中如何利用VBA方便地实现Fla

3、sh动画播放的控制。二、VBA简介VBA(VisualBasicforApplications)是由Microsoft公司开发的新一代标准宏语言，是VisuaIBasicforApplication的简写,它是基于VB(VisualBasic)发展而来的，并与VB具有相似的语言结构和相同的编程环境。它以VB语言为基础，经过优化,VBA专门用于Office的各应用程序，包括Word>ExcelPowerPoint>AccessFrontPage>Outlook以及Projecto它不能像VB一样能生成可执行程序。实际上VBA是“寄生

4、”于VB应用程序的版本。可以认为VBA是非常流行的应用程序开发语言VisualBasic的子集。VBA的主要特点如下：第一，VBA可以使已有的应用程序(Excel等)自动化，可以扩展已有程序，可以创建自定义的解决方案。第二，VBA必须“寄生”于已有的应用程序，其开发的程序必须依赖于它的“父”应用程序，例如Excel。第三，VBA一个关键特征是你所学的知识在微软的一些产品中可以相互转化。尽管存在区别，VBA和VB在结构上仍然十分相似。事实上，如果已经了解了VB,学习VBA会非常快。相应的，学完VBA会给学习VB打下坚实的基础。而且，

5、当学会在PowerPoint中用VBA创建解决方案后，即已具备在Word、Excel、Access和Outlook中用VBA创建解决方案的大部分知识。因为在Microsoft产品系列中，VBA是相通的。三、利用VBA控制Flash文件播放的方法1.将Flash文件插入PowerPoint在菜单栏选择“视图一工具栏一控件工具箱”，打开控件工具箱，在其中选择“”（其他工具），出现一个下拉列表，在其中选择“ShockwaveFlashObject"项,鼠标变成十字，在PowerPoint页面中画出该控件的范围，以后插入的Flash文件将

6、在这个范围内播放；然后在该范围内右击，选择''属性”，打开控件属性面板，其名称为“ShockwaveFlashl”,在此不做修改，后面我们会用到该属性，在其属性的“movie”一栏中，写入要插入的Flash文件的路径和文件名称（注：一般将Flash文件与PowerPoint文件保存到同一个文件夹下）。2.设置ShockwaveFlashl的相关属性其“playing”属性默认为"true”,表示PowerPoint播放，就是播放该Flash文件，但在实际应用中，我们并不希望这样，所以，将其改为“False”。为了防止在拷贝过程中丢

7、失源文件，可以将“EmbedMovie”设为“true”,表示将该Flash文件植入PowerPoint,另外,其中还有边框、背景颜色、位置、对齐方式等项的设置,读者可以根据自己的需要进行设置，在此不一一介绍。3.添加播放控制按钮(1)打开控件工具箱，点选“命令按钮”，在PowerPoint页面中画出一个命令按钮，调整其大小和位置,在属性面板中修改其名称属性为“play”，“caption"属性为“播放”，双击该按钮，进入VBA编辑窗口，输入如下内容：PrivateSubplay_Click()EndSub表示当点击该按钮时，Fl

8、ash文件将开始播放。(2)用同样的方法，插入“暂停”按钮，在属性面板中修改其名称属性为“pause”，“caption”属性为“暂停”，其代码如下：PrivateSubpause_Click()EndSub表示当点击该按钮后，Flash文件暂停播