幻灯片实例二.docVIP

幻灯片实例二 厦门集美中学宋红 学习要点： 美化幻灯片，并且加强幻灯片的功能。 问题与任务： 任务一、制作滚动文本框。 任务二、习题制作。 学习与实践： 任务一、制作滚动文本框。 在本幻灯片中有多张幻灯片中文本框文字过多，要全部显示必须将字号设置得很小，影响阅读。我们可以制作一个带滚动条的文本框。 我们来试试将第2张幻灯片中的文本框更换成带滚动条的文本框。 步骤1、先复制好原来文本框中文字备用。 步骤2、鼠标在工具栏中单击右键，选择“控件工具箱”。打开控件工具箱。或者在“视图”菜单中选择打开“控件工具箱”。 步骤3、单击控件工具箱中的文本框按钮。 文本框 文本框 步骤4、在幻灯片中拖动鼠标，画出一个文本框。 步骤5、选择文本框，单击鼠标右键，在右键菜单中选择“属性”。 步骤6、在“属性”面板中设置。 1、选择 1、选择“按分类排序” 2、在这里设置 3、点击黑三角，选择 0－fmScrollBarsNone 无滚动条 1－fmScrollBarsHorizontal 水平滚动条 2－fmScrollBarsVertical 垂直滚动条 3－fmScrollBarsboth 水平和垂直滚动条 步骤7、在“行为”一类中有MultiLine，这是“多行”的意思，这个选项很重要。它有False和True两项选择，这里一定要选择“True”。 步骤8、在文本框上点击右键，弹出快捷菜单上选择“文字框对象→编辑”，即可在文本框中输入文字。 步骤9、文本框中的文字格式，以及文本框的外观都可以在“属性”对话框中的“字体”、“外观”选项进行修改。 文字颜色 文字颜色 字体 文本框中文字背景 文字对齐格式 任务二、习题制作 选择题 步骤1、在“幻灯片放映”菜单中选择“动作按钮”——“自定义”。 步骤3、在幻灯片中画一个按钮。 步骤3、进行设置后，可用来制作选择题。 与上节课类似，也要用到自定义动画和触发器设置。有兴趣的老师自己摸索完成。 填空题 步骤1、打开控件工具箱。 步骤2、单击控件工具箱中的文本框，拖动鼠标，在幻灯片中绘制一个文本框。 步骤3、单击“命令按钮”按钮并画一个按钮来。选中此按钮，单击“属性”，展开“命令按钮”属性对话框。 步骤4、将其中的“Caption”修改为你要显示的文字，这里我设置为“正确答案”并关闭属性窗口。 步骤5、双击插入的命令按钮打开VBA编辑窗口。 步骤6、在VBA编辑窗口中编辑语言。 窗口中已经默认添加了程序体的头和尾，我们只需要添加中间的语句就行。 这里我们添加的是： If TextBox1.Text = If TextBox1.Text = 朱自清 Then dd = MsgBox(你填对了, vbOKCancel, 结果) Else dd = MsgBox(你填错了, vbOKCancel, 结果) End If 用于填空的文本框这个控件的名称 填空的正确答案 步骤7、上面这个程序体，在应用时只需要更改划横线的部分，就能广泛用于填空题中。对编程没有基础的老师，在制作课件时，只需直接复制这段语句进行修改就行了。