计算机软件编程技术毕业论文-学生信息管理系统的设计与实现

自学考试计算机软件编程技术专业本科 毕 业 论 文 黑龙江大学 2015 年 4 月 10 日 题目：学生信息管理系统的设计与实现 作者：刘震 所在单位：黑龙江农业工程职业学院 学号：010313161035 指导教师：伍一 II 摘要 随着信息技术越来越深入,被广泛的应用，而管理信息系 统在技术上已逐步成熟。管理信息系统是一个新型学科，目前他正 在不断发展，任何一个项目想要发展，都要高效率地把内部活动有 续地组织起来，就必须建立与自身特点相适应的管理信息系统。 本文介绍了在 Visual Basic6.0 环境下开发一个管理信息 系统的过程。针对一些学校学校学生管理的不足，创建了一套简单 的计算机管理学生的方案。本文由学生管理的系统分析、设计和实 现，分析包括可行性分析、业务流程分析等；系统设计部分主要介 绍了系统功能设计、数据库设计、代码设计；系统实现部分则说明 了几个主要模块的算法,此系统非常简单，安全实用。 关键词：管理信息系统、学生管理、Visual Basic 应用 III 目录 摘要.I 第一章前言.1 第二章绪论.2 21 目的背景与意义. 2 第三章分析可行性.3 第四章总体设计.3 41系统功能描述. 5 42 数据流图.错误！未定义书签。错误！未定义书签。 第五章详细设计.6 51 数据库需求分析. 7 52 库设计.7 第六章 系统具体实现.11 6.1 各功能的实现. 11 6.1.2 打印统计.18 第七章学生信息系统软件测试.20 结论.22 参考文献.24 致谢.错误！未定义书签。错误！未定义书签。 学生信息管理系统的设计与实现 1 第一章前言 由于目前学校规模不断的扩大，学生数量越来越多，学生信息也是不断增 加，为了让学校能更有效率的掌握学生的信息，更好的保存添加学生资料，防 止学生信息丢失，我们做出了这个管理系统，为学校对学生学生信息管理的难 题进行系统解决。 本系统主要用于学校学生信息管理，主体是实现学生信息管理的系统化、 规范化和自动化，其主要任务是如何用计算机对学生各种信息进行日常管理， 如查询、修改 、增加、删除，难点是还考虑到学生选课，针对这些要求设计了 学生信息管理系统，本系统主要包括学生信息查询、教务信息维护和学生选课 三部分。其功能主要有： 1、有关学籍等信息的输入，包括输入学生基本信息、所在班级、所学课程 和成绩等。 2、学生信息的查询，包括查询学生基本信息、所在班级、已学课程和成绩 等。 3、学生信息的修改。 4、班级管理信息的输入，包括输入班级设置、年级信息等。 5、班级管理信息的查询。 6、班级管理信息的修改。 7、学生课程的设置和修改。 学生信息管理系统是典型的信息管理系统，其设计主要包括后台数据库的 建立和维护以及应用程序的开发两个方面。对于数据库要求建立起数据一致性 和完整性强、数据安全性好的库。而对于应用程序则要求应用程序功能完备， 方便使用等特点。 利用各种面向对象的开发工具，应用数据窗口这一能方便而简洁操纵数据 库的智能化对象，在短时间内建立系统应用原型，然后，对初始原型系统进行 需求迭代，不断修正和改进，直到形成安全可行系统。 学生信息管理系统的设计与实现 2 第二章绪论 学生信息管理系统是一个教育单位不可缺少的系统。一个功能齐全、简单 易用的信息管理系统不但能提高工作效率而且能减轻工作人员的工作负担，它 的内容对于学校的决策者和管理者来说都至关重要。所以学生信息管理系统必 须要能够为用户提供充足的信息和快捷的查询手段。一直以来，人们用人力来 处理学生信息，这其中就存在着效率低、保密性差,人工的大量浪费；另外时间 一长,将堆积大量的数据文件,这对于查找、更新和维护都带来了不少困难。随 着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识, 它已进入人类社会的各个领域并发挥着来越重要的作用。 作为计算机应用的一部分,计算机会比人力多好多优点.例如:检索迅 速、查询方便、效率高、可靠性好、存储量大、保密性好、成本低等。这不但 能提高教育单位的管理效率，也是走上正规化单位不可缺少的一部分。 21 目的背景与意义目的背景与意义 学校大多都主要有总务处、政教处、教导处、培训处四大块。其中教导处 的工作最为繁重，工作人员多，信息量大。除财务部门有专人及专用软件进行 信息处理外，其它各类的数据处理都由相关人员人工处理完成。处理的信息主 要有三大类：学生信息、成绩数据、课程信息。本系统主要着眼于以上部分， 建立数据库以及对数据的各种操作功能。 对于学生信息，各班的班主任及学校领导由于各种分类和了解的需要，经 常性地进行各种查询。例如：查询一个班级中团员的人数，男、女生的人数， 住宿或通宿学生的人数等等。教导处在每一届学生进校时必须进行分班，设置 学号；每一届学生毕业，要进行学生信息备份； 对于成绩管理，课任教师要进行本科目成绩登记，计算平均分、优秀率、 及格率；班主任在期中考试和期末考试后计算本班学生总分，排名次；教导处 要统计补考学生人数及相应名单，每学期进行学生成绩备份；学校领导则可通 过查询工具来了解学生成绩情况。 对于课程信息，教导处每学期要进行课程安排、课任教师分配、一周课程 学生信息管理系统的设计与实现 3 安排、中途课程调整等等。 以上各类信息目前还处于手工或半手工的管理状态，效率低，可靠性差。 配备电脑，但实际利用率不高，如果采用计算机进行以上各类信息的管理，必 将大大提高工作效率，对学校各类信息的维护及了解起到积极的作用。另外随 着计算机网络的持续发展，无论是工作、学习还是生活，将会越来越多地融入 到流动的比特中，人们的工作节奏在不断加快，需要快捷的信息来源，并对此 作出反应。因此，无论是从目前的现状来看，还是面向未来，一个功能完备的 学校信息管理系统的开发都非常有必要。 本人作为学习计算机专业的一员，对系统的需求作了较深入的认识，同时 也掌握了一定的系统开发理论，借这次毕业设计的契机，一方面利用自己的所 学小刀试牛，另一方面通过这次实践必将提升自身对软件工程、数据库、程序 设计等理论的认识，积累系统开发的经验。 作为毕业设计，由于时间比较紧张，加之本人没有任何系统开发的经验， 它肯定存在许许多多不足的地方，但对它的改善和功能的完备并不会随着毕业 设计的结束而终止。本人将在原来的基础上，着眼未来，追踪计算机新技术发 展，并应用到系统持续开发中。 第三章分析可行性 4 学生信息，作为一个学校，就有一定的工作量存在，而学生信息，它的工 作量可能是其它信息工作量的几倍，班级的增加、班级的查找、班级的修改； 学生档案；课程管理；成绩管理；缴费管理；统计等等，每个信息的数据都在 不断地变化着，如果采用人工的方式进行操作，那么，一天的工作量，足以让 人觉得比较繁琐，吃不消。针对这样的情况，采用让数据的查询变得简单化， 数据变的更让每个人都在任何时刻都可以了解到。 学生信息管理系统是为本校开发的，该系统总体有四部分组成，包括学生 信息查询、教务信息维护、学生选课及用户管理。通过本系统，把本校内部查 询学生信息、教务信息、学生选课各个环节进行有效地计划、组织和控制。通 过本校内部的信息，依据统一数据信息进行管理，把任何一块信息所产生的数 据变动及时地反映给其它相关信息，做到数据共享。 本系统主要信息流程为：教务信息维护接受学生的信息，学生信息查询根 据教务信息维护的学生信息做出对所接收的信息合理性进行判断，并交于信息 维护进行相应的修改，再把信息存入数据库中。学生选课是对学生进行相应选 择自己相关的课程。最后进行打印。 采用本系统，能够使整个系统内部所有信息的工作简化，提高工作效益。 由于采用统一的数据信息，使相关资料能够快速地查询所需的数据、资料及其 它信息的，使信息快速高效运行。 第四章总体设计 5 41系统功能描述系统功能描述 本系统的主要任务是实现对学校教导处的学生信息管理、成绩管理、课程 管理及相关查询。其主要功能包括： 1、学生信息管理功能 班级管理。提供给班主任进行本班学生的信息更新、删除。 添加学生。以班级为单位，进行学生入库。其中分为单个添加和成批添加。 单个添加学生供数量较少的学生信息入库；成批添加可以从现存的学生信息 EXCEL 文件中成批录入到数据库中。 删除学生。当学生毕业后，学生信息转移备份数据库中，系统的基本数据 库中需要删除学生信息。该功能主要进行成批地删除学生信息，如连续学号区 段的多位学生信息删除，整个班级的删除，所有学生信息的删除。 新生管理。本部分的功能主要有新生导入、分班、及设置学号。新生导入 实现从现存的 EXCEL 新生名单中录入学生信息。分班功能实现按新生的报考专 业、成绩及性别进行分班。设置学号实现自动为各班学生编发学号。 学生信息备份。在学生信息删除前，将其按班级为单位保存到备份数据 库。 2学生成绩管理功能 分数录入。以班级为单位，录入各科目的期中、期末、总评成绩。 总分及名次。计算指定班级学生的总分及名次。 补考成绩录入。修改总评成绩，以决定最终补考人数。 成绩备份。为指定班级及指定的学期数的学生成绩保存到备份数据库中。 3、课程信息管理功能 课程管理。提供本学期各年级各专业所开课程名称的录入、修改、删除。 它是学生成绩管理的基础。用以保证数据库中一致性原则。 4、查询功能。 学生信息查询。根据用户的要求，查询学生数据库的所有可能的信息，其 中包括成绩查询。 备份成绩查询。按班级为单位查询备份数据库的学生信息，补考情况。 学生管理系统是各大中专院校不可缺少的一部分， 是一个 VB+SQL 数据库 6 开发应用程序，它主要包括用户登录、学生信息输入修改、学生信息查询以及 学生成绩输入、学生成绩查询、系统用户管理等几个页面，因而该系统具有较 强的实用性。 第五章详细设计 根据系统的主要功能及上一章的总体设计，系统开发进入第二个阶段：详 细设计。在这一阶段的工作中，主要任务有以下几项： 7 1、根据原型化的开发原则，为系统的每个模块功能进行界面设计，作为进 一步优化的基础。 2、进行系统的流程分析，为模块的细化做好准备。 3、对每个模块进行详细的算法设计。 31 系统界面设计 51 数据库需求分析数据库需求分析 52 库设计库设计 本系统涉及到的信息主要有 5 类：学生信息、成绩信息、教师信息、图书 信息、后备信息。由于成绩信息和教师信息与学生信息关系密切，因此将这三 类信息存放在同一数据库中，以提高多种信息同时读取的速度。按以上分析， 学生注册 个人信息输入 学生信息管理 考核输入 课程选择 考核信息管理课程信息管理 其它系统数据接口 考核信息 课程设置 8 将系统的数据库设计为三个： 一、学生数据库： 该数据库为中包含有以下各表： 1、 学生表： 记录学生的基本信息， 是进行学生及其它各类信息处理的基础。 2、成绩表：记录学生的期中、期末及总评的各科成绩。 3、总分表：记录学生的期中、期末及总评的总分及名次。 4、课程表：记录各专业各年级开课情况，在添加学生记录时，可根据该表 的情况决定在成绩表添加学生记录的个数。 三、后备数据库： 该数据库主要保存两类信息：学生信息、成绩信息。其数据表是按用户的 要求在运行过程中动态建立的。 432 表设计： 1、学生表结构： 表 4.1 编号字段名称字段类型字段宽度 1学号CHAR15 2姓名CHAR10 3性别CHAR2 4出生日期DATE8 5电话CHAR10 6家庭住址CHAR50 7班级CHAR20 8原毕业学校CHAR50 9是否住宿CHAR4 10政治面貌CHAR6 9 11入学总分LONG4 12专业CHAR20 2、 课程 表 结 构： 表 4.2 编号字段名称字段类型字段宽度 1课程名称CHAR15 2年级CHAR10 3专业CHAR20 3、成绩表结构： 表 4.3 编号字段名称字段类型字段宽度 1学号CHAR15 2课程名称CHAR15 3期中成绩LONG4 4期末成绩LONG4 5总评成绩LONG4 6班级CHAR20 4、总分表结构： 表 4.4 编号字段名称字段类型字段宽度 1学号CHAR15 2期中总分LONG4 3期末总分LONG4 4期中名次LONG4 5期末名次LONG4 6班级CHAR20 10 本系统中使用到的数据表主要有班级表、成绩表、缴费表、课程表、学生 档案、用户资料，由这六个表，组成了名为信息的数据库。其中学生档案是本 系统主要的一张表，所有信息都是根据这张学生档案进行有关的操作，主要的 字段有：学号、姓名、年级、专业、性别、出生年月、民族、籍贯、政治面貌、 家庭地址、邮政编码、联系电话、入学时间、备注。其中日期的数据类型为日 期/时间天型，其它的数据类型为文本型；成绩表中字段为：学号、姓名、年级、 专业、学期、考试时间、考试科目、考试地点、课程性质、科目分数、违纪类 型、备注；课程表中字段为：专业、年级、学期、课程名称、教材、任课 老师、课时、上课地点、课程性质、考试性质；用户资料中的字段包括：用户 名、密码、身份。 数据库与 VB 的连接： 本系统的数据链接采用的是 ADO 方法， 打开控制面板， 打开 ODBC 数据源图标，选择“系统 DSN”标签，点击“添加”按钮，在弹出的 “创建新数据源”对话框中选择名称为“Microsoft Access Drive（*.mdb） ” ， 点击“完成”按钮，在 ODBC Microsoft Access 安装对话框中在数据源名中输 入信息，在数据库这个框中， 单击“选择”按钮，在弹出的选择数据库这一对 话框架中，在驱动器下拉列表框中选择本系统数据库所在驱动器，在目录中选 择库所在的文件夹，在文件类型中选择选“Access 数据库（*.mdb） ” ，在数据 库名中选择本系统的数据库，点击“确定”按钮即完成数据链接。 在 VB 中，用 ADODC 链接数据库，用 DataGrid 或 DATA 将库中的数据在界 面中显示出来，本系统采用 DataGrid。在界面上右击 Adodc 控制，在弹出的快 捷菜单中选择属性， 在属性对话框中， 在 “属性” 这一标签中，选中单选框 “Use 11 ODBC Data Source Name” ，并在下拉文本框中选择已经配置好的数据源名信息， 再在“RecordSoure”标签中，在 Commard Text（SQL）文本框中输入查询语句， 如：select * from 学生档案。同时，将桌面的 DataGrid 控件选中，在属性框 中，将它的 Datasoure 设为 Adodc。 我们可以设置 DataGrid 控件的外观：选中该控件，右击，在弹出的快捷菜 单中选择“检索字段” ，在弹出的对话框中单击“确定” ，这时，表格中出现了 表的字段。然后再右击，同样，在弹出的快捷菜单中选择“编辑” ，我们就可以 所在的表格的宽度进行调整。 第六章 系统具体实现 6.1 各功能的实现各功能的实现 6.1.1 课程管理：课程设置课程管理：课程设置 12 运行程序后，进入课程管理模块，课程管理模块的第一块是课程设置，在这模块中可 以把专业、年级、学期、课程名称、教材、任课老师、课时、上课地点、课程性质和考试 性质等信息输入，以便使用。 下面为其代码： Private Sub Command1_Click() Dim myCon As New ADODB.Connection Dim myRs As New ADODB.Recordset Dim ZhuanYe, NianJi, XueQi, KeCheng, JiaoCai, RenKLS, KeShi, ShangKeDD, KeChengXZ, KaoShiXZ As String ZhuanYe = Text1.Text NianJi = Text2.Text XueQi = DTPicker1.Value KeCheng = Text4.Text JiaoCai = Text5.Text RenKLS = Text6.Text KeShi = Text7.Text ShangKeDD = Text8.Text KeChengXZ = Combo1.Text KaoShiXZ = Combo2.Text If Trim(ZhuanYe) = Or Trim(NianJi) = Or Trim(XueQi) = Or Trim(KeCheng) = Or Trim(JiaoCai) = Or Trim(RenKLS) = Or Trim(KeShi) = Or Trim(ShangKeDD) = Or Trim(KeChengXZ) = Or Trim(KaoShiXZ) = Then MsgBox 请填写要修改课程资料的内容！ Combo1.Text = Combo2.Text = Exit Sub End If myCon.Open dsn=信息 myRs.Open select * from 课程表 where 专业= & Text1.Text & , myCon, 3, 13 2 myRs!年级 = Text2.Text myRs!学期 = DTPicker1.Value myRs!课程名称 = Text4.Text myRs!教材 = Text5.Text myRs!任课老师 = Text6.Text myRs!课时 = Text7.Text myRs!上课地点 = Text8.Text myRs!课程性质 = Combo1.Text myRs!考试性质 = Combo2.Text myRs.Update myRs.Close myCon.Close MsgBox 您确定要修改吗？, vbYesNo, 提示 Frm_UpdateGrean.Adodc1.Refresh Frm_UpdateGrean.DataGrid1.Refresh Private Sub Command2_Click() Unload Me End Sub Private Sub Command3_Click() Unload Me Frm_FindGrean.Show 1 End Sub Private Sub DataGrid1_Click() Frm_UpdateGrean.Adodc1.RecordSource = select * from 课程表 where 专业 = & Trim(DataGrid1.Row) & Text1.Text = Frm_UpdateGrean.Adodc1.Recordset.Fields(专业) Text2.Text = Frm_UpdateGrean.Adodc1.Recordset.Fields(年级) 14 Text3.Text = Frm_UpdateGrean.Adodc1.Recordset.Fields(学期) Text4.Text = Frm_UpdateGrean.Adodc1.Recordset.Fields(课程名称) Text5.Text = Frm_UpdateGrean.Adodc1.Recordset.Fields(教材) Text6.Text = Frm_UpdateGrean.Adodc1.Recordset.Fields(任课老师) Text7.Text = Frm_UpdateGrean.Adodc1.Recordset.Fields(课时) Text8.Text = Frm_UpdateGrean.Adodc1.Recordset.Fields(上课地点) Combo1.Text = Frm_UpdateGrean.Adodc1.Recordset.Fields(课程性质) Combo2.Text = Frm_UpdateGrean.Adodc1.Recordset.Fields(考试性质) End Sub 课程管理：课程查询 当输入查询类别、运算符和条件后可以查找到所需要的课程设置，或按查询时间来查 询，输入所要查找的时间段，就可查到所要的课程设置。 代码如下： If Option1.Value = True Then If KCCX1 = Then strTiaoJian = select * from 课程表 where & KCCX2 ElseIf KCCX2 = Then strTiaoJian = select * from 课程表 where & KCCX1 Else strTiaoJian = select * from 课程表 where & KCCX1 & and & KCCX2 End If ElseIf Option2.Value = True Then If KCCX1 = Then strTiaoJian = select * from 课程表 where & KCCX2 ElseIf KCCX2 = Then strTiaoJian = select * from 课程表 where & KCCX1 Else strTiaoJian = select * from 课程表 where & KCCX1 & or & KCCX2 15 End If Else If KCCX1 = Then strTiaoJian = select * from 课程表 where & KCCX2 ElseIf KCCX2 = Then strTiaoJian = select * from 课程表 where & KCCX1 Else MsgBox 请选择连接方式！, vbOKOnly, 警告 Exit Sub End If End If If (KCCX1 & KCCX2) = Then MsgBox 请输入查询类别！, vbOKOnly, 警告 Exit Sub Else Unload Me Frm_UpdateGrean.Show 1 End If End If If Option4.Value = True Then If Val(Combo6) Val(Combo9) Then MsgBox 请正确选择年份！, vbOKOnly + vbExclamation, 信息提示 Combo6.SetFocus Exit Sub Else If Val(Combo6) = Val(Combo9) Then If Val(Combo7) Val(Combo10) Then MsgBox 请正确选择月份！, vbOKOnly + vbExclamation, 信息提示 16 Combo7.SetFocus Exit Sub Else If Val(Combo7) = Val(Combo10) Then If Val(Combo8) Val(Combo11) Then MsgBox 请正确选择日期！, vbOKOnly + vbExclamation, 信息提示 Combo8.SetFocus Exit Sub End If End If End If End If End If If Combo6.Text = Or Combo7.Text = Or Combo8.Text = Or Combo9.Text = Or Combo10.Text = Or Combo11.Text = Then MsgBox 请输入完整的日期, vbOKOnly, 警告 Exit Sub End If str1 = Trim(Combo6) & - & Trim(Combo7) & - & Trim(Combo8) str2 = Trim(Combo9) & - & Trim(Combo10) & - & Trim(Combo11) str1 = Format(str1, yyyy-mm-dd) str2 = Format(str2, yyyy-mm-dd) If sqlstr = Then sqlstr = & Trim(Combo5.Text) & =# & Format(str1, yyyy-mm-dd) & # and & Trim(Combo5.Text) & =# & Format(str1, yyyy-mm-dd) & # and & Trim(Combo5.Text) & = # & Format(str2, yyyy-mm-dd) & # End If If sqlstr = Then MsgBox 请先输入查找时间！ Exit Sub End If strTiaoJian = select 专业,年级,学期,课程名称,教材,任课老师,课时,上课地 点,课程性质,考试性质 from 课程表 where & sqlstr Unload Me Frm_UpdateGrean.Show 1 End If If Option3.Value True And Option4.Value True Then MsgBox 请选择查询方式！, vbOKOnly, 警告 Exit Sub End If End Sub Private Sub Command3_Click() Unload Me End Sub For i = 1 To 31 Combo8.AddItem i Combo11.AddItem i Next i 18 Combo8.ListIndex = 0 Combo11.ListIndex = 0 Combo1.AddItem (专业) Combo1.AddItem (年级) Combo1.AddItem (课程名称) Combo1.AddItem (教材) Combo1.AddItem (任课老师) Combo1.AddItem (课时) Combo1.AddItem (课程性质) Combo1.AddItem (考试性质) Combo2.AddItem (=) Combo3.AddItem (专业) Combo3.AddItem (年级) Combo3.AddItem (课程名称) Combo3.AddItem (教材) Combo3.AddItem (任课老师) Combo3.AddItem (课时) Combo3.AddItem (课程性质) Combo3.AddItem (考试性质) Combo4.AddItem (=) Combo5.AddItem (学期) End Sub 6.1.16.1.1 打印统计打印统计 运行打印统计后可以按条件把符合条件的各种信息以报表形式罗列出来， 各种信息还可以以打印出来或以报表形式保存。打印统计包括班级统计分析、 档案统计分析、课程统计分析、成绩统计分析和交费统计分析五类。 班级统计分析 19 代码如下： Private Sub Command1_Click() Dim SQLoriginal As String Dim SQLadd As String Dim SQLorder As String Dim strSql As String SQLoriginal = SELECT 年级,专业,人数,辅导员,备注 FROM 班级表 SQLadd = WHERE 年级=年级 AND 专业=专业 SQLorder = If Check1.Value = 1 And IsNumeric(Text1) Then SQLadd = SQLadd + and 年级= + Text1 + End If If Check2.Value = 1 And Not IsNull(Text2) Then SQLadd = SQLadd + and 专业= + Text2 + End If If Check3.Value = 1 And IsNumeric(Text3) Then SQLadd = SQLadd + and 人数= + Text3 + End If If Check4.Value = 1 And Not IsNull(Text4) Then SQLadd = SQLadd + and 辅导员= + Text4 + End If strSql = SQLoriginal + SQLadd + SQLorde If Dat_Main.rsDat_Class.State = 1 Then 20 Dat_Main.rsDat_Class.Close End If Dat_Main.rsDat_Class.Open strSql Dat_Class.Show vbModal Text1.Text = Text2.Text = Text3.Text = Text4.Text = End Sub 第七章学生信息系统软件测试 1、集成测试 集成测试将测试每一个部件之间的工作是否正常。 在这个阶段， 我们假设所有 的单元已通过开发人员个人在单元测试阶段测试全部通过，没有任何错误。 集成测试包括以下内容： 连续集成测试 数据库测试 21 数据整合测试 2、功能测试 功能测试环境 操作系统：windows 98 内存：128M 网络环境：校园网 本功能测试共分为: 系统功能测试 测试是否可以正常添加用户和修改密码，系统正常退出 测试是否可以正常对班级进行管理，学生的单个或成批添加，删除以及新 生信息的导入和