PowerPoint交互工具全接触.doc

PowerPoint交互工具全接触湖南省湘潭市雨湖区江南中学 常运虎 如今，课件的交互性成为评价课件的一项重要技术指标。说到交互，大家首先想到的是Autherware或Flash，而PowerPoint的交互制作能力，很多人（甚至包括一些专家级别的人）都是用“很弱”、“很差”来评价。PowerPoint一般用来制作顺序放映的课件，但它的交互能力并不为大家所熟知，因此我觉得有必要对PowerPoint交互效果的实现工具进行全面介绍，并顺便为PowerPoint“平反”。 工具一、键盘与鼠标 在放映状态下，按F1,打开“幻灯片放映帮助”窗口，里面介绍了很多使用键盘和鼠标放映幻灯片的方法。如上课时，常需要用指示屏幕上的重点，引起听课者的注意。如果用教鞭，一会儿拿鼠标，一会儿教鞭，很不方便。其实在PowerPoint播状态下，按下“Ctrl+p”，鼠标指针会变成一支笔（或者用鼠标右击，选择“指针选项”，还可选择笔的类型和颜色），用它来画线指示方便多了。如果你能很好地控制鼠标，还可写字呢！ 工具二、超链接 超链接是PowerPoint制作交互的常用工具，一般用于打开新的窗口或幻灯片页面。选中幻灯片上的对象（图形、图像、文字等），单击“插入”-“超链接”，打开“插入超链接”对话框，对话框里有四个选项，比较实用的是前两项（“原有文件”或“网页、本文档中的位置”）。在放映状态下，单击含有链接的对象，即可打开所链接的文件或幻灯片页面。 工具三、动作设置 动作设置与超链接有点类似，但制作交互效果的能力更强。选中幻灯片上的对象，然后单击“幻灯片放映”-“动作设置”，打开“动作设置”对话框，对话框上有“单击鼠标”和“鼠标移过”两个选项卡,两个选项卡中的设置完全一致，只是执行的条件不同而已选项卡“单击鼠标”用于设置对象鼠标单击时所执行的动作，选项卡“鼠标移过” 用于设置对象鼠标经过所执行的动作。下面以“单击鼠标”选项卡中的设置进行说明。 1、“无动作”。如果选中这一项，放映时，鼠标单击无反应。 图1 2、“超链接到”。选中“超链接到”，可在下拉列表中选择要链接对象后（这里可链接的对象比“超链接”要多），单击“确定”。在放映时，与工具二的效果一样。 3、“运行程序”。选择“运行程序”，单击“浏览”，选择计算机中扩展名为exe文件,单击“确定”。在放映时，与工具二的效果一样。 4、“运行宏”。只有在演示文稿中有宏时，这一项才能被选中，否则呈灰色。关于宏的编写方法，在后面中说明。 5、“对象动作”。要设置这一项，必须插入对象后才能使用。方法是：单击“插入”-“对象”，打开“插入对象”对话框，如图1所示，插入选定的对象后，再打开“动作设置”窗口，“动作设置”才可设置。对于不同的对象，对象动作下的下拉列表会有所不同，例如：对于一个“microsoft PowerPoint 幻灯片”对象，下拉列表中只有“编辑”、“打开”两个选项；对于一个“microsoft PowerPoint 演示文稿”对象，下拉列表中有“显示”、“编辑”、“打开”三个选项。 6、“放映声音”。选中这项，设置相应的声音，放映时，单击一下能放映出相应的声音。 7、“突出显示”。选中这项，放映时，每单击一下会改变一次颜色，然后还原。使用这一项，可制作出炫目的按钮特效。 在以上七个选项中，15项前是单选按钮，表示5项只能只时选中一项，一般文本框和图片使用其中的14项，对象用第5项；6、7项选是多选按钮，可选可不选。 图2 工具四、触发器 触发器是PowerPoint2002及以上版本中新增加的一个功能，它使PowerPoint动画放映具备了交互性。当为一个对象（图片、图形、文本框）设置了自定义动画后，还可以为动画设置一个触发器。一个对象可以设置多个触发器。在放映状态下，设置了触发器的对象只有在单击才放映动画效果。下面使用PowerPoint2003做一个如何触发器如何制作交互的例子。 交互要求：幻灯片上有七个文本框，分别输入文字“1+2=”、“A.1”、“B.2”、“C.3”、“D.4”、“正确”、“错误”。放映时，如果单击答案“C.3”，显示“正确”两字后这两个字自动消失；如果单击其他三个答案，则显示“错误”后让这两个字自动消失。 制作步骤： 步骤1、选中文本框“正确”，然后右击，在弹出菜单中选择“自定义动画”命令，打开“自定义动画”任务窗格。 步骤2、单击“添加效果”，添加一种动画效果，比如“百叶窗”，把任务窗格中的“开始”设置为“单击时”，“方向”和“速度”随意设置。 步骤3、在“速度”下方的已设置的动画效果上双击，打开“百叶窗”对话框，单击“计时”，选中“播完后快退”，再单击“触发器”及“单击下列对象时启动效果”，在下拉列表中选择“形状5：C.3”,然后按“确定”。这时在“自定义动画”任务窗格显示“触发器：形状5：C.3”，第一个触发器制作完毕。 步骤4、选中文本框“错误”，为文本框“错误”设置三个一样的动画，按照以上步骤，把“形状3：A.1”、“形状4：B.2”、“形状6：D.4”分别设置为这三个动画的触发器，如图2所示。 按F5,放映幻灯片，分别单击答案选项，看看效果如何。 工具五、控件工具箱 如果使用过可视化编程平台，对控件的使用不会陌生。在PowerPoint窗口上，单击“视图”-“工具栏”-“控件工具箱”，把“控件工具箱”显示出来，控件工具箱里显示了“复选框”等十一个常用控件，如果你觉得这些控件不够用的话，单击最后一个“其他”，里面还有上百个控件供你使用。有了这些，还有什么样的交互不能实现呢？当然，使用控件需要一些编程知识，控件中的程序用VAB语言编写，控件的使用在大多数Powerpoint书里都没提到，学习资料很难找，如果要学习的话，可以参考有关VB的书籍（因为VBA是VB的一个子集）及系统本身的帮助。下面举一例子来体验一把吧。 交互要求：在幻灯片上有一张七大洲四大洋的地理图片，各区域没有名称，分别用111等11个数字标示。放映时，单击某个区域上的数字，变成这个区域的名称，再单击名称，又变成数字。 制作步骤： 步骤1、按以上方法显示出“控件工具箱”，单击“标签”，然后在幻灯片上按住左键不放，在地图上太平洋区域里拖动鼠标，添加一个标签按件。 步骤2、单击控件工具箱上的“属性”，打开“属性”对话框。把Caption属性右边的值Label1改为1。如图3所示。 图3 步骤3、双击控件工具箱上的“查看代码”（或者双击添加的控件），打开代码编辑窗口,窗口中有两行代码： Private Sub Label1_Click() End Sub 在这两行代码之间插入以下代码： If Label1.Caption = 1 Then Label1.Caption = 太平洋 Else Label1.Caption = 1 End If 如图4所示。上面代码的意思是：如果Label1的Caption值为“1”，那么把它改成“太平洋”，否则把它改为“1”. 图4 按照以上三步，其他区域的制作照葫芦画瓢就是啦。 关闭代码编辑窗口，按F5放映，看看效果吧。什么？没反应，对啦，还有一个地方一定要记得设置哦：单击“工具”-“宏”-“安全性”，打开“安全性”窗口，把“安全级”设置为“中”或“低”，按“确定”后保存、关闭、再打开演示文稿，再看看效果吧。 工具六、宏 宏是用VBA语言编写的可在演示文稿中运行的一系列命令，控件中编写的代码实际上就是宏。宏不但可编写在控件中，用以控制控件的输入和显示，还可以单独编写，控制对象（图像、文本框、艺术字等）的显示与变化，从而使演示文稿更具交互性。在一个编写了宏的演示文稿中，使用“动作设置-运行宏”，在下拉列表中选择宏分配给演示文稿中指定的对象，然后在放映状态下，单击指定的对象来运行宏。要用宏来控制幻灯片上的对象，编写代码时必须象使用控件那样知道被控制对象的名称。可摆放在幻灯片上的图像等对象的名称不象控件那样容易查看和修改，必须编写一个用来给对象命名的宏。（真搞不懂微软公司为什么要这样做，我也是与网友交流时偶然得知的。）它的编写步骤及代码如下：步骤1、运行Powerpoint，在编辑状态下，单击“工具-宏-宏”，打开“宏”对话框，在宏名（M）里键入:Nameshape，如图5所示。 图5步骤2、单击“创建”，进入代码编译窗口，如图6所示，键入以下代码（以下第1、2、3及最后一行由系统自动生成，不必输入）,：Sub NameShape() 宏由 changyunhu 创建，日期 2007-3-1。 On Error GoTo AbortNameShape Dim Name$ If ActiveWindow.Selection.ShapeRange.Count = 1 Then Name$ = ActiveWindow.Selection.ShapeRange(1).Name Name$ = InputBox$(请给这个对象命名：, 命名, Name$) If Name$ Then ActiveWindow.Selection.ShapeRange(1).Name = Name$ End If Else MsgBox 一次只能选中一个对象！, vbExclamation, 提示 Exit Sub End If Exit SubAbortNameShape: MsgBox 没有对象被选择！, vbInformation, 提示End Sub 图6步骤3、关闭代码编译窗口，单击“文件-另存为”，打开“另存为”对话框，在“保存类型”列表中选择“演示文稿设计模板（*.pot）”，文件名为：“带命名宏的模板.pot”，如图7所示。以后要使用这个宏时，就用此模板来创建ppt文件。 图7下面利用上面的模板来制作一个带有交互功能的演示文稿。交互要求：在幻灯片上有两个椭圆和一张图片，两个椭圆上分别有文字“变大”、“变小”。单击标有“放大”的椭圆时，“放大”椭圆的背景颜色为红色，“变小”椭圆的背景颜色为白色，然后每单击图片一次，图片就放大一点。单击“变小”，效果相反。制作步骤: 步骤1、使用模板“带命名宏的模板.pot”新建一个演示文稿，在幻灯片上插入两个椭圆和一幅图片，在两个椭圆里分别输入文字“变大”，“变小”。如图8所示。图8步骤2、选择图片，单击“工具-宏-宏”，在“宏”对话框中选择宏“Nameshape”，单击“运行”。如图9所示。 图9步骤3、弹出“命名”对话框,对话框中显示图片的名称，把名称改为“pic”。如图10所示。 步骤4、按步骤2、3，把标有“变大”、“变小”椭圆的名称分别改为“big”、“small”。步骤5、单击“工具-宏-Visual Basic 编辑器”，打开编辑器窗口，输入以下代码：Dim a As IntegerSub bianhua()If a = 1 Then 图形变大 With ActivePresentation.Slides(1).Shapes(Picture) .Width = .Width * 1.25 .Height = .Height * 1.25 End WithElse 图形缩小 With ActivePresentation.Slides(1).Shapes(Picture) .Width = .Width * 0.8 .Height = .Height * 0.8 End WithEnd IfEnd SubSub fangda() 放大被选中 ActivePresentation.Slides(1).Shapes(big).Fill.ForeColor.RGB = RGB(255, 0, 0) ActivePresentation.Slides(1).Shapes(small).Fill.ForeColor.RGB = RGB(255, 255, 255) a = 1End SubSub suoxiao() 缩小被选中 ActivePresentation.Slides(1).Shapes(small).Fill.ForeColor.RGB = RGB(255, 0, 0) ActivePresentation.Slides(1).Shapes(big).Fill.ForeColor.RGB = RGB(255, 255, 255) a = 2End Sub步骤6、关闭“Visual Basic 编辑器”窗口，返回到演示文稿编辑窗口。步骤7、选择图片，单击“幻灯片放映-动作设置”，打开“动作设置”对话框，在“单击鼠标”选项卡中选择“运行宏”，在下拉列表中选择“biaohua”,如图11所示。然后单击“确定”。 图10 图11 步骤8、与步骤7相似，把宏“fangda”、“suoxiao”分配给标有“变大”、“