实验一 用PowerPoint制作演示型课件.ppt

实验一用PowerPoint制作演示型课件 本章知识点 1 演示文稿总体格式的设置2 宏和控件的应用和技巧3 用PowerPoint中的VBA实现智能交互4 常见练习题目的制作方法 幻灯片的外观格式的设置通常有三种方法 母版 配色方案和设计模板 利用模板 母版 配色方案等设定演示文稿的外观 既能使幻灯片的外观风格统一 又能大大简化编辑工作量 第一节演示文稿外观格式的设置 第一节演示文稿外观格式的设置 一 母版概述 1 母版所谓母版是一种特殊的幻灯片 它包含了幻灯片文本和页脚 如日期 时间和幻灯片编号 等占位符 这些占位符 控制了幻灯片的字体 字号 颜色 包括背景色 阴影和项目符号样式等版式要素 母版用于设置每张幻灯片的预设格式 母版的更改直接反映在使用该母版的每张幻灯片上 2 母版类型 母版有四种类型 幻灯片母版 标题母版 讲义母版和备注母版 幻灯片母版控制幻灯片上标题和正文文本的格式与类型 备注母版控制备注页的版式以及备注文字的格式 讲义母版用于添加或修改在每页讲义中出现的页眉或页脚信息 标题母版控制标题幻灯片的文本格式和位置 二 建立和使用母版 幻灯片母版 标题母版都包括背景效果 幻灯片标题和层次小标题文本的字体和格式 背景对象 正是这些因素才给了文稿一个总体上协调一致的外观 下面我们主要介绍幻灯片母版和标题母版两个主要母版的建立和使用 1 建立幻灯片母版 1 打开幻灯片母版视图新建或打开一个演示文稿 执行 视图 母版 幻灯片母版 命令 进入 幻灯片母版视图 状态 此时 幻灯片母版视图 工具条也随之被展开 幻灯片母版视图 1 建立幻灯片母版 2 设置文本格式 当更改幻灯片母版中的文本格式时 每一张幻灯片上的文本格式都会跟着更改 如果要对正文区所有文本的格式进行更改 分别右击 单击此处编辑母版文本样式 及下面的 第二级 第三级 字符 在随后弹出的快捷菜单中 选 字体 选项 打开 字体 对话框 设置好相应的选项后 确定 返回 2 设置文本格式 如果只改变某一层次文本的格式 则先选中该层次的文本 然后设置格式 如将第三级文本设置为加粗格式 则先选中母版中的第三级文本 然后单击 格式 工具栏上的 加粗 按钮 3 设置项目符号和编号 分别选中 单击此处编辑母版文本样式 及 第二级 第三级 等字符 执行 格式 项目符号和编号 命令 打开 项目符号和编号 对话框 设置一种项目符号样式后 单击 确定 退出 即可为相应的内容设置不同的项目符号样式 4 设置日期区 页脚区 数字区 执行 视图 页眉和页脚 命令 打开 页眉和页脚 对话框 切换到 幻灯片 标签下 即可对日期区 页脚区 数字区进行格式化设置 5 插入图片 执行 插入 图片 来自文件 命令 打开 插入图片 对话框 定位到事先准备好的图片所在的文件夹中 选中需要的图片将其插入到母版中 并定位到合适的位置上 全部修改完成后 单击 幻灯片母版视图 工具条上的 重命名模板 按钮 打开 重命名模板 对话框 输入一个名称后 如演示母版 单击 重命名 按钮返回 6 重命名模板 设置日期区 页脚区 数字区 7 单击 幻灯片母版视图 上的 关闭模板视图 按钮退出 幻灯片母版制作完成 重命名模板 2 建立标题母版 演示文稿中的第一张幻灯片通常使用 标题幻灯片 版式 以突出显示出演示文稿的标题 1 插入新标题母版在 幻灯片母版视图 状态下 按 幻灯片母版视图 工具条上的 插入新标题母版 按钮 进入 标题母版 状态 插入新的 标题母版 2 设置标题母版的相关格式 仿照上面 建立幻灯片母版 的相关操作 设置好 标题母版 的相关格式 设置完成后 退出 幻灯片母版视图 状态即可 如要给多张幻灯片设置同一模板 在大纲区视图中 按住Shift键 单击前 后两张幻灯片 可以同时选中连续的多张幻灯片 按住Ctrl键 分别单击相应的幻灯片 可以同时选中不连续的多张幻灯片 3 母版的应用 如果想为某一个演示文稿使用多个不同的母版 可以在 幻灯片母版视图 状态下 按工具条上的 插入新幻灯片母版 和 插入新标题母版 按钮 新建一对母版 并仿照上面的操作进行编辑修改 然后再重命名母版保存应用即可 如果是打开的已经制作好的演示文稿 则可以仿照下面的操作 可将多个母板应用到相关的幻灯片上 1 打开 幻灯片设计 任务窗格执行 视图 任务窗格 命令 展开 任务窗格 按其右上角的下拉按钮 在弹出的下拉列表中 选 幻灯片设计 设计模板 选项 打开 幻灯片设计 任务窗格 2 应用第一个母板双击上面的包含 母版 模板文件 如演示母版 pot 将第一对 母版 应用到当前演示文稿的所有幻灯片上 3 母版的应用 打开幻灯片设计任务窗格 应用选定的母版模板 3 母版的应用 4 母版版式设置 母版版式的设置是指控制母版上各个内容区域是否显示 幻灯片母版上的标题 文本 日期 幻灯片编号和页脚等占位符 若不需要 选中后按Del键删除即可 若要还原被删除的占位符 则单击 视图 母版 幻灯片母版 后 在 母版版式 对话框上 选中相应的复选框 然后单击 确定 即可 只有在幻灯片母版上删除某项占位符后 才能使用相应的复选框 设置 母版版式 5 更改幻灯片背景 幻灯片的背景也可以改变 但是需要注意的在母版和幻灯片上只能使用一种背景类型 更改背景时 既可将改变应用于单独的一张幻灯片 也可应用于幻灯片母版和全部幻灯片上 1 更改背景颜色如果要更改幻灯片背景的颜色 在幻灯片视图或母版视图中 单击 格式 背景 单击 背景填充 列表框右下端的向下箭头 从下拉列表中选择所需的选项 5 更改幻灯片背景 2 更改充填效果在幻灯片视图或者母版视图中 单击 格式 背景 后 单击 背景填充 列表框右边的按钮 再单击 填充效果 然后在 填充效果 对话框上进行设置 填充效果 对话框包含 过渡 纹理 图案 和 图片 四张选项卡 这四张选项卡的设置不能同时 重叠 发生作用 5 更改幻灯片背景 填充效果对话框 5 更改幻灯片背景 3 图案 选项卡可选择填充的图案 4 图片 选项卡可选择填充图片 若要显示图片 选择 忽略母板的背景图形 最后按 应用 即可 设置完毕后 单击 确定 返回到 背景 对话框 如果要将以上设置应用于全体幻灯片 则单击 全部应用 如果设置只限于本张幻灯片 则单击 应用 重复以上步骤就可以为所需的幻灯片更换不同的模板 5 更改幻灯片背景 6 从PPT文档中提取母板 1 用PowerPoint打开已有的PPT文档 2 点击 视图 母板 幻灯片母板 3 点击 文件 另存为 在 保存类型 中选择 演示文稿设计模版 文件后缀名为 pot 即可 二 配色方案 配色方案是一组用于格式演示文稿的预设颜色方案 用于设置演示文稿的主要颜色 共有八种颜色组成 背景 文本和线条 标题文本 阴影 填充 强调 强调和超级链接 强调和已访问的超级链接 演示文稿的配色方案可以更换 单击 格式 幻灯片设计 幻灯片配色方案 编辑配色方案 命令 在打开的标准的配色方案中挑选一种配色方案 选定应用此配色方案的幻灯片 在 任务窗格 的下面选中需要使用的配色方案 单击右侧的按钮 在弹出的下拉列表中 选中 应用于选定幻灯片 选项即可用于某一张 部分或全部演示文稿 在同一演示文稿中应用更多的配色方案以此类推 二 配色方案 标准配色方案 二 配色方案 通过这种方式 可以很容易地更改演示文稿的配色方案 并确保新的配色方案和演示文稿中的其他幻灯片相互调和 如想将一张幻灯片的配色方案应用于另一张中 也可利用 格式刷 工具按钮 在幻灯片浏览视图中选择具有所需配色方案的幻灯片 单击 常用 工具栏 可以重新着色一张幻灯片 双击 格式刷 键 依次单击要应用配色方案的一张或者多张幻灯片 可同时重新着色多张幻灯片 二 配色方案 如果标准配色方案不能满足需要 则用户可自定义 修改标准 配色方案 在 编辑配色方案 对话框上的 自定义 选项卡上 选中某个需要更改的颜色项目后 单击 更改颜色 或在该颜色色标上双击 然后在弹出的对话框上选择需要的颜色即可 二 自定义配色方案 配色方案中除了预设的八种颜色 还有许多其他颜色可供使用 按 配色方案 对话框 自定义 选项卡中 更改颜色 按钮 可使用 标准 或 自定义 选项卡中的颜色改变幻灯片组件的颜色 如文本 阴影 项目符号 背景 线条等 幻灯片组件改变颜色后 单击 添加为标准配色方案 可以添加到预设配色方案的下面 作为标准配色方案使用 二 自定义配色方案 自定义配色方案 二 自定义配色方案 一 设计模板模板是一个特别设计的文稿 其中包含 一种配色方案 一个幻灯片母版和标题母版 一种用于控制幻灯片上对象的布局 用户既可以在建立演示文稿之前 预先选定文稿所用的模板 也可以在演示文稿的编辑过程中 更改模板 三 设计模板 设计模板是控制演示文稿统一外观最为快捷 最有力的方式 系统提供的模板是由专业人员设计的 因此各个对象的搭配比较协调 配色方案比较醒目 能够满足绝大多数用户的需要 在一般情况下 使用设计模板建立演示文稿 几乎就用不着做什么修改 三 设计模板 使用设计模板 可以使用户设计出来的演示文稿的各个幻灯片具有统一的外观 通过改变设计模板 可以使文稿有一个制作风格 版式相似的演示文稿 用户在创建了自己的一个全新的文稿后 也可以将它保存下来 作为设计模板使用 三 设计模板 两种设计模板 设计模板和内容模板 设计模板包含预定义的格式和配色方案 可以应用到任意演示文稿中创建自定义的外观 内容模板包含的格式和配色方案与设计模板相同 不同的是加上了针对特定主题提供的建议内容 三 设计模板 在演示文稿中应用设计模板时 新设计模板的母版和配色方案将取代原演示文稿的母版和配色方案 应用设计模板之后 不论自动版式是什么 添加的每张新幻灯片都会拥有相同的自定义外观 三 设计模板 1 自定义设计模板 1 制作好演示文稿后 执行 文件 另存为 命令 打开 另存为 对话框 2 按下 保存类型 右侧的下拉按钮 在随后出现的下拉列表中 选择 演示文稿设计模板 pot 选项 3 为模板取名 如常用演示 pot 然后按下 保存 按钮即可 二 自定义设计模板 2 添加自定义设计模板 1 单击 另存为 命令 在对话框中将保存位置选择在 MicrosoftOffice template 演示文稿设计 文件夹中 保存类型 选定为 演示文稿模板 输入模板的 文件名 即可将自己设计的模板保存 并在 新建演示文稿 对话框的 演示文稿设计 选项卡和 常规任务 工具栏中的 应用设计模板 按钮激活的对话框中列出 二 自定义设计模板 2 如果其他设置不变 另存为 选择 演示文稿 文件夹 则可作为内容模板 在 新建演示文稿 对话框的 演示文稿 选项卡中列出 二 自定义设计模板 一 选择多个底层对象制作幻灯片时 如果对象很多并互相重叠时 对底层对象的选择和修改方法 1 用 Tab 键通过反复按 Tab 键 可以依次选取互相重叠的多个对象 用 Tab 键选择底层对象的方法很方便 但缺点是一次只能选择一个对象 不能将多个底层对象作为一个整体进行选定 移动 或同时对多个底层对象进行修改 四 PowerPoint使用技巧 2 用 选中多个对象 按钮 选中多个对象 按钮通常未被放置在绘图工具栏中 单击 绘图 工具栏最右边的 工具栏选项 箭头 选择 添加或删除按钮 绘图 多个对象 s 选项 通常未被选中 只需单击选中它即可 这样绘图工具栏上又多一个成员 选中多个对象 按钮 单击它 即可调出 选择多个对象 对话框 在 对象 列表框中会将本张幻灯片中所有的对象列出来 单击需要选中对象前的复选框 单击 确定 即可同时选中多个底层对象了 四 PowerPoint使用技巧 二 精确移动对象对象被选中后 如果要移动该对象 利用右键快捷菜单中的 叠放次序 选项 可先把该对象移到项层后 然后再进行移动 操作完毕后再置于底层即可 若要精确移动对象 用鼠标操作则比较困难 这时 只需在按下Ctrl键的同时 按下方向键 就可以向选定的方向以像素为单位移动 每按一下移动一个像素 从而能做到精确移动对象 四 PowerPoint使用技巧 三 播放PowerPoint课件的实用按键在演示PowerPoint课件时 常用的快捷键有 按下 b 或 键会显示黑屏 按任意键还原 按下 w 或 则是一张空白画面 再按一次返回到你刚才放映的那张幻灯片 在播放中途若要快速回到起始位置重新开始播放 按 或 四 PowerPoint使用技巧 实现幻灯片在窗口模式下播放 按住 Alt 键不放 依次按下 D 和 V 键即可 播放时若快速隐藏鼠标指针 按 Ctrl H 播放时若要快速调出绘图笔 按组合键 Ctrl P 即可 就可对重点内容做标记 对于画出的笔迹可通过按 E 键 直接擦除 或 Ctrl E 键 调出橡皮擦 快速擦除 四 PowerPoint使用技巧 转到下一张幻灯片 单击鼠标 按Enter或空格键 在右键快捷菜单上单击 下一张 转到指定的幻灯片上 键入幻灯片编号 再按Enter 或在右键快捷菜单上指向 定位至幻灯片 然后单击所需的幻灯片 绘图笔有9种颜色可供我们任意挑选 绘图笔的颜色也可以在课件播放前设置好 即打开 幻灯片放映 设置放映方式 绘图笔颜色 选项 设置成需要的颜色即可 四 PowerPoint使用技巧 第二节宏和控件的应用与技巧 一 PowerPoint中宏的应用如果在PowerPoint中反复执行某项任务 可以使用宏自动执行该任务 宏是一系列PowerPoint命令和指令 这些命令和指令组合在一起 形成了一个单独的命令 以实现任务执行的自动化 在PowerPoint中 可以通过录制宏 来帮助我们自动完成一系列操作 1 录制新宏执行 工具 宏 录制新宏 命令 打开 录制新宏 对话框 输入一个名称 按下 确定 按钮进行录制 2 停止录制宏根据需要 将要录制的过程操作一遍 然后按下 停止录制 按钮 退出录制状态 一 录制宏 3 运行宏执行 工具 宏 宏 命令 打开 宏 对话框 双击其中的宏 运行该宏即可 一 录制宏 宏的使用非常广泛 以在PowerPoint中快速插入多张图片为例介绍宏的使用 1 设置 录制新宏 选项打开需要插入图片的PowerPoint文档 选择 工具 宏 录制新宏 选项 弹出对话框 输入宏名 inpic 单击 确定 按钮 二 用宏批量插图片 录制新宏 对话框 二 用宏批量插图片 2 录制宏选择 插入 新幻灯片 选项 选取空白版式 单击 确定 按钮 选择 插入 图片 来自文件 选项 选取所需图片 单击确定按钮 3 停止录制宏单击 停止录制 按钮 二 用宏批量插图片 4 编辑宏代码选择 工具 宏 宏 选项 弹出对话框 如图所示 单击编辑按钮 在编辑窗口中复制中间两行代码 如图所示 并进行多次粘贴 粘贴次数为图片张数 本例中为5张图片 粘贴后如图 修改代码 依次将图片名称改为 02 03 04 05 按F5后回到PowerPoint窗口 二 用宏批量插图片 5 运行宏选择 工具 宏 宏 选项 运行宏 inpic 5张图片都插进来了 PowerPoint宏的功能强大 适当运用能达到事半功倍的效果 在本例中最好把需要用的图片放到同一个文件夹中 并且图片文件命名为有序的名称 以方便代码的修改 二 用宏批量插图片 运行宏对话框 二 用宏批量插图片 编辑 宏 代码窗口 二 用宏批量插图片 在编辑窗口中多次粘贴代码 二 用宏批量插图片 以制作带滚动条的文本框为例 介绍 控件工具箱 在PowerPoint制作幻灯片中的应用 二 PowerPoint中控件的应用 1 打开控件工具箱新建一个幻灯片 选择所需版面 点击 视图工具栏 控件工具箱 或在任意工具栏或菜单栏上击鼠标右键 选择 控件工具箱 打开 控件箱工具箱 文本框编辑区 2 画出文本框选择 控件工具箱 文本框 选项 在编辑区按住鼠标左键拖拉出一个文本框 调整位置及大小 二 PowerPoint中控件的应用 二 PowerPoint中控件的应用 3 设置文本框属性在 文本框 上右击鼠标 选择 属性 弹出 文本框 属性窗口 要实现滚动条对文本的控制 需要对文本框的一些属性进行设置 必须设置EnterKeyBehavior属性为True MultiLine属性为True 并按需设置ScrollBars属性 其他属性可根据个人需要进行设置 二 PowerPoint中控件的应用 文本框属性窗口 二 PowerPoint中控件的应用 EnterKeyBehavior设为True时允许使用回车键换行 MultiLine设为True时允许输入多行文字 ScrollBars是利用滚动条来显示多行文字内容 其中1 fmScrollBarsHorzontal为水平滚动条 2 fmScrollBarsVertical为垂直滚动条 3 fmScrollBarsBoth为水平滚动条与垂直滚动条均存在 当文字不超出文本框时 滚动条设置无效 当文字超出文本框时 则出现可拖动的滚动条 二 PowerPoint中控件的应用 4 输入文本内容右击文本框 在右键快捷菜单中选择 文本框对象 编辑 选项 即可进行文本内容的输入 或按 Ctrl V 把剪贴板上的文字拷贝到文本框中 二 PowerPoint中控件的应用 5 带滚动条的文本框编辑完成文本编辑完之后 在文本框外任意处单击左键退出编辑状态就完成了 带滚动条的文本框 二 PowerPoint中控件的应用 Flash动画插入PowerPoint中 通常有四种方法 一 使用 ShockwaveFlashObject 控件法1 打开 ShockwaveFlashObject 控件切换到要插入Flash动画的幻灯片 打开 控件工具箱 其他控件 弹出ActiveX控件窗口 窗口中列出了系统已经安装的所有ActiveX控件 在控件列表中找到 ShockwaveFlashObject 三 在PowerPoint中插入Flash动画 ShockwaveFlashObject 控件 三 在PowerPoint中插入Flash动画 单击 ShockwaveFlashObject 此时系统会自动关闭控件窗口 将光标移动到PowerPoint的编辑区域中 光标变成 十 字形 按下鼠标并拖动 画出适当大小的矩形框 这个矩形区域就是播放动画的区域 Flash动画的播放窗口 三 在PowerPoint中插入Flash动画 2 画出Flash动画的播放区域 3 Flash动画的属性设置右击矩形框 在出现的快捷菜单中单击 属性 出现 属性 窗口 在 movie 选项中 输入Flash动画的完整路径 或单击 属性 窗口中的 自定义 一栏 此栏右端出现一个按钮 单击该按钮 出现 属性页 窗口 在 影片URL M 右侧文本框中输入Flash动画的完整路径 别的项目采用系统默认的即可 最后按 确定 返回PowerPoint 三 在PowerPoint中插入Flash动画 Flash动画属性窗口 三 在PowerPoint中插入Flash动画 Flash动画与PowerPoint文件处于同一目录中 也可只输入Flash文件名 但必须带后缀名 swf Flash动画 属性页 窗口 三 在PowerPoint中插入Flash动画 4 Flash动画播放设置放映该幻灯片 Flash动画的画面就出现了 设定的矩形框的大小就是放映时动画窗口的大小 通过拖动矩形框的句柄可随意改变动画窗口的大小 Flash动画播放时 鼠标处在Flash播放窗口 响应Flash的鼠标事件 处在Flash播放窗口外 响应PowerPoint的鼠标事件 三 在PowerPoint中插入Flash动画 二 插入对象法1 插入Flash动画切换到要插入Flash动画的幻灯片 单击 插入 对象 选项 弹出 插入对象 对话框 选择 由文件创建 在出现的文本框中 通过单击 浏览 或直接输入Flash动画的完整路径 最后单击 确定 返回PowerPoint 三 在PowerPoint中插入Flash动画 插入对象 控件对话框 三 在PowerPoint中插入Flash动画 2 Flash动画图标调整在幻灯片上出现了一个Flash动画的图标 调整图标的大小和位置 可以根据需要随意改变 3 Flash动画动作设置右击该图标 在弹出的快捷菜单中单击 动作设置 出现 动作设置 对话框 激活对象 的方式可以是 单击鼠标 也可以是 鼠标移动 本例采用 单击鼠标 再选中 单击鼠标 标签中的 对象动作 激活内容 最后单击 确定 返回PowerPoint 如图10 27所示 三 在PowerPoint中插入Flash动画 动作设置 对话框 三 在PowerPoint中插入Flash动画 4 Flash动画放映放映该幻灯片 当鼠标单击Flash动画图标时 出现一个询问框 单击 是 系统便会调用Flash播放程序来播放动画 三 超级链接法1 建立链接对象切换到要插入Flash动画的幻灯片 在其中建立任意一个对象 如一段文字 一张图片等 2 打开 插入超级链接 对话框选中这个对象 单击 插入 菜单 在弹出的下拉菜单中单击 超级链接 或右击对象 从弹出的快捷菜单中单击 超级链接 此时会弹出 插入超级链接 对话框 系统默认链接到的对象是对话框左侧上部的 原有文件或Web页 三 在PowerPoint中插入Flash动画 设置Flash动画的路径 三 在PowerPoint中插入Flash动画 四 动作设置法在需要设置链接的对象上右单击 在弹出的快捷菜单中单击 动作设置 出现 动作设置 对话框 选择激活对象的方式 单击鼠标 或 鼠标移动 再选中 超级链接到 单选按钮 单击右侧朝下的小黑箭头 在弹出的下拉列表中 单击最下端的 其他文件 出现 超级链接到其他文件 对话框 设置好Flash动画的路径 单击 确定 返回PowerPoint即可 三 在PowerPoint中插入Flash动画 如果课件要求智能反馈 如填空题 选择题或判断题等 可利用控件搭建环境 利用VBA编程 来实现复杂的智能交互 第三节用VBA制作智能交互型的课件 一 常用控件的属性设置1 复选框 CheckBox 可以选择多个选项 常用来设计多选题 其属性设置 AutoSize有两个值 True表示根据字的多少调整复选框大小 False表示复选框为固定大小BackColor 设置复选框的背景颜色 单击该属性框出现下拉按钮 选择 调色板 选项卡后选择颜色 一 VBA编程基础 Caption 控件的名称 把默认值删除后 再重新输入新名称 Font 设置字体 字号及字形 单击该属性框出现按钮 单击该按钮出现字体对话框 再在对话框中对字体格式设置 ForeColor 设置字的颜色 设置方法同BackColor Height 复选框的高度 直接输入数字即可 Width 复选框的宽度 直接输入数字即可 Value 复选框的值 True为选中 相反False则为未选中 一 VBA编程基础 2 文本框 TextBox 可以输入文本 常用来设计填空题 其AutoSize BackColor Font ForeColor Height Width等属性的设置方法同复选框 Value 文本框的值 用来保存输入的文本 TextAlign 设置文本对齐方式 3 命令按钮 CommandButton 用来确定选择或输入 也可设计超级链接等 属性设置同复选框 一 VBA编程基础 4 单选框 OptionButton 只能选中一个选项 常用来设计单选题或判断题 除Value外 其他同复选框 5 标签 Label 用来显示文字信息 除Value外 其它同复选框 一 VBA编程基础 6 消息框 MsgBox 常用消息框显示一些交互的信息 如图所示的消息框用下面的语句可实现 MsgBox 这是一个例题 vbYesNo 示例 用消息框显示交互信息 一 VBA编程基础 双击幻灯片中的控件 或用菜单 工具 宏 Visualbasic编辑器 命令 即可进入VBA编程状态 进入VBA后 需要在 属性 窗口中对控件的属性进行设置 如果没有出现 属性 窗口 按F4键即可调出该窗口 二 VBA的编程环境 二 制作智能交互型的课件以制作单选题 选择题 判断题和填空题为例来介绍智能的课件的制作方法 二 制作智能交互型的课件 一 单选题的制作1 题目题目的输入可用文本框 也可用标签 如果用文本框 直接输入文本即可 如果用标签 插入后双击该标签启动VBA 修改Caption属性为 5X 15 0的解是 再根据需要修改其他属性 单选题的运行界面 二 制作智能交互型的课件 2 答案选项插入一个单选框 第一个单选框 修改其Caption属性为 A3 其他属性可自行修改 其他的单选项可复制制作好的单选框 然后再分别修改它们的Caption属性为 B5 C11 和 D18 二 制作智能交互型的课件 3 查看答案 命令按钮在此插入一个命令按钮 第一个命令按钮 我们可根据单选框的Value属性的值来判断答案 如正确选项 单选框 的Value的值为True 则为该题选择正确 否则为选择错误 另外还可根据选择正误来给出提示信息 有两种方法 二 制作智能交互型的课件 1 方法一用MsgBox 如果选择正确 显示信息 VeryGood 请继续 选择错误则显示 Sorry 你选错了 正确答案是3 请继续努力 具体操作步骤 双击单选框进入VBA编辑窗口 在编辑窗口中完成以下操作 二 制作智能交互型的课件 1 在编辑窗口中找到如下两条语句 PrivateSubOptionButton1 Click 和EndSub语句 然后在上面这两条语句中间插入以下语句 IfOptionButton1 Value TrueThenex MsgBox VeryGood 请继续努力 vbOKOnly 二 制作智能交互型的课件 方法1的代码编辑窗口 二 制作智能交互型的课件 2 同理 找到如下三组语句 第一组语句 PrivateSubOptionButton2 Click 和EndSub 第二组语句 PrivateSubOptionButton3 Click 和EndSub 第三组语句 PrivateSubOptionButton4 Click 和EndSub 二 制作智能交互型的课件 在这三组的两条语句中间分别插入语句 IfOptionButton2 Value TrueThenex MsgBox 正确答案是3 请继续努力 vbOKOnly IfOptionButton3 Value TrueThenex MsgBox 正确答案是3 请继续努力 vbOKOnly IfOptionButton4 Value TrueThenex MsgBox 正确答案是3 请继续努力 vbOKOnly 说明 ex为自定义变量在所有代码的前使用dimex定义变量ex 二 制作智能交互型的课件 二 制作智能交互型的课件 2 方法二在幻灯片合适的地方插入一个标签 第二个标签 修改其Caption属性为空 其他设置同方法一 只要把正确选项中的 then 后的语句名改为 Label2 Caption VeryGood 请继续 三个错误选项的 then 分别改为 Label2 Caption 正确答案是3 请继续努力 即可 方法2的代码编辑窗口 二 制作智能交互型的课件 4 重新选择 命令按钮在幻灯片适当的地方插入一个命令按钮 修改其Caption属性为 重新选择 在编辑窗口中的PrivateSubCommandButton2 Click 和EndSub语句间插入 OptionButton1 Value FalseOptionButton2 Value FalseOptionButton3 Value FalseOptionButton4 Value FalseLabel2 Caption 二 制作智能交互型的课件 5 下一题 命令按钮在幻灯片适当地方插入一个命令按钮 修改其Caption属性为 下一题 在编辑窗口中的PrivateSubCommandButton3 Click 和EndSub语句间插入 IfMsgBox 是否继续 VbYesNo VbQuestion 下一题 VbYesThenWithSlideShowWindows 1 ViewGotoSlide2EndWith 2为第2张幻灯片 此语句表示转到第2张幻灯片Endif 二 制作智能交互型的课件 重新选择 和 下一题 命令按钮代码编辑窗口 二 制作智能交互型的课件 如果要根据条件的不同转到不同的幻灯片 可用下面语句 If条件thenWithSlideShowWindows 1 View GotoSliden n为第n张幻灯片 转到第n张幻灯片EndWithEndif 二 制作智能交互型的课件 说明 条件可以是Caption属性或Value属性 书写方法为 控件名称