巧用Word制作多项选择题
来源:互联网 发布:淘宝怎么部分退款 编辑:程序博客网 时间:2024/05/18 08:55
1.启动Word,新建一空白文档,输入如图1所示的“计算机的软件系统包括( )”并根据情况设置好字体、字号和颜色。
2.依次单击菜单栏中的“视图→工具栏→控件工具箱”命令,在dan出的控件工具箱中选中“复选框”按钮 ,然后在文档拖拉出一个复选框。
3.在拖拉出的复选框(checkbox1)上单击鼠标右键选择属性,打开“属性”对话框,将其中“名称”修改为“duoxt11”,“Caption”后面的字符修改为题目相应选项字符(如“系统软件”),然后再设置“font”选项设置合适的字体、字号等。其他属性可采用默认值。
4.将上面设置好的复选框复制三个,分别将“名称”修改为“duoxt12”、“duoxt13”、“duoxt14”,“Caption”属性分别修改为“应用软件”、“杀毒软件”和“工具软件”。
5.选择“控件工具箱”的“命令按钮” ,在文档中添加一个按钮,和上面3中的操作一样将其“名称”修改为“duopd11”,“caption”属性修改为“判断”(也可以修改“font”属性来设置字体、字号等)。然后双击该按钮,进入“VisualBasic编辑器”状态,将下述代码输入到Private Sub Private Sub duopd11_Click()和End Sub代码中间,输入完成后,关闭窗口返回。
If duoxt11.Value = True And duoxt12.Value = True And duoxt13.Value = False And duoxt14.Value = False Then
MsgBox "恭喜你,选择正确。", vbOKOnly, "结果"
Else
If duoxt11.Value = True And duoxt12.Value = False And duoxt13.Value = False And duoxt14.Value = False Or duoxt11.Value = False And duoxt12.Value = True And duoxt13.Value = False And duoxt14.Value = False Then
MsgBox "选对了一个,还有一个,再努力一下就胜利了。", vbOKOnly, "提示"
Else
MsgBox "选择错误!还需要继续努力啊!", vbOKOnly, "提示"
End If
End If
上述代码含义是如果选择第一项和第二项并且第三和第四项不选时,按下判断按钮则dan出“恭喜你,选择正确”消息框,如果仅仅选择了第一项或第二项则dan出“选对了一个,还有一个再努力一下就胜利了。”消息框,如果选择了第三或第四项中的任何一项都会dan出“选择错误!还需要继续努力啊!”消息框。
6.将命令按钮复制一份,将其“名称”修改为“duopd12”,“caption”属性修改为“重选”,双击该按钮,进入“VisualBasic编辑器”状态,将下述代码输入到Private Sub duopd12_Click()和End Sub代码中间,输入完成后,关闭窗口返回。
duoxt11.Value = False
duoxt12.Value = False
duoxt13.Value = False
duoxt14.Value = False
现在单击“控件工具箱”中的“退出设计模式”按钮 关闭“控件工具箱”。(可一定要记住啊,否则不会出现效果的。)
- 巧用Word制作多项选择题
- 利用Word VBA制作选择题
- MFC checkbox实现多项选择题学习篇
- 毛概多项选择题答案统计程序
- 神奇的单项选择题和多项选择题答案js选项生成算法
- 神奇的单项选择题和多项选择题答案 c#后台选项生成算法
- IOS 使用XML制作简易选择题
- 选择题
- 选择题
- 选择题
- UGUI学习笔记(五) ToggleGroup制作选择题单选框
- java制作word文档
- word中制作目录
- 关于word目录制作
- WORD模板制作
- 制作word生成器感悟
- 制作Word Cloud图
- Word目录制作修改
- Learning Perl: 1.2. What Does "Perl" Stand For?
- 理一理COM、OLE、ActiveX~~
- RMAN恢复的学习
- GridView 使用实例
- 防范Sql注入式攻击
- 巧用Word制作多项选择题
- Installshield2010经验总结
- Learning Perl: 1.3. How Can I Get Perl?
- 跨站式SQL注入技巧
- Hibernate的各种保存方式的区别
- Learning Perl: 1.4. How Do I Make a Perl Program?
- 在office2007设置outlook自定义背景(模板)
- Learning Perl: 1.5. A Whirlwind Tour of Perl
- SQL注入技术和跨站脚本攻击的检测