vb+access考试系统课程设计论文.doc论文

考试系统摘要：目前流行的MCP系列考试、CCCP系列考试、HP-UX系列考试，以及我们熟知的Tofel,Gre等，都是通过机考实行的,机考已经成了以后的一个发展趋势。用计算机进行标准化考试，极大地减轻了出题者、应试者和试卷评阅者的劳动，也减少了由于人为因素造成的错误，同时，计算机标准化考试，也使得考试更加公正、公平。本系统包括考生管理、考试管理、数据查询、激活考试、答题系统、自动计时、自动阅卷、输出成绩单、远程查询系统等几部分，采用VisualBasic+ASP+Access的方式制作。关键字：ASP；VBScript；考试；VisualBasic；ADO；数据库前言 考试系统2考试系统的考试与传统的考试相比，它最大限度排除了人为因素的作用，保证了考试的客观性；考生在考试之后，一般就能够得到成绩，使考试具有实时性；而且通过计算机改卷，标准一致，具有最佳的可靠性。考试系统也大大的节约了纸张的浪费,对环境的保护也是意义深远的，还可以控制成本，简直就是一举多得的事情。人们迫切希望利用考试系统以减轻教师的工作负担及提高工作效率，与此同时也提高考试的效率。本系统包含了学生资料、所有课程的试题库、所有考生的答案、成绩等大量数据资源，为了空间的有效利用和使用性，采用ACCESS数据库。在数据库规划中，每个功能模块对应自身的数据表或多个数据表，STUDENT，QUERY，PAPER，EXAM，EXAMSE等五种信息表都按常规格式要求定义结构。设计主要采用 MICROSOFT公司的 ACCESS作为后台数据库,使用MICROSOFT公司的 VISUALBASIC开发工具，利用其提供的各种面向对象的开发工具，使用ADO控件连接数据库开发出系统。目录 考试系统3第一章 序言1.1 本次毕业设计的目的41.2 我的工作4第二章 考试系统采用的技术和运行的平台2.1 采用的技术52.2 运行的平台5第三章 系统功能设计3.1 功能设计流程图63.2 数据库列表图7第四章 系统开发及其具体设计4.1 考生管理94.2 考试管理124.3 数据查询134.4 激活考试144.5 远程查询16第五章 考试系统中的问题小议5.1 开发过程中遇到的疑难问题与解决17第六章 结束语6.1 体会与收获196.2 不足19致谢 20参考文献 21第 一章 序言1.1本次毕业设计的目的 考试系统4该考试系统短小精悍，安全可靠，规模小，适合开发，在现有的平台及应用软件下是可以实现的。不但能发挥功能，而且可以大量节省考试用纸，提高效率，方便管理，其经济效益大大超过了它的开发成本，是一个经济可行的系统。并且这个系统是在WINDOWS平台下开发的，具有友好的可视化界面，方便教师、学生的使用。1.2我的工作在此次开发中我负责整个部分（包括功能模块的确定，界面的设计与运用和数据库等）、代码维护和开发测试的工作，还要做调查分析和用户需求。调查分析-经过调查分析，我逐步了解到考试系统应该具有的功能：在试题管理方面，管理员最需要的是对试题管理的自主性，具体表现在以下三个方面：1)初始化试题库；2)维护试题库；3)调用试题库。1.自主初始化试题库：即管理员拥有创建新题库的权力，管理员能够根据自己的需要，设计试题的储存方案以及试题的属性名和各属性值，实现试题库用户个性化设计，让试题库真正成为用户自己的试题库。2.自主维护试题库：即管理员具有添加、修改和删除试题的权力，实现试题库的可扩充性和开放性，使管理员对题库具有至高无上的支配权。3.自主调用试题库：即允许用户能从试题库中抽取试题。第二 章 考试系统采用的技术和运行的平台2.1采用的技术考试系统的设计按照自身的特点从系统集成的角度出发完成系统各功能模 考试系统5块的设计、支撑环境的设计及界面风格设计等。各功能模块分为学生管理、试题设置及阅卷和考试三条主线。整个设计过程中采用由点到面的方法，利用各种工具方法制作各子系统的原型系统，然后测试分析原型系统。一.编程环境的选择微软公司的VisualBasic6.0是Windows应用程序开发工具，是目前最为广泛的,易学易用的面向对象的开发工具。VisualBasic提供了大量的控件，这些控件可用于设计界面和实现各种功能，减少了编程人员的工作量，也简化了界面设计过程，从而有效的提高了应用程序的运行效率和可靠性。故而，实现本系统VB是一个相对较好的选择。二.关系型数据库的实现Access2000 就是关系数据库开发工具，数据库能汇集各种信息以供查询、存储和检索。Access的优点在于它能使用数据表示图或自定义窗体收集信息。数据表示图提供了一种类似于 Excel 的电子表格，可以使数据库一目了然。另外,Access允许创建自定义报表用于打印或输出数据库中的信息。Access也提供了数据存储库,可以使用桌面数据库文件把数据库文件置于网络文件服务器，与其他网络用户共享数据库。Access是一种关系数据库工具，关系数据库是已开发的最通用的数据库之一。如上所述，Access作为关系数据库开发具备了许多优点，可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。三. ADO接口使用微软的JET数据库引擎提供了与数据库打交道的途径，我们是通过它以及VisualBasic 来访问数据库并对其进行各种操作。VisualBasic、Access以及其他微软的软件产品都是通过共用JET数据库引擎，从而给用户提供了丰富的数据类型。ADO 控件在数据库中的信息与将信息显示给用户看的VisualBasic程序之间架起了一座桥梁。我们可以设置ADO控件的各个属性，告诉它要调用那个数据库的哪个部分。缺省情况下，ADO控件根据数据库中的一个或多个数据表建立一个dynaset-type（动态集合）类型的记录集合。一个记录集合是动态的也就意味着，当原来的数据表中的容改变了以后，该记录集合中的记录也会随之改变。ADO控件还提供了用来浏览不同记录的各种跳转按钮。将ADO控件放置在窗体中之后，我们还必须在该控件与要处理的数据库之间建立联系。2.2运行的平台本系统在WINDOWS2000Server+或MicrosoftAccess作后台数据库环境下，用ASP与VB开发完成。第 三章 系统功能设计3.1功能设计流程图考试系统的模块可以大体分为3部分：本地服务端管理程序、本地客户端考考试系统本地服务管理 本地考试系统 远程查询系统 考试系统6试程序、远程考试查询系统。其中每一部分都可以细分为多个模块，其系统结构图如下：3.2数据库列表图（1）考生信息表：SID、SName、Sex、SWork、SIDCard、STele、SEmail、SMemo、SEnabled、SNum,分别表示准考证号码、姓名、性别、工作单位、省份证号码、电话号码、邮箱地址、备注、考试状态。 考试系统7（2）考试科目表：EID、EName、ETime、ETScore、EPScore、Enabled、ENum、EQNum，分别表示考试科目号、考试科目名称、考试时间、总成绩、通过分数、考试状态、题目数量。（3）考试注册信息表：SID、EID、Edate、Rdate、Restime、PID、Score，分别表示为准考证号码、考试科目号、考试日期、注册日期、注册时间、试卷号，成绩。（4）题库表：QID、Qname、Qans、Qtype、Qenabled，分别表示为包括题目号、题目、答案、题目类型、题目状态（5）试卷表：PID、QID、Ans、Qmarked、Qfinished，分别表示为包括试卷号、题目号、回答答案、标记、完成。考生信息表中的SID与考试注册信息表的SID有联系。考生信息表中的EID与考试注册信息表的EID有联系。题库表中的QID与试卷表QID有联系。考试注册信息表中的PID与试卷表PID有联系第四 章 考生系统开发及其具体设计4.1学生管理主窗口： 考试系统8考生管理窗口：这部分包括了注册考生、修改考生状态（允许或禁用考生）、删除考生、修改考生信息共4部分。将STUDENT表中的记录添加到列表框中Setrs=Adodc1.RecordsetAdodc1.RefreshDoWhileNotrs.EOFIfrs(sex)=TrueThena=男Elsea=女EndIfIfrs(senabled)=TrueThen 考试系统9b=有效Elseb=无效EndIfList1.AddItemrs(sid)&Space(8)&rs(sname)&Space(8)&a&Space(8)&rs(sidcard)&Space(8)&rs(swork)&Space(8)&brs.MoveNextLoop删除考生模块用于在考试系统中永久地删除考生的注册信息，并收回该考生的准考证号码。Setrs=Adodc1.RecordsetDimintRspAsIntegerDimstrQstAsStringstrQst=删除考生吗？intRsp=MsgBox(strQst,vbQuestion+vbYesNo,询问)IfintRsp=vbYesThenAdodc1.Recordset.DeleteadAffectCurrentList1.RemoveItemList1.ListIndexrs.MoveNextEndIf注册考生信息窗口：将添加的考生信息写入到STUDENT表中Adodc1.Refresh 考试系统10Setrs=Adodc1.RecordsetIfrs.RecordCount0Thenrs.MoveFirstrs.Findsidcard=&Trim(Text3.Text)&IfNotrs.EOFThenMsgBox 身份证号: & Trim(Text3) & 已被使用，请重新输入！,vbCritical,消息框Text3.SetFocusText3.SelStart=0Text3.SelLength=Len(Text3)ExitSubElseAdodc1.Recordset.AddNewAdodc1.Recordset.Fields(sid)=sidAdodc1.Recordset.Fields(sname)=Text2.TextAdodc1.Recordset.Fields(sex)=aAdodc1.Recordset.Fields(sidcard)=Text3.TextAdodc1.Recordset.Fields(swork)=Text4.TextAdodc1.Recordset.Fields(stele)=Text5.TextAdodc1.Recordset.Fields(semail)=Text6.TextAdodc1.Recordset.Fields(smemo)=Text7.TextAdodc1.Recordset.UpdateMsgBox数据保存成功！,vbInformation,消息框EndIfEndIfEndIf修改考生信息窗口： 考试系统11将修改的数据写入到STUDENT表中IfOption1.Value=TrueThena=TrueIfOption2.Value=TrueThena=FalseIfTrim(Text2.Text)=ThenMsgBox请输入姓名,vbInformation,消息框Text2.SetFocusExitSubElseIfTrim(Text3.Text)=OrLen(Text3)11ThenMsgBox请输入身份证号或身份证长度不对,vbInformation,消息框Text3.SetFocusExitSubElseIfTrim(Text4.Text)=ThenMsgBox请输入工作单位,vbInformation,消息框Text4.SetFocusExitSubElseIfTrim(Text5.Text)=ThenMsgBox请输入联系电话,vbInformation,消息框Text5.SetFocusExitSubElseIfTrim(Text6.Text)=ThenMsgBox请输入电子邮件,vbInformation,消息框 考试系统12Text6.SetFocusExitSubElseIfTrim(Text7.Text)=ThenMsgBox请输入备注,vbInformation,消息框Text7.SetFocusExitSubElseAdodc1.RecordSource=SELECT*FROMstudentWHEREsid=&sid&Adodc1.RefreshAdodc1.Recordset(sname)=Text2Adodc1.Recordset(sex)=aAdodc1.Recordset(sidcard)=Text3Adodc1.Recordset(swork)=Text4Adodc1.Recordset(stele)=Text5Adodc1.Recordset(semail)=Text6Adodc1.Recordset(smemo)=Text7Adodc1.Recordset.UpdateMsgBox数据保存成功！,vbInformation,消息框EndIf4.2 考试管理考试管理与考生管理的做法类似，也包括增加，删除，修改这些内容，只不过数据库中表用的不一样是EXAM。题库管理窗口： 考试系统13将QUERY表中的第一题显示Adodc1.Recordset.MoveFirst显示QUERY表中的下一个记录IfNotAdodc1.Recordset.EOFThenAdodc1.Recordset.MoveNextEndif显示QUERY表中的上一个记录IfNotAdodc1.Recordset.BOFThenAdodc1.Recordset.MovePreviousEndif将QUERY表中的最后一题显示Adodc1.Recordset.MoveLast4.3数据查询查询有效科目信息窗口：查询考试科目信息，该功能用于查询当前有效的考试科目信息，包括考试名称、时间、题目数、通过分数等。 考试系统14查询考生准考证号码窗口：将输入的文本框与EXAM表对照显示满足条件的a=InputBox(请输入姓名：,姓名)b=InputBox(请输入身份证号码：,身份证号码)Adodc2.RecordSource=select*fromstudentwheresname=&a&andsidcard=&b&Adodc2.RefreshSetrs1=Adodc2.RecordsetIfrs1.RecordCount0Thenc=Adodc2.Recordset(sid)Form8.PrintcEndIf4.4激活考试激活考试窗口：激活考试实际上是将考生考试的状态设置为“正在考试”，并在开始考试前，向考生提示考试的相关信息。 考试系统15满足EXAM表enabled=true和STUDENT表enabled=true添加到列表框中Adodc1.RecordSource=select*fromstudentwhereenabled=trueAdodc2.RecordSource=select*fromexamwhereenabled=trueSetrs=Adodc1.RecordsetSetrs1=Adodc2.RecordsetAdodc1.RefreshAdodc2.RefreshDoWhileNotAdodc1.Recordset.EOFCombo1.AddItemAdodc1.Recordset.Fields(sid)Adodc1.Recordset.MoveNextLoopDoWhileNotAdodc2.Recordset.EOFCombo2.AddItemAdodc2.Recordset.Fields(ename)Adodc2.Recordset.MoveNextLoop答题系统窗口： 考试系统16将答案写入表PAPER中Adodc5.RecordSource=select*frompaperSetrs4=Adodc5.RecordsetAdodc5.RefreshAdodc5.Recordset.AddNewAdodc5.Recordset(qid)=Adodc2.Recordset(qid)Adodc5.Recordset(ans)=Text2Adodc5.Recordset.Fields(qfinished)=TrueAdodc5.Recordset.Update4.5远程查询远程查询系统与本地查询系统功能基本类似，但主要用于查询公共信息、考生成绩、考生日程等信息。 考试系统17第 五章 考试系统中的问题小议5.1开发过程中遇到的疑难问题与解决问题1：在考生管理中选中的考生信息不会修改，后来通过上网找了些资料看到了IfList1.ListIndex=0Thensid=Adodc1.Recordset(sid)Adodc1.Recordset.MoveFirstElseIfNotAdodc1.Recordset.EOFThenAdodc1.Recordset.MoveNextsid=Adodc1.Recordset(sid)EndIf问题2：添加到列表框中的不光要在列表框中显示出来还要写入数据库中程序如下：Combo1.AddItemIMsgBoxCombo1.Text&你选择的是&Combo2.TextSetrs2=Adodc3.RecordsetAdodc3.RefreshAdodc3.Recordset.AddNewAdodc3.Recordset.Fields(sid)=Combo1.TextAdodc3.Recordset.Fields(eid)=eidAdodc3.Recordset.Fields(edate)=#7/4/2007#Adodc3.Recordset.Fields(rdate)=DateAdodc3.Recordset.Fields(rstate)=1Adodc3.Recordset.Fields(restime)=TimeAdodc3.Recordset.UpdateMsgBox数据保存成功！,vbInformation,消息框Form9.HideLoadForm10Form10.Showssid=Combo1.Text 选的考试号eename=Combo2.Text选的科目问题3：插入图片开始用的是文本框，不行，就到一些VB的论坛发帖子，希望知道的高手告诉我用什么控件才可以往里面添加图片，还有写语格式，这样我拿回来直接的套用。PrivateSubCommand5_Click()Form7.RichTextBox1.OLEObjects.Add,d:毕业设计pic96.bmpfilenameEndSub刚开始用老师给的方法做题目的上下翻，系统给出了错误提示“当前必须有一个记录为eof或bof”，后来改了一下.代码如下：第一题Adodc1.Recordset.MoveFirst 考试系统18下一题IfNotAdodc1.Recordset.EOFThenAdodc1.Recordset.MoveNextEndIf上一题IfNotAdodc1.Recordset.BOFThenAdodc1.Recordset.MovePreviousEndIf最后一题Adodc1.Recor