全国统考管理系统

1、武汉科技大学城市学院课程设计报课程名称数据库应用课程设计题 目学生考试管理信息系统院 系城院信息科学与工程系专 业信息管理与信息系统班 级07级信管1班姓 名张峰指导教师余红珍2009年 7月 1 日设计题目:全国统考管理设计主要内容：一、开发平台：VB+ SQL SERVER 2000二、功能要求：1、设计内容设计一个全国统考管理数据库应用系统。该系统的用户由一般用户和管理员组成，然后 不同的用户拥有不同的权限，各自完成各自的管理功能。首先是欢迎界面，然后选择登录， 登录的时候首先要判断用户的身份，合法的用户然后进入到系统主界面中，不同的用户看到 不同的系统功能。用sql server200

2、0创建后台数据库，然后利用程序设计语言（VB）编写程 序实现对数据库的操作，按照要求完成所有的功能和模块。2、全国统考管理数据库应用系统主要功能该系统除完成全国统考管理的各项功能外，还应为用户提供统考信息查询功能，为不同 用户设定不同的权限，满足不同的要求。（1）登录界面。（2）学生管理：考场查询、成绩查询。（3）管理员管理（按英语和计算机统考管理）：报名（增、删、改、查）、安排考场（增、 删、改、查）、成绩登录（增、删、改、查）、本用户密码修改。3、全国统考统数据库应用系统表单（可以按照需求增加）（1）学生档案：学生代码、姓名、性别、出生日期、籍贯、政治面貌、专业班级（2）统考成绩：学生代码

3、（外码）、姓名、考号、考试日期、考试科目、考试成绩（3）班级：班号、所属系、专业、人数、班主任（4）考场：编号、地址、起始考号、终止考号、考试科目（5）准考证：考号、学生代码、姓名、考场（6）管理员表：用户名、密码（7）报名表：姓名，学号，籍贯，政治面貌，备注三、课程设计报告主要内容：1全国统考管理数据库应用系统需求分析（给出系统的功能模块图，对各个功能作出详 细介绍）2全国统考管理数据库应用系统界面设计（给出界面截图及其主要控件的属性设置表格）3全国统考管理数据库应用系统数据库设计（给出数据库各个表单中数据的字段名，数 据类型及其相应的说明）4 全国统考管理数据库应用系统程序设计（按照功能模

4、块给出详细的程序代码）1.全国统考管理数据库应用系统需求分析考场查询成绩查询 英语统考管理计算机统考管理密码修改图1.1学生考试管理信息系统1.1欢迎界面系统启动之后便可进入欢迎界面，单击“登陆系统”按钮便可进入选择登陆 界面。1.2选择登录可选择管理员登陆和学生登录登陆。1.2.1选中管理员登录后便进入管理员登陆界面管理员通过输入用户名和密码进入管理员管理界面进行管理1.2.2选中学生登陆后便进入学生登陆界面学生通过输入姓名和学号进入学生管理界面进行管理1.3管理员管理界面可以进行英语统考管理、计算机统考管理、修改密码1.3.1试英语统考管理利用VB界面，管理员可以查询，添加，删除，修改考试

5、信息，修改了数据 库中的信息。1.3.2计算机统考管理利用VB界面，管理员可以查询，添加，删除，修改考试信息，修改了数据 库中的信息。1.3.3修改密码管理员可以修改自己的登录密码。1.4学生界面学生可以进行考场查询，成绩查询。1.4.1考场查询学生通过登录查询考场信息。1.4.2成绩查询学生通过登录查询成绩信息。2.全国统考管理数据库应用系统界面设计图2.1欢迎界面图2.2登陆界面图2.3学生登陆界面此学生管理|n| x|考场查询学生管理成绩查询退出-Ini x|图2.4学生管理界面编号地让起蛇考号绻止考号耋试科目中南QQ010020囊语02中北0010020英语03中南0010020英语0

6、4东北0010020英语职考场查询请输入编号查询刷新退出图2.5学生考场查询界面表2.1考场查询界面属性表对象属性设置值dadagriddatasourceAdodc1tapstoptrueVisualtrueAdodclcaptionAdodc1commandtype2-adcmdtablerecordsource考场表单visiblefalse图2.6管理员登陆界面-Ini x|管理员管理内容图2.6管理员管理界面表2.2管理员管理界面属性表对象属性设定值Command!Caption英语统考管理Command2Caption计算机统考管理CommandsCaption修改密码图2.8管理

7、员密码修改界面表2.3考场查询界面属性表对象属性设定值TextlcausesvalidatiTrueText2causesvalidatiTrueText3causesvalidatitrue&报名管理f 查谖 TL_添加、册除，修改姓名学号籍贯政治面貌MH2007002内登MM200TOO1黄冈党员善良MX2007008西北团员DOTAMF2007015中南团员猥琐ML21：|：171：109未知屏蔽MO2007006城里党员质朴MW200TO10山里党员可爱请输入要查询的姓名查询刷新退出图2.9报名管理界面表2.4报名管理界面属性表对象属性设置值dadagriddatasourceAdod

8、c1AdodclcaptionAdodc1commandtype2-adcmdtablerecordsource报名表单visiblefalseSSTablcaption添加caption删除caption修改Caption查询3.全国统考管理数据库应用系统数据库设计学生考试管理信息系统总共涉及7张表，分别是准考证表单，学生档案表单，报名表单，班级表单，管理员表单，统考成绩表单，考场表单。表3.1准考证表单字段名称标始名称数据类型是否允许为空字段说明testno考试号char否主码sno学号char否sname姓名Char否testplace考场号char否外码表3.2学生档案表单字段名称标始

9、名称数据类型是否允许为空字段说明sno学生代码char否主码sname姓名char否ssex性别Charsbirthday生日Charsadress籍贯char外码sbackgroud政治背景Char表3.3报名表单字段名称标始名称数据类型是否允许为空字段说明姓名姓名char否学号学号char否主码籍贯籍贯Char否政治面貌政治面貌Char否备注备注char否外码表3.4班级表单字段名称标始名称数据类型是否允许为空字段说明classno班号Char否主码Sdept所属系Char否Subject专业Char否Pecount人数Char否director班主任Char否表3.5管理员表单字段名称标

10、始名称数据类型是否允许为空字段说明Username用户名Char否主码Password密码Char否表3.6统考成绩表单字段名称标始名称数据类型是否允许为空字段说明sno学生代码Char否主码sname姓名Char是stestno考号Char是Stesttime考试日期Char是stestcourse考试科目Char是stestgrade考试成绩Char是表3.7考场表单字段名称标始名称数据类型是否允许为空字段说明Number学号char否主码Adress籍贯char否Begintestno其实考号char是Endtestno终止考号testsubject考试科目4.1欢迎界面欢迎界面是整个系

11、统的首页，用户可通过它进入到登陆系统。4.2登陆界面进入此界面后，使用者可根据自己的身份选择登陆方式。学生选择学生登 陆，管理员选择管理员登陆。4.3学生登陆界面程序设计学生用户在此界面输入自己的学号和姓名通过验证后方可进入下一个界面。部分重要代码如下Private Sub Command1_Click()If Text1.Text = ThenMsgBox ”请输入学号！”Text1.SetFocusExit SubEnd IfIf Text2.Text = ThenMsgBox ”请输入姓名！”Text2.SetFocusExit SubEnd If将学号和姓名赋给全局变量Sno = Te

12、xt1.TextSname = Text2.TextAdodc1.CommandType = adCmdTextAdodc1.RecordSource = select * from 学生档案表 where sno= & Trim(Text1.Text) & and sname= & Trim(Text2.Text) & Adodc1.Refresh判断管理员所填信息是否正确If Adodc1.Recordset.EOF = True ThenMsgBox ”学号与姓名不相符，请重新输入！”Text1.Text =Text2.Text =Text1.SetFocusElseMsgBox ”登陆

13、成功！”Form13.HideForm6.ShowText1.Text =Text2.Text =End IfEnd Sub4.4管理员登陆界面管理员需要输入自己的用户名和密码，经过系统验证无误后就可以进入下一 个界面了。它的代码与管理员登陆代码类似，输入的用户名和密码必须是管理员 表中相应的信息，否则就无法成功登陆。4.5管理员登陆界面管理员登陆进去后，可以进行英语统考管理、计算机统考管理、修改密码。4.6管理员密码修改界面程序设计管理员如需修改自己的密码可在此界面进行，管理员通过登陆界面登陆到 此，然后在此界面中输入原始密码和新密码并验证新密码，确认后如果无误就会 提示用户修改成功，并且其

14、密码在管理员表表单中也会有相应的修改。(代码如 下)Private Sub Command1_Click()If Trim(Text2.Text) = ThenMsgBox 请填旧密码！Text2.Text =Text2.SetFocusExit SubEnd If判断新密码是否为空If Trim(Text3.Text) = ThenMsgBox 请填写新密码！Text3.SetFocusExit SubEnd If判断确认密码是否为空If Trim(Text4.Text) = ThenMsgBox 请再次确认密码！Text4.Text =Text4.SetFocusExit SubEnd I

15、f判断密码长度是否符合要求If Len(Text3.Text) 10 ThenMsgBox 新密码不符合要求，为2-10个字符！Text3.Text =Text3.SetFocusExit SubEnd If判断两次输入是否相同！If Text3.Text Text4.Text ThenMsgBox 两次密码输入不一致，请重新输入！Text3.SetFocusText4.SetFocusExit SubEnd If判断原密码是否正确Adodc1.CommandType = adCmdTextAdodc1.RecordSource = select * from 管理员表 where Usern

16、ame = & Trim(Text1.Text) & Adodc1.RefreshIf Trim(Text2.Text) Trim(Adodc1.Recordset.Fields(Password).Value) ThenMsgBox ”旧密码错误，请重新输入！Text2.Text =Text2.SetFocusExit SubEnd If修改密码Adodc1.Recordset.UpdateAdodc1.Recordset.Fields(Username) = Trim(Text1.Text)Adodc1.Recordset.Fields(Password) = Trim(Text4.Tex

17、t)Adodc1.Recordset.UpdateAdodc1.RefreshMsgBox ”密码修改成功！文本框清空Text4.Text =Text2.Text =Text3.Text =Unload MeEnd Sub4.7英语统考查询界面管理员可通过此界面所提供的内容查询管理所有统考信息。所有的信息通过 控件DataGrid与Adodc控件和相应的数据库连接起来，设置相应的属性后所有 信息便可显示在DataGrid上供用户查看。(代码如下)Private Sub Command1_Click()If Text16.Text = ThenMsgBox 请输入姓名Text16.SetFocu

18、sExit SubEnd IfAdodcl.CommandType = adCmdTextAdodcl.RecordSource = select * from 报名表 where 姓名 = & Trim(Text16.Text) & Adodc1.RefreshIf Adodc1.Recordset.EOF = True ThenMsgBox 无此姓名，请重新输入！ Text16.SetFocusText16.Text = Exit SubEnd IfEnd Sub-Ini x|&报名管理图4.1管理员查询界面4.8英语统考添加界面管理员可通过此界面所提供的内容查询管理所有统考信息。所有的信

19、息通过控件 DataGrid与Adodc控件和相应的数据库连接起来，设置相应的属性后所有信息便可 显示在DataGrid上供用户查看。（代码如下）Private Sub Command3_Click()If Text1.Text = ThenMsgBox 请输入姓名Textl.SetFocusExit SubEnd IfAdodcl.CommandType = adCmdTextAdodcl.RecordSource = select * from 报名表 where 姓名=& Trim(Textl.Text) & Adodcl.RefreshIf Adodcl.Recordset.EOF =

20、 False ThenMsgBox 姓名已存在，请重新输入！Textl.SetFocusTextl.Text =Exit SubEnd IfIf Text2.Text = ThenMsgBox 学号Text2.SetFocusExit SubEnd IfIf Text3.Text = ThenMsgBox 请输入籍贯Text3.SetFocusExit SubEnd IfIf Text4.Text = ThenMsgBox 请输入政治面貌Text4.SetFocusExit SubEnd IfIf Text5.Text = ThenMsgBox 备注Text5.SetFocusExit Sub

21、End IfDim res As Integerres = MsgBox(确实添加此记录！，vbExclamation + vbYesNo + vbDefaultButton2)提示用 户If res = vbYes Then 如果确实要添加Adodcl.Recordset.AddNewAdodcl.Recordset.Fields(姓名”).Value = Trim(Textl.Text)Adodcl.Recordset.Fields(学号”).Value = Trim(Text2.Text)Adodcl.Recordset.Fields(籍贯”).Value = Trim(Text3.Te

22、xt)Adodcl.Recordset.Fields(政治面貌”).Value = Trim(Text4.Text)Adodc1.Recordset.Fields( 备注).Value = Trim(Text5.Text)Adodcl.Recordset.UpdateAdodc1.RefreshMsgBox 添加成功Text1.SetFocusText2.SetFocusText3.SetFocusText4.SetFocusText4.SetFocusText5.SetFocusExit SubEnd IfEnd Sub图4.2英语统考添加界面5.小结每次做课程设计之后总有番感慨，这次亦然。

23、以前只是对游戏中那些注册过程和登录过程 很感兴趣，没想到这次自己也可以尝试一下了，想象着自己设计出的美丽界面，激动是自然 的。但是没有一件事是真正简单的，从三个星期之前踏入机房那刻开始，大大小小的问题就 没断过，因此解决问题成了整个课程设计的主要内容。问题来了就要迎上去，怎么解决问题 呢，刚开始大家都是不会做，互相问来问去也没啥进展，讨教老师吧又不好意思，所以很是 急啊。做的这个系统操作界面是VB，以前也学过VB，缺乏知识的整体应用和实际工程项目 的开发训练，以往的教学设计按部就班地学习VB程序设计的知识点，没有依托完整的实际 项目，令学生对知识点的学习感到支离破碎、不成整体，容易遗忘，而且没

24、有工程项目开发 实际技能的历练和体验，无法直接感受所学知识在实际工作中的地位和作用，影响学习效果， 因此也没有什么印象了。这从何下手啊，真是让人急啊，我想既然不会那就学习学长们的吧， 于是就开始学习一位学姐的课程设计，看看人家是怎么做的。VB程序设计的知识点主要应 该包括：对象和窗体概念、代码基础、程序基本结构、数组、过程、控件、菜单设计、对话 框设计、文件读写、数据库等。我在实际设计过程中慢慢回忆起老师以前所教给我们的内容： 比如通过具体的例子，讲解如何对对象触发事件，如何利用语句改变对象的属性，VB事件 驱动的程序设计，逐步建立起VB编程基本方法和步骤。这样我就能慢慢开始动手了，然后 思考着整个设计的框架，该如何让整