使用默认的冲击波1作为名称

插入Flash电影单击视图/工具栏/控件工具箱，选择其他控件/冲击波Flash对象，用鼠标拖动幻灯片中的框，并调整大小。这样，我们通过插入一个控件来插入一个Flash控件，选择当前控件，并在“属性”面板中进行如下设置：“电影”用所需的Flash电影名称填充，默认的“冲击波Flash1”用作名称，这将在以后的VBA编程中使用。插入命令按钮1。制作(播放)按钮在控件工具箱中选择“命令按钮”，并在幻灯片中拖动以拖出一个命令按钮。调整大小，并在属性面板中进行以下设置：在名称中输入cmd_play，在标题中播放。双击按钮进入VBA编辑窗口，输入如下内容：Private subcmd _ play _ click()shock wave flash 1。播放=真结束sub2。制作(暂停)、(前进)、(后退)、(返回)和(结束)按钮的方法同上。在属性面板中进行如下设置：暂停按钮名称为cmd_pause，标题为pause；前进按钮按钮名称为cmd_forward，标题为forward；后退按钮的名称是cmd_back，标题是back。返回按钮名称为cmd_start，标题为Return；结束按钮的名称是cmd_end，标题是end。分别给每个按钮添加VBA，命令如下：private subcmd _ pause _ click()shock flash1 . playing=false end sub private subcmd _ forward _ click()shock flash1。FrameNum=ShockwaveFlash1。FrameNum冲击波闪光灯1。播放=true end SubPrivate Sub cmd _ back _ Click()shock flash1。FrameNum=ShockwaveFlash1。frame num-30冲击波闪光灯1。播放=true end SubPrivate Sub cmd _ start _ Click()shock flash1。FrameNum=1ShockwaveFlash1。playing=true end SubPrivate Sub cmd _ end _ Click()shock wash Flash1 . framenum=shock wash flash1 . totalframendsub说明：在(前进)、(后退)和(后退)按钮中，后面增加了一个播放命令，因为在实际应用中，发现如果后面没有播放命令，flash电影就会停止播放，所以这句话绝对必不可少。(教程)3。播放幻灯片，看看按钮是否可以控制电影？什么事？没有回应。一定是宏的安全性设置得太高了。单击工具/宏/安全，并将安全级别设置为低。再打开PowerPoint好吗？