如何利用PPT交互功能制作填空题：[3]

1、在PPT中录入填空题，然后选择“控件工具箱”的“文本框”，在相应的位置添加一个“文本框”。

2、添加一个“命令按钮”，并将属性菜单中的Caption改为“查看结果”。

3、双击“命令按钮”，弹出代码框。

4、在Private Sub CommandButton1_Click()与End Sub之间添加以下代码：

Dim no3 If TextBox1.Value = "运算器" Then no3 = "正确" Else no3 = "错误，答案为运算器" MsgBox no3, vbOKOnly TextBox1为“文本框”的名称，“运算器”为正确答案，可根据具体内容进行修改。

5、演示PPT，在文本框中输入内容后，点击“命令按钮”。