如何用PPT制作选择题高级技巧

    1.单选题的题目是:5X-15=0的解是0、5或3。　　

    本题可用文本框，也可用标签。如果用文本框，直接输入文本即可。如果用标签，插入后双击该标签启动VBA，修改Caption属性为“5X-15=0的解是:”再根据需要修改其他属性（如颜色等）。

　　2.选项

　　插入一单选框，修改其Caption属性为“0”，其他属性可自行修改。其他的单选项可复制制作好的单选框，然后再修改它们的Caption属性。

　　3.“查看答案”命令按钮

　　在此使用命令按钮，我们可根据单选框的Value属性的值来判断答案，如正确选项（单选框）的Value的值为True，则为该题选择正确，否则为选择错误。根据选择正误来给出信息，有两种方法。

　　（1）如何用PPT制作选择题高级技巧方法一

　　用MsgBox（），如果选择正确，显示信息"VeryGood!请继续！"，错误则显示"Sorry,你选错了！正确答案是3，请继续努力。"

　　操作步骤：双击单选框进入VBA，在编辑窗口中完成以下操作。

　　A.在编辑窗口中找到如下两条语句：

　　PrivateSubOptionButton3_Click()

　　EndSub

　　然后在上面这两条语句中间插入以下语句：

　　IfOptionButton3.Value=TrueThenex=MsgBox("VeryGood!请继续努力。",Vbokonly)

　　B.同理，找到如下两条语句：

　　PrivateSubOptionButton1_Click()

　　EndSub

　　在这两条语句中间插入语句：

　　IfOptionButton1.Value=TrueThenex=MsgBox（"正确答案是3，请继续努力。",Vbokonly）

　　C.找到如下两条语句

　　PrivateSubOptionButton2_Click()

　　EndSub

　　在这两条语句中间插入语句　

　　IfOptionButton2.Value=TrueThenex=MsgBox（"正确答案是3，请继续努力。",Vbokonly）

　　说明：ex为自定义变量

　　（2）如何用PPT制作选择题高级技巧方法二

　　在幻灯片合适的地方插入一标签，修改其Caption属性为空,其他设置同方法一,只要正确选项中的“then”后的语名改为“label2.caption="VeryGood!"请继续！"”，错误选项的改为“label2.caption="正确答案是3，请继续努力。"”即可。

    （3）如何用PPT制作选择题高级技巧方法三

    在编辑窗口中找到如下两条语句：

　　PrivateSubOptionButton3_Click()

　　EndSub

　　然后在上面这两条语句中间插入以下语句：

    MsgBox("恭喜您，答对了!")

　　4.“重新选择”命令按钮

　　在幻灯片适当的地方插入一命令按钮，www.pptjia.com修改其Caption属性为“重新选择”，在编辑窗口中的PrivateSubCommandButton1_Click()和EndSub语句间插入：

　　OptionButton1.Value=False

　　OptionButton2.Value=False

　　OptionButton3.Value=False

　　OptionButton4.Value=False

    Label2.Caption=""

    //如判断正误用的是方法一，此语句不要

　　5.“下一题”命令按钮

　　在幻灯片适当地方插入一命令按钮，修改其Caption属性为“下一题”，在编辑窗口中的PrivateSubCommandButton1_Click()和EndSub语句间插入：

    IfMsgBox("是否继续",vbYesNo+

vbQuestion,"下一题")=vbYesThen

　　WithSlideShowWindows(1).View

　　.GotoSlide2

　　EndWith

    Endif

    //2为第2张幻灯片,表示转到第2张幻灯片模板

    如果要根据条件的不同转到不同的幻灯片，可用下面语句：

　　if条件then

　　WithSlideShowWindows(1).View

　　.GotoSlide2

　　EndWith

　　Endif

　　说明：条件可以是Caption属性或value属性，书写方法为：

控件名称（在VBA中的名称）.属性=（value属性为True或False，Caption属性为具体文本，注意文本要加双引号）。

例如下面的语句：

　　ifoptionbutton1.value=truethen

　　表示如果单选框1的value值为True，那么运行then后的语句，一直到endif。

    多选题

    题目同前，用复选框（CheckBox),其他设置同单选题。

    [查看答案]按钮：因是多选题，答案有多个，所以有多个条件。例如第一、三的选项是正确的，则需要输入如下语句：

     IfCheckBox1.Value=TrueAndCheckBox2.Value=TrueAndCheckBox4.Value=TrueAndCheckBox3.Value=FalseThen

    MsgBox("厉害，答对了!"),vbOKOnly,"多项选择题"

    Else

    MsgBox("不好意思，您做错了。再仔细想想?"),vbOKOnly

    EndIf

    是非判断题

    是非判断题其实就是只有两个选项的单项选择题。完全可以放两个单选按钮，分别代表“是”和“非”。

    只不过是设计两个选项“√”和“×”，这两个符号可先在Word中插入，然后再复制过来。

    所有的设置与单选题类似，然后按前面单项选择题的制作方法操作。