基于VBACCESS高职语文试题库系统.docVIP

基于VBACCESS高职语文试题库系统 　　考试作为评估各个学校教学质量和学生能力的重要手段，建立试题库并且实施有效的管理便成了老师迫切希望解决的问题。本课题的研究实现了高效、方便、客观的出题，且能自动生成试卷，又能使试卷管理工作更科学更高效。本系统采用VB6.0作为开发平台，以Access2003作为后台数据库，采用ADO数据库访问技术对数据库进行连接和访问，整个系统层次结构简单，易懂，实现了自动出卷和导出Word文档等功能。 　　一、系统需求分析 　　1.任务概述 　　（1）能完成试题的编辑功能，录入、删除、修改。 　　（2）设计自动生成试卷功能。 　　（3）具有用户管理的功能。 　　（4）具有试题导出的功能。 　　（5）数据库设计。 　　2.功能描述 　　本试题库管理系统的设计旨在为学校的教务管理部门和语文组老师提供一个方便的出卷工具，建立一个试题库，通过用户名和密码登录到主界面，可以进行试题的录入、删除和修改，也可以进行试卷生成，利用试题导出的功能，将试题直接导出到Word文档中形成试卷。 　　3.系统结构图 　　4.系统简介 　　本系统以高职一年级的语文教育为背景进行设计，结合本校高职学生的特点，其旨在于提供一个适合于形成性测试和阶段性测试的自动组卷系统。本系统能快速方便地提供各种要求的试卷，帮助教师把握教学的进度，及时地反馈教学中的问题，以便改进教学方法和调整教学重点。 　　功能：本系统主要有两大功能模块组成：（1）试题管理（2）自动组卷 　　特点：（1）易用性：人机交互界面友好，不要求使用者具有太多的计算机知识。 　　（2）合理性：结合教材，符合教学大纲，本系统内所有的试题都是要求学生必须掌握的知识。 　　（3）实用性：帮助教师从繁琐的出卷工作中解脱出来。 　　二、数据库设计 　　数据库的库结构对于整个系统的性能起着重要作用，它是本系统的基础。本系统建立了1个数据库文件：DB_TEST。数据库内建立的表（根据题型建立相对应的表及相应的空表用于存放抽出的试题）。 　　字段设置如下： 　　三、功能模块的具体实现 　　1.登陆模块 　　（1）功能：该模块是用来检验用户的合法性。 　　（2）设计思路：当该模块被加载时，根据用户输入的用户名与数据库中的TB_User表中的用户名进行比对，如果用户存在，则检查所输入的密码是否与数据库中的密码一致，若不一致，则提示密码错误，拒绝登录；若一致，则进入系统，允许进行后面的操作。 　　2.用户维护模块 　　（1）功能：添加、删除用户，修改密码。 　　（2）设计思路：进入系统后，可以根据实际情况添加、删除和设置个人密码。 　　3.试题维护模块 　　（1）功能：添加、删除和修改试题。 　　（2）设计思路：通过选择具体题型进入相对应的维护界面，进行相关的操作。 　　4.专项练习模块 　　（1）功能：实现具体题型的具体练习。 　　（2）设计思路：通过选择具体题型，进入相关题型界面，输入抽题数目，系统开始自动抽题，单击“试题输出”试题自动导入word文档。 　　5.单元练习模块 　　（1）功能：实现具体单元的综合练习。 　　（2）设计思路：通过选择具体的单元，进入相关界面，然后根据需要选择题型及题目数量，实现随机出题。 　　6.综合练习模块 　　（1）功能：根据用户需要组卷。 　　（2）设计思路：用户根据需要选择随机出题，期中测试或期末测试，这三种测试具体的范围不同，随机测试的范围是整个题库，期中测试的范围是前3个单元，期末测试的范围是后3个单元。 　　四、本系统的特点 　　1.随机出题（不重复） 　　本系统根据用户的需要，在试题库的试题数量范围内最大限度的实现重复率最低。主要使用rnd函数。 　　主要的实现代码为： 　　For i=0 To j 　　Randomize Timer 　　1: 　　rdnb=Int（（nb）*Rnd（）） 　　a（i）=rdnb 　　For x=0 To i-1 　　If a（x）=a（i） Then GoTo l 　　Next x 　　myrs2.Move rdnb 　　t1=CStr（myrs2（“编号”）） 　　myrs.Open“insert into zy select 试题，答案from注音where编号= ′′′+t1+′′′′′，mycn， adOpenKeyset，adLockOptimistic 　　myrs2.MoveFirst 　　Next i 　　2.试卷能够导入word文档 　　主要的实现代码为： 　　Dim newdoc As Word.Document创建一个Document对象的实例,如果不分步，就在这里设置