PowerPoint 2013幻灯片中插入Flash动画及对动画播放进行控制的方法( 二 )


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) 。再放映演示文稿时,单击幻灯片中的按钮能够对Flash动画的播放进行控制,。
图13 幻灯片播放效果
本文已经收录至:《Office 2013应用技巧实例大全》 – Office2013高级应用篇

推荐阅读