Powerpoint2003动画教程：互动式幻灯片.doc

Powerpoint2003动画教程：互动式幻灯片 一、触发器法我们利用动画触发器功能，来制作一道选择题的幻灯片（界面如图一）。1、启动PowerPoint2002，打开相应的演示文稿，在其中适当位置处新建一空白幻灯片。 2、利用文本框，输入题内容（参见图一）。 　　3、展开“幻灯片放映→动作按钮”下面的级联菜单，选中“动作按钮：自定义”选项（参见图二），然后在幻灯片中拖拉出一个按钮来。 　　注意：此时，系统会弹出一个“动作设置”对话框，单击其中的“确定”或“取消”按钮均可。 4、选中插入的按钮，右击鼠标，在随后弹出的快捷菜单中，选“添加文本”选项，在“动作按钮”上添加第一个备选答案字符（如“A、152克/摩尔”），并设置好字体、字号、字符颜色等。 　5、调整好“动作按钮”的大小，并将其定位在幻灯片的合适位置上。 　　注意：其实，我们也可以用“文本框”来输入备选答案项。此处之所以用“动作按钮”，是因为为了增强幻灯片的观感效果，别无其他意义。 6、选中上述“动作按钮”，在按住Ctrl键的同时，拖拉一下鼠标，将上述按钮快速复制1份（重复操作几次，再复制2份），并修改其中的字符为其它备选项答案（参见图一）。 7、插入文本框，并输入“正确、错误”及相关提示的字符（参见图一），并设置好字体、字号、字符颜色等。 　　8、选中上述第一个文本框（即包含“错误！有结晶水！”字符的，参见图一），执行“幻灯片放映→自定义动画”命令，展开“自定义动画”任务窗格（如图三），单击“添加动画”右侧的下拉按钮，在随后出现的下拉列表中，选“进入→飞入”选项；再按“方向”右侧的下拉按钮，在随后出现的列表中，选择“自左铡”选项，为选中的文本框添加动画。 9、在“自定义动画”任务窗格的第一个动画方案上双击鼠标，打开“飞入”对话框（如图四），切换到及时标签下，单击其中的“触发器”按钮，展开下面的选项，选中“单击下列对象时启动效果”选项，然后按其右侧的下拉按钮，在随后出现的下拉列表中选择“动作按钮：自定义2……”选项（即第一个备选答案对应的“动作按钮”项），“确定”返回。 　　10、仿照上述8、9步的操作，设置好另外3个文本框的动画及触发器。 　　至此，一张互动式幻灯片制作完成（图五是在播放过程中，选择B备选答案后的效果）。二、VBA法采取上述“触发器法”通常只能制作选择性的互动幻灯片，而对于那些填空式的互动幻灯片，我们用VBA来实现。 1、在相应的演示文稿中，添加一张空白幻灯片。并用文本框输入填空题的题目内容（参见图六）。 　　2、执行“视图→工具栏→控件工具箱”命令，展开“控件工具箱”工具条（参见图六）。单击工具条上的“文本框”按钮，然后在填空题的空格处拖拉出一个控件文本框来（参见图六）。 注意：选中文本框，单击工具条上的“属性”按钮，展开“文本框”属性对话框（参见图七），选中“font”选项，然后点击后面“…”号，可以打开“字体”对话框，设置字体、字型、字号；选中“TextAlig”选项，然后按其右侧的下拉按钮，即可设置文本的对齐方式。 3、再单击工具条上的“命令按钮”按钮，然后在幻灯片合适位置上拖拉出一个按钮来（参见图七）。选中此按钮，单击工具条上的“属性”按钮，展开“命令按钮”属性对话框（参见图七），将其中的“Caption”选项后面的内容修改为“查看结果”（具体修改内容，请根据需要确定），并关闭属性窗口。 4、双击插入的命令按钮，进入VBA编辑窗口（如图八），在“Private Sub CommandButton1_Click()”和“End Sub”语句之间，输入下述代码： 　　If TextBox1.Text = 物理 Then　　　　hd = MsgBox(你填对了, vbOKCancel, 结果)Else hd = MsgBox(你填错了, vbOKCancel, 结果)End If 代码输入完成后的效果请参见图八。 　　注意：①代码中的“hd”为自定义变量，可以用其他字母代码。②根据实际需要，可以将代码中的相应的字符替换成其他字符。 　　5、关闭VBA编辑窗口。 　　制作完成，赶快按下F5功能键，检查一下实际效果吧（图九是演示的效果）！ 水木动画网：/