PowerPoint 2013幻灯片中插入Flas * 及对动画播放进行控制的方法
时间:2023-10-08 12:53:34
在各类PPT演示文稿中经常需要使用Flas * 。在PowerPoint 2013幻灯片中,可以使用Shockwave Flash Object控件来插入Flas * ,通过对控件进行编程,用户能够方便地对动画的播放进行控制。本文将介绍在PowerPoint 2013幻灯片中插入Flas * 以及对动画播放进行控制的方法。
1、启动PowerPoint 2013,创建演示文稿。在“开发工具”选项卡的“控件”组中单击“其他控件”按钮,。此时打开“其他控件”对话框,选择“Shockwave Flash Object”控件,,然后单击“确定”按钮关闭“其他控件”对话框。
图1单击“其他控件”按钮
图2“其他控件”对话框
2、此时,鼠标指针变为形状,按住左键拖动鼠标在幻灯片中绘制控件,。按住左键拖动控件能改变其在幻灯片中的位置,拖动控件上的控制柄可以调整控件的大小。
图3绘制控件
3、在“开发工具”选项卡的“控件”组中单击“属性”按钮,。此时打开“属性”对话框,在“Movie”右侧的文本框中输入需要播放的Flash文件的路径地址和文件名,。然后按“F5”键播放幻灯片,插入的动画即开始播放。
图4单击“属性”按钮
图5输入Flash文件地址
4、在“开发工具”选项卡的“控件”组中单击“命令按钮”按钮,然后按住左键拖动鼠标在幻灯片中添加一个命令按钮,。然后在“属性”对话框中设置按钮的“Caption”属性更改按钮上显示的标题,。
图6添加“命令按钮”控件
图7设置控件的“Caption”属性
5、使用相同的方法在幻灯片中再添加3个“命令按钮”控件,并将按钮上显示的标题分别更改为“停止”、“快进”和“快退”。在幻灯片中按住“Ctrl”键单击控件同时选择这些控件,然后在“格式”选项卡的“排列”组中单击“对齐对象”按钮,在打开的下拉列表中先选择级联列表中的“左对齐”选项使控件左对齐,然后再选择其中的“纵向分布”选项使控件纵向分布放置,。
图8选择“纵向分布”选项
6、在“播放”按钮上右击,选择快捷菜单中的“查看代码”命令打开Visual Basic编辑器窗口,此时在该控件的代码窗口中将自动添加“Click”事件。在代码窗口中输入控件的Click事件代码,。这段代码的作用是当单击“播放”按钮时,Flas * 开始播放。详细的事件代码程序。
图9为“播放”按钮添加Click事件代码
01 Private Sub CommandButton1_Click()
02 ShockwaveFlash1.Play'动画开始播放
03 ShockwaveFlash1.Loop=True'允许动画循环播放
04 End Sub
注意
控件是一种模块化的对象,在编写程序时,。这段程序代码的作用是实现单击该按钮时动画播放将暂停,再单击将使动画播放停止。详细的事件代码。
图10为“暂停”按钮添加事件代码
01 Private Sub CommandButton2_Click()
02 ShockwaveFlash1.Stop'动画停止播放
03 End Sub
注意
这里,Play和Stop都是Flash控件的方法。控件的方法实际上是控件的内部函数,VBA程序调用这些控件方法,能够完成不同的动作,实现需要的操作,并对控件的状态进行修改。在程序中使用控件的方法十分简单,在输入控件后键入“.”,Visual Basic编辑器会给出控件方法和属性的代码提示,用户可以直接在列表中选择并应用到程序中。
8、在代码窗口中为“快进”按钮添加Click事件代码,。该段代码的作用是实现在单击该按钮时,动画播放跳转到当前帧前面10帧的位置,然后继续播放。详细的事件代码。
图11为“快进”按钮添加Click事件代码
01 Private Sub CommandButton3_Click()
02 ShockwaveFlash1.GotoFrame(ShockwaveFlash1.CurrentFrame+10)'动画前进10帧
03 ShockwaveFlash1.Play'继续播放动画
04 End Sub
9、在代码窗口中为“快退”按钮添加Click事件代码,。该段代码的作用是实现在单击该按钮时,动画播放跳转到当前帧后面10帧的位置,然后继续播放。详细的事件代码。
图12为“快退”按钮添加事件代码
01 Private Sub CommandButton4_Click()
02 ShockwaveFlash1.GotoFrame(ShockwaveFlash1.CurrentFrame+10)'动画后退10帧
03 ShockwaveFlash1.Play'继续动画播放
04 End Sub
10、至此,本实例制作完成,将演示文稿保存为启动宏的文件格式(扩展名为*.pptm)。再放映演示文稿时,单击幻灯片中的按钮能够对Flas * 的播放进行控制,。
图13幻灯片播放效果
本文已经收录至:《Office 2013应用技巧实例大全》 – Office2013高级应用篇