- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
信息化配合题考试系统的设计
信息化配合题考试系统的设计
【摘 要】目前越来越多的考试都以计算机作为载体,实现电子信息化的考试方式。这样既不需要传统的纸质印刷试卷,节省成本;也不需要人工进行阅卷,节省人力。利用Visual FoxPro程序设计语言开发一款信息化的配合题考试系统。性能可靠、操作简便,适合广泛的应用。
中国论文网 /4/view-7024255.htm
【关键词】信息化;配合题;考试系统
一、电子信息化考试
越来越多的考试都以计算机作为载体,实现电子信息化的考试方式,既不需要传统的纸质印刷试卷,节省成本;也不需要人工进行阅卷,节省人力。那么如何开发出性能可靠、操作简便的考试系统,就成为一个热点问题。利用Visual FoxPro程序设计语言开发一款信息化的配合题考试系统。
二、标签控件的设计与使用
标签label1显示题干说明,label2至label4显示待配合项,label5至label7显示匹配项,命令按钮command1至command3显示待配按钮,command4和command5分别显示“确定”按钮和“下一题”按钮,直线line1用于分隔上下两部分。
使用方法:选择横线下的匹配项,被选中的匹配项呈红色,单击横线上方的待配合项左侧的“配合”按钮,“配合”按钮标题就会变成匹配项编号,被选中的匹配项随即变成灰色失效状态,若要更改选项,再次单击已变成编号的按钮,按钮恢复“配合”标题状态,相应的匹配项从失效状态恢复到生效状态可再次选用。全部匹配完毕,按“确定”按钮。会有答对或答错的相应提示。
Form1的load事件代码
public n,declare a(3)
amp;amp;定义全局变量n用来存放所选匹配项标签的值,数组a(3)存放所有匹配项标签的值
n=0
a=0 amp;amp;全局变量n和数组a(3)的初值设为0
匹配项label5对应的是“(4).键盘”,按照功能需求,单击label5时,标签会变为红色,其相应值会赋给n,此时如果之前单击过其它的匹配项标签,如label6、label7,而没有选择相应的“配合”按钮,则已变成红色的匹配项标签仍然为红色,这是要避免的一个问题。系统应只允许最新选择的匹配项标签是红色的,其它标签若没有选择相应的“配合”按钮,应恢复原来的标签背景色,以label5的click事件为例,代码如下:
if n=5 amp;amp;如果之前选的是label6,则把label6的背景色恢复到原来的颜色
thisform.label6.backcolor=rgb(236,233,216)
endif
if n=6
thisform.label7.backcolor=rgb(236,233,216)
endif
n=4 amp;amp;选择label5则n赋值为4,其背景色设置为红色
this.backcolor=rgb(255,0,0)
三、命令按钮控件的设计与使用
command1是第一个配合按钮,其click事件代码如下:
if mand1.caption=配合
do case
case n=4
mand1.caption=(4)
thisform.label5.enabled=.f.
amp;amp;当n=4时将该按钮的标题设置为该标签编号“(4)”,该标签转为失效状态
case n=5
mand1.caption=(5)
thisform.label6.enabled=.f.
case n=6
mand1.caption=(6)
thisform.label7.enabled=.f.
otherwise
messagebox(请选择有效选项,再单击按钮!,0,信息提示)
amp;amp;若不是上述情况说明,说明没有选择有效匹配项,弹出提示信息对话框
endcase
a(1)=n amp;amp;将当前n值存入数组a中
n=0 amp;amp;将n清0,等待接收新值
else
amp;amp;否则说明command1.caption不是配合,而是相应的标签编号,即此次单击并不是要进行匹配,而是想要更改
do case
amp;amp;判断当前command1.caption是哪一个编号,将其相应的匹配项标签恢复生效状态,并将其背景色恢复到原来的颜色
case mand1.caption=(4)
thisform.label5.enabled=.t.
thisform.label5.backcolor=rgb
您可能关注的文档
最近下载
- 档案整理及数字化投标方案(517页).doc VIP
- 2025解读新《监察法实施条例》核心要点与条文速览PPT学习课件(含文字稿).pptx VIP
- 铁路信号电缆配线作业.ppt VIP
- 2025江苏邳州农村商业银行招聘10人笔试历年典型考题及考点剖析附带答案详解.docx
- 采砂船水上船舶运输安全应急预案 .docx VIP
- 2025年自贡市中考英语试卷(含答案解析).docx
- 2024年北京昌平四年级(下)期末英语(含答案).pdf
- 七年级下册数学期末试卷.pdf VIP
- SH_T 3043-2014石油化工设备管道钢结构表面色和标志规定.pdf VIP
- 新人教版数学四年级上册课本练习题《练习一》可编辑可打印.pdf VIP
文档评论(0)