2023年如何在PPT中制作flash (收藏)
利用控件解决ppT课件中Flash播放问题及制作滚动文本框
2023-08-15 17:36:48| 分类：学习软件 | 标签： |字号大中小订阅
Power Point易学易用；非常适合教师备课、上课使用；它能融合声音、flash动画、视频等多媒体。一个普通教师可以很快掌握Power Point，并很容易按自己的意愿设计出适合他本人教学的图文并茂、声兼备的课件。如果在学校推行Power Point，相信不出一年，就能把学校的教学推向现代化、信息化。针对广大教师在制作课件中经常遇到的难题，根据自己的教学实践，提出一些解决办法，或许能给广大教师带来帮助。
一、怎样让flash嵌入到ppt中去
PPT文档中插入Flash影片是课件制作者经常使用的一种制作手段。但由于这两款软件分属于两个不同的大公司，它们的兼容性并不好，这给很多教师，尤其是初学课件制作的教师带来困扰。虽然相关的技术文章也很多。但介绍的方法千篇1律，都是将Flash影片和PPT文档分别同时保存，并且不能改变其相对路径和名称才能保证Flash影片在PPT 文档中的正确播放。这给课件操作带来了诸多不便，经常因
为拷贝时漏拷Flash影片或存储路径发生改变而导致Flash 影片播不出来。而且对Flash插件的依赖也很
强，如果Flash 插件的版本不一样，属性框的设置项也不一样，这也无形中给初学者带来了设置上的难度。那么，能不能象在PPT文档中插入图片那样，让Flash影片和PPT文档融为一体，成为一个文件呢？下面我就给出一种方法，对这个困扰大家的问题进行解决，让Flash和PPT亲密无间。此方法的基础是利用控件插入Flash影片。具体步骤如下：
1、运行PowerPoint 2023，切换到要插入Flash动画的幻灯片。
2、单击“视图”菜单，在弹出的下拉菜单中单击“工具栏”，再在弹出的子菜单中单击“控件工具箱”，便出现“控件工具箱”
3、单击“控件工具箱”中的“其他控件”，弹出ActiveX控件窗口，窗口中列出了系统已经安装的所有ActiveX控件。利用键盘上的光标控制键，在控件列表中到“Shockwave Flash Object”并单击，此时系统会自动关闭控件窗口。
4、将光标移动到PowerPoint的编辑区域中，光标变成“十”字形，按下鼠标并拖动，画出适当大小的矩形框，这个矩形区域就是播放动画的区域。
5、右单击矩形框，在出现的快捷菜单中单击“属性”，
出现“属性”窗口。（如图） 6在设置控件属性时，如你的机器中安装的是Flashplayer9以前的版本，控
件属性窗口中会有一个“自定义”选项，点击“自定义中的… ”会出现属性页（如下图）。在这一步，影片URL(M) 中输入要插入的Flash影片的路径、名称及扩展名。并将“嵌入影片”选中，即可实现将Flash影片嵌入PPT文档中的效果。
7、必须说明的是，如果你机器中安装的是新版的Flash 控件，根本没有“自定义”选项。那也不用急，直接使用控件属性窗口设置也可完成同样效果，只是属性都是英文，不像属性页中的中文易懂。属性页中影片URL(M) 对应的是控件属性窗口中的Movie（影片）属性。“嵌入影片”选项对应的是属性窗口中的EmbedMovie（嵌入）属性。我们只需在控件属性窗口，Movie属性后输入路径、文件名及扩展名，将“EmbedMovie（嵌入）”属性设置成“True” 即可。（如右图）
8、放映该幻灯片，你所期待的画面就出现了。将设置好的文档保存并关闭，这样Flash就被包含到PPT文档中，成为一个文件了。我们只需拷贝这一个文件，再也不用担心Flash丢失了。
9、在PPT中实现对Flash的播放控制。如果插入的Flash 动画本身不包括控制按钮，而你又想控制动画暂停或继续播放，该怎么实现呢？插入命令按钮
1.制作(播放)按钮
在“控件工具箱”中选择“命令按钮”，在幻灯片中拖动，即可拖出一个命令按钮。调整好大小，在“属性”
面板中作如下设置：“名称”中输入“cmd_play”，“Caption”中输入“播放”。双击该按钮，进入VBA编辑窗口，输入如下内容：
Private Sub cmd_play_Click()
ShockwaveFlash1.Playing = True
End Sub
2.制作(暂停)、(前进)、(后退)、(返回)、(结束)按钮
按钮制作的方法同上。“属性”面板中分别作如下设置：暂停按钮的“名称”为“cmd_pause”，“Caption”为“暂停”；前进按钮按钮的“名称”为“cmd_forward”，“Caption”为“前进”；后退按钮的“名称”为“cmd_back”，“Caption”为“后退”；返回按钮的“名称”为“cmd_start”，“Caption”为“返回”；结束按钮的“名称”为“cmd_end”，“Caption”为“结束”。
分别为各个按钮加上VBA，命令依次如下：
Private Sub cmd_pause_Click()
ShockwaveFlash1.Playing = False
End Sub
Private Sub cmd_forward_Click()
ShockwaveFlash1.FrameNum = ShockwaveFlash1.FrameNum + 30
ShockwaveFlash1.Playing = True
End Sub
Private Sub cmd_back_Click()
ShockwaveFlash1.FrameNum = ShockwaveFlash1.FrameNum - 30
activex 控件ShockwaveFlash1.Playing = True
End Sub
Private Sub cmd_start_Click()
ShockwaveFlash1.FrameNum = 1
ShockwaveFlash1.Playing = True
End Sub
Private Sub cmd_end_Click()
ShockwaveFlash1.FrameNum = ShockwaveFlash1.TotalFrames
End Sub
说明：在(前进)、(后退)、(返回)按钮中，后面均加上一条播放命令，是因为在实际应用时，发现后面如果没有播放命令的话，Flash影片会停止播放，所以这句是万万不可少的。
3.播放幻灯片

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。