好了！大家都知道，在课件制作中常常要制作单选题、多选题、填空题和判断题，下面这个实例就是制作这几类题目。
1、启动POWERPOINT，将幻灯片版式设为“空白版式”。单击菜单中的“插入”--“文本框”--“水平”，在插入的文本框中输入“PowerPoint交互演示文稿”，同理插入其他文本框并输入相应的内容及相应格式化，最后结果如下图所示(注意，有十一个文本框哦！）：
接下来单击“视图”菜单--“工具栏”--“控件工具箱”，出现如下图所示的控件工具箱：
控件解释如下图：
在PPT中的5种交互式操作
谭笑风生 发表于: 2007-6-28 13:17 来源: 扑奔PPT网
虽然现在很多老师都在用POWERPOINT制作课件,可是绝大部分的老师都认为它不能进行交互式的对话操作,其实是这样的吗？上一节我就利用“触发器”给大家初步见识了简单实现交互的一种方法，下面我还要以一个实例制作给各位讲解POWERPOINT是如何实现强大的交互操作的，我想你如果跟着做完以后，肯定会说：“没想到POWERPOINT也做到这样呀！”。
好了！大家都知道，在课件制作中常常要制作单选题、多选题、填空题和判断题，下面这个实例就是制作这几类题目。
1、启动POWERPOINT，将幻灯片版式设为“空白版式”。单击菜单中的“插入”--“文本框”--“水平”，在插入的文本框中输入“PowerPoint交互演示文稿”，同理插入其他文本框并输入相应的内容及相应格式化，最后结果如下图所示(注意，有十一个文本框哦！）：
接下来单击“视图”菜单--“工具栏”--“控件工具箱”，出现如下图所示的控件工具箱：
控件解释如下图：
好了！大家都知道，在课件制作中常常要制作单选题、多选题、填空题和判断题，下面这个实例就是制作这几类题目。
1、启动POWERPOINT，将幻灯片版式设为“空白版式”。单击菜单中的“插入”--“文本框”--“水平”，在插入的文本框中输入“PowerPoint交互演示文稿”，同理插入其他文本框并输入相应的内容及相应格式化，最后结果如下图所示(注意，有十一个文本框哦！）：
接下来单击“视图”菜单--“工具栏”--“控件工具箱”，出现如下图所示的控件工具箱：
控件解释如下图：
大家对 在PPT中的5种交互式操作 的评论
最新PPT模板
最新贴子
PPT热贴
单击控件工具箱中的“选项按钮”，将鼠标标移至第1题下面（此时鼠标指针为细十字），拖动出一个合适大小的矩形框。此时你应该会看到一个单选按钮，并且选项内容为OptionButton1。接着右击这个单选按钮，选择弹出的快捷菜单中的“属性”，打开属性对话框并做如下图所示的设置：
解释一下：这里我分别对名称、Caption和GroupName项进行设置。
①名称：即该单选按钮的名字，默认为OptionButton1，为了方便，我改为Optb1；
②Caption即标题，它是指显示在单选按钮后的文字，默认为OptionButton1，在第一个选项中，我按题目将其改为“美国”；
③GroupName即分组名，因为若干个单选项中我们只能选择其中之一，这样我们就需要将第一题的四个单选按钮分成一组，第二题的四个选项分成另一组，这样就不会出现八个单选按钮只能选择一个的现象了。
再接下来，用同样的方法，再制作其他七个单选项到相应位置，分别取名为Optb2---Optb8，并将前四个划为第一组，GroupName属性为group1，后四个划为一组，GroupName属性为group2。Caption项分别设为相应的选择内容。此时的两道单选题的选项添加完成，如下图：
单击控件工具箱中的“复选框”，将鼠标移至第3题下面，拖动鼠标，画出一个矩形框，此时我们会看到一个复选按钮，并且在后面有CheckBox1。然后单击控件箱中的“属性”也会打开属性设置窗口，分别将其（名称）设为Chkb1、Caption设为“单击开始中的程序查找”、GroupName设为group3（注意不要与两组单选题的组名同名哦）。
用同样的方法制作并设置其他多选项，名字分别为Chkb2---Chkb8，Caption设为相应的选择项，将前四个复选按钮的GroupName设置为group3，其他四个设为group4。此时已完成单选项、多选项的添加，如下图所示：
单击控件工具箱中的“文本框”，将鼠标移至第5题空位置，拖动出合适的大小，这样就会看到一个空的文字框。然后单击控件箱中的“属性”，将其（名称）设为Txb1，同理制作其他两个文本框，名称分别为Txb2和Txb3。完成后的填空如下图所示：
单击控件工具箱中的“切换按钮”，将鼠标移至第7题后面，拖动鼠标，我们会看到一个按钮。然后单击控件箱中的“属性”，将其（名称）属性设置为Tgb1,Caption值设为“判断”。如图所示：
单南控件工具箱中的“命令按钮”，在合适的位置拖动鼠标，我们会看到一个命令按钮。然后单击控件箱中的“属性”，在属性窗口中将其（名称）属性设置为Cmb1和Cmb2，Caption分别设为“开始答题”和“查看成绩”即可。
OK！到这里为止，我们的界面设计就全部结束了。最后界面如下图所示：
那是不是到这里就真的全部完成了呢？当然不是！还有最精华的部分还没做，即还要对相应的判断、答题按钮编写代码。这个较难，有些老师可能有难度，耐心看一下，其实这些代码只是一些很简单的程序，有学过VB的老师就相对较容易了。
大击判断按钮，就会出现其单击事件的代码窗口，在Private Sub tgb1_Click()和End sub之间写入一句代码
If tgb1.value=true Then tgb1.Caption="√" Else tgb1.Caption="×"
如下图所示：
双击“开始答题”按钮，在Private Sub Cmb1_click()和End sub之间写入如下绿色代码：
Optb1.Value = False
Optb2.Value = False
Optb3.Value = False
Optb4.Value = False
Optb5.Value = False
Optb6.Value = False
Optb7.Value = False
Optb8.Value = False
Chkb1.Value = False
Chkb2.Value = False
Chkb3.Value = False
Chkb4.Value = False
Chkb5.Value = False
Chkb6.Value = False
Chkb7.Value = False
Chkb8.Value = False
Txb1.Text = ""
Txb2.Text = ""
Txb3.Text = ""
Tgb1.Caption = "判断"
这是一些初始化代码,单击"开始答题"按钮时可以将各题的答题信息清除,然后重新答题。
再双击“查看成绩”按钮，在Private Sub Cmb2_Click()和End sub之间写入如下绿色代码：
Dim no1, no2, no3, no4, no5, no6, no7
If Optb1.Value = True Then no1 = "正确" Else no1 = "错误，答案应为第一项"
If Optb7.Value = True Then no2 = "正确" Else no2 = "错误，答案应为第三项"
If Chkb1.Value = True And Chkb3.Value = True And Chkb4.Value = True Then no3 = "正确" Else no3 = "错误，答案应为第一、三、四项"
If Chkb5.Value = True And Chkb6.Value = True And Chkb8.Value = True Then no4 = "正确" Else no4 = "错误，答案应为第一、二、四项"
If Txb1.Text = "运算器" Then no5 = "正确" Else no5 = "错误，答案应为运算器"
If (Txb2.Text = "硬件" And Txb3.Text = "软件") Or (Txb2.Text = "软件" And Txb3.Text = "硬件") Then no6 = "正确" Else no6 = "错误，答案应为硬件和软件"
If Tgb1.Value = False And Tgb1.Caption <> "判断" Then no7 = "正确" Else no7 = "错误，答案应为错误"
MsgBox "第1题答案" & no1 & Chr(13) & "第2题答案" & no2 & Chr(13) & "第3题答案" & no3 & Chr(13) & "第4题答案" & no4 & Chr(13) & "第5题答案" & no5 & Chr(13) & "第6题答案" & no6 & Chr(13) & "第7题答案" & no7, vbOKOnly, "查看答案"
这些代码是用来判断各题的答题对错，并将对错情况存储在七个变量当中，最后显示出做题结果。如下图：
这是我做的，哇！都对了也。
到此我已将这个复杂的交互操作题目的制作都讲解完了，怎么样？对POWERPOINT有没有新的认识？快自已制作一个吧！如果需要我制作的这个实例原文件的话，可以找我要！
可是看到代码就头大，只有望而却步.
打印好存起來啦
厉害
pf