怎么利用PPT来制作具有交互性的填空题

2025-10-13 21:14:17

1、打开PowerPoint2003,在右边的模板列表中选择textured模板。

怎么利用PPT来制作具有交互性的填空题

2、将主标题和副主标题的占位符删除掉,在自选图形中添加一个圆角矩形。

怎么利用PPT来制作具有交互性的填空题

怎么利用PPT来制作具有交互性的填空题

3、同样的在自选图形添加一个五角星图案,并在画好的圆角矩形上绘制,同时在五角星上添加横排文本框,在五角星上输入汉字。

怎么利用PPT来制作具有交互性的填空题

怎么利用PPT来制作具有交互性的填空题

怎么利用PPT来制作具有交互性的填空题

怎么利用PPT来制作具有交互性的填空题

怎么利用PPT来制作具有交互性的填空题

4、然后再在圆角矩形累天骄一个文本框输入题干和插入表格,并在表格内添加一些有规律的数字。

怎么利用PPT来制作具有交互性的填空题

怎么利用PPT来制作具有交互性的填空题

5、在菜单栏上找到文本框按钮,在最后的一个表格中绘制一个文本框。

怎么利用PPT来制作具有交互性的填空题

怎么利用PPT来制作具有交互性的填空题

6、同样,在圆角矩形下面绘制两个控制命令按钮。

怎么利用PPT来制作具有交互性的填空题

怎么利用PPT来制作具有交互性的填空题

7、现在将命令按钮的属性修改一下,右键选择属性,在属性对话框中,将名称修改为提交和清除,并将其设为透明状。

怎么利用PPT来制作具有交互性的填空题

怎么利用PPT来制作具有交互性的填空题

怎么利用PPT来制作具有交互性的填空题

8、选中控制命令按钮1,单价菜单栏中的查看代码选项,打开VB编辑窗口,在控制命令按钮1的下面输入如下代码:

Private Sub CommandButton1_Click()

If TextBox1 = 63 Then

MsgBox "恭喜你答对了!", vbOKOnly, "提示"

Else

MsgBox "好像不对哦,请再想想!", vbOKOnly, "提示"

End If

End Sub

同样的方法,在控制命令按钮2的下面输入:

Private Sub CommandButton2_Click()

 TextBox1 = ""

End Sub

怎么利用PPT来制作具有交互性的填空题

怎么利用PPT来制作具有交互性的填空题

9、这样我们的填空题就算制作完成了,因为我们做的项目中运用到宏,因此运行完毕后,必须以宏的方式进行保存,不然之前的代码就实现不了了。

声明:本网站引用、摘录或转载内容仅供网站访问者交流或参考,不代表本站立场,如存在版权或非法内容,请联系站长删除,联系邮箱:site.kefu@qq.com。
猜你喜欢