基于vb试卷生成系统设计及实现

《基于vb试卷生成系统设计及实现》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、基于VB试卷生成系统设计及实现摘要本系统采用VB6.0作为开发环境、Access数据库进行开发设计实现的，通过手动选题和计算机随机抽题两种方式来产生试卷，最后将生成的试卷导出到word文档中，以便排版、打印和保存。关键词VBAccess；手动选题；随机抽题；Word文档中图分类号TP3文献标识码A文章编号1674-6708（2013）84-0177-021概述利用计算机实现试卷生成不仅使试卷管理变得高效便捷，同时也是实现教考分离的一个重要手段，更能充分检测学生的真实水平以此改进教学方法来达到更好的教学效果，这也将是现代教育事业发展的必然趋势。本系统由任课教师将

2、试题录入到题库，等需要出卷时管理员直接在题库中手动选题或随机抽取试题生成试卷，最后将所生成的试卷导出到word文档中，结构简单，方便易用。2系统功能设计2.1本系统的设计目标1）试题库中试题的增删查改操作；2）系统实现两种组卷方式：手动选题和随机抽题；3）将试卷和答案分别导出到word文档中；4）实现对数据的备份和恢复。2.2数据库设计1）用户表（用户编号，姓名，级别，所在系，登记日期），用户表主要用于系统登录时验证用户的合法性；2）科目表（科目编号，科目名称，所属专业，所属系别，备注），根据科目来产生与之对应的试题表；3）试题表（题号，题型，题目，分值，难度

3、，知识点,章节）。试题表作为生成试卷的数据源。2.3系统功能结构本系统分两个角色，系统管理员和任课教师，任课教师只具备自已信息维护和试题管理权限，系统管理员具有任课教师的操作权限外，还具备用户设置、科目管理、手动出卷、自动出卷、系统初始化、系统备份和系统恢复的权限。任课教师不具备出卷的操作权限，这样更好地实现了教考分离。3关键技术1）检查输入数据的合法性，为了更好地防止错误的输入，本系统中多处用到了对输入数据进行验证，Len函数检查输入的字符长度，IsNumeric检查输入数据是否是数字，例如用户编号必须是6位的数字代码为：Len（userid）6OrNotI

4、sNumeric（userid）结果为真，系统提示输入不符合要求，重新输入信息；2）通过ADO对象实现VB与Access数据库进行关联，对ADO进行属性设置，连接数据源。添加记录使用ADDNew方法，修改记录使用Update方法，删除记录使用Delete方法。通过SQL语句建立查询，使用RecordSource与SQL语句进行绑定。记录移到第一条记录使用MoveFirst方法，移到上一条记录MovePrevious,下一条记录MoveNext,最后一条记录MoveLast,判断当前记录是否到首记录：B0F(),是否到尾记录EOF()；3)采用FileCopy语

5、句来实现对数据库的备份和恢复操作；4)在自动生成试卷中，采用Rnd函数随机产生一条满意条件的记录，语句n二Int(Rnd*Adodcl.Recordset.RecordCount)+1随机产生一个从1到库存题量的记录总数的数值，为了避免重复选择，将选中的记录状态字段设为1,当再次选题时设置条件语句在状态字段为非1的记录集中选择；5)将结果导出到word中。在工程中引用word对象的方法：勾选"MicrosoftWord3.51ObjectLibrary”,在程序中使用New关键字声明Word对象，DimworddocAsWord・Document,Setwor

6、dobj二CreateObject(word.application")和Setworddoc=wordobj.Documents.Add声明wordobj和worddoc两个对象，产生了一个空的word文档，在文档中填入内容，最后保存退出。部分代码如下:wordobj.Visible=True'设置文档可见Withworddoc.Content.InsertAfter(试卷总分："&Trim(Textl.Text)&“分考试时间："&Trim(Text2.Text)&“分钟”)&vbCr'第一行插入试卷总分和考试时间EndWithworddoc.Save'保

7、存文档wordobj.Quit'退出6）制作帮助文档；7）打包生成安装程序。4系统实现本系统的核心就是手动选题和计算机随机抽题生成试卷，下面对这两种生成方式进行介绍。1）手动选题生成试卷手动生成试卷的方法是在试题库表中一题一题抽取，抽题结束后可以根据需求对所选试题进行排序，最后导出到word文档中。手动选题界面图1所示。根据所选的科目在上一个表格中列出该科目对应的试题，同时可以根据需求按题型、难度进行筛选试题，筛选的结果更新到上一表格中，【选中】实现当前记录的选择并出现在下一个表中，与此同时，上面表被选中记录的状态字段值改为1,表示已经选中，如再次选，提示“该

8、题已选，重新选择”的信息，按照同样的方