VB学生信息管理系统.docx
《VB学生信息管理系统.docx》由会员分享，可在线阅读，更多相关《VB学生信息管理系统.docx（32页珍藏版）》请在冰点文库上搜索。
VB学生信息管理系统
毕业设计（论文）
题目学生信息管理系统设计与实现
系别软件工程系
专业软件技术
班级
姓名
学号
指导老师（职称）
日期
兰州工业高等专科学校
毕业设计（论文）任务书
软件工程系2008届计算机软件专业
毕业设计（论文）任务书
毕业设计（论文）题目
VB学生管理系统
课题内容性质
软件开发
课题来源性质
教师收集的结合生产实际的课题
设计/论文
校内（外）指导教师
职称
工作单位及部门
联系方式
赵双萍
副教授
软件工程系
138********
一、题目说明（目的和意义）：
VisualBasic是一个强有力的系统开发软件之一，以其实用、方便、快捷、开发周期短，越来越被广大编程人员所青睐。
VB更容易上手，进而提高软件开发的效率。
通过实际设计，掌握VB应用程序开发软件的设计方法，理解软件工程思想。
本次设计的主要目的是提高学生综合分析问题和解决实际问题的能力，为将来走上工作岗位打下一个良好的基础。
学生信息管理系统主要包括对学生信息的查询和修改等操作。
二、设计（论文）要求（工作量、内容）：
（一）系统需求分析（占全部工作量的20%）
1、认真阅读毕业设计任务书，对设计题目的实用性、可行性进行论证。
2、收集资料：
认真阅读毕业设计任务书。
了解设计目标及要求与开发环境。
主要是软件环境，即系统中将采用的开发工具，如有异议，可及时与指导老师进行交流。
3、设计目标及要求：
实现对学生信息的查询和修改。
主要实现以下几方面功能：
用户登录系统：
实现用户可以以各种身份登录。
信息查询：
包括单项查询和综合查询。
系统维护：
包括系统中涉及到的规范化数据字典表的管理、用户管理等。
（二）数据库系统分析、设计（占全部工作量的20%）
1、采用VB数据库系统
VB+ACCESS
2、设计数据库中需要的表
设计表结构，设计表中的字段、类型、长度等。
3、分析系统中表之间的关系
（三）程序设计、调试（占全部工作量的30%）
（四）系统测试（占全部工作量的20%）
（五）书写设计论文（占全部工作量的10%）
三、进度表
日期
内容
第15周
第一阶段：
系统需求分析
1。
系统的实用性、可行性分析
2。
业务分析
3。
设计目标
4。
功能设计
第16周
第二阶段：
数据库设计
1。
数据库设计：
设计数据库结构
2。
给出E—R图及相应数据流图
第17-18周
第三阶段：
程序设计、调试和系统测试
1.程序编制
2.系统测试
3.系统打包、完成
第19-20周
第四阶段：
写毕业论文
完成日期
答辩日期
四、主要参考文献、资料、设备和实习地点及翻译工作量：
1主要参考文献：
[1]萨师煊王珊。
数据库系统概论。
第三版。
北京：
高等教育出版社，2000。
[2]周霭如、官士鸿、林伟健。
VisualBasic程序设计。
北京：
电子工业出版社，2003。
1。
[3]尹贵祥。
VisualBasic6。
0程序设计案例教程。
。
北京：
中国铁道出版社，2005。
1
[4]（美）StephenR。
Schach。
软件工程。
北京：
机械工业出版社，1999。
9
2设备：
计算机一台，自己解决。
3翻译工作量：
论文摘要。
指导教师签字
教研室主任签字
主管系领导签字
年月日
年月日
年月日
注：
本任务书要求一式两份，一份系部留存，一份报教务处实践教学科。
摘要
随着信息技术在管理上越来越深入而广泛的应用，管理信息系统的实施在技术上已逐步成熟。
管理信息系统是一个不断发展的新型学科，任何一个单位要生存要发展，要高效率地把内部活动有机地组织起来，就必须建立与自身特点相适应的管理信息系统。
学生成绩管理系统主要提供方便高效的管理功能，该实现以下一些基本功能：
1。
系统管理模块：
维护系统的正常运行和安全性设置，包括添加用户、修改密码、删除用户等等。
2。
学院信息模块：
实现对学校院系、专业、班级操作。
包括：
添加、修改、删除院系、专业、班级等信息。
这三个功能模块各自独立，完成学校的全部班级的管理。
3。
学生学籍管理模块：
实现对学生的个人信息的管理工作，包括学籍添加、学籍查询、学籍修改等功能，从而方便学校管理部门对学校的基本情况的快速查询和了解。
4。
课程管理模块：
该模块对各个班级的课程进行设置，并可在其中设置各门课程的教材选用情况，方便了学校教材管理部门和教务处的教学管理人员的工作。
该模块包括基本课程设置和班级课程设置两个模块。
5。
成绩管理模块：
检验学生学习情况的一个主要手段，本模块包括考试类型设置，共有期中考试和期未考试两种类型，还设置了成绩添加、成绩查询、成绩浏览、成绩修改等功能模块。
6。
退出模块：
此模块完成程序的退出。
该程序界面友好，功能强大，适合实际应用。
关键字：
数据库ACCESS数据库
Abstract
Alongwiththeinformationtechnologyinthemanagementofamoreprofoundandextensiveapplication,managementinformationsystemsimplementation,technologyhasgraduallymatured.Managementinformationsystemisacontinuousdevelopmentofnewdisciplines,anyoneunittosurviveandtodevelop,efficientactivitiesoftheinternalorganizationoforganic,itmustestablishitsowncharacteristicsandtoadaptthemanagementofinformationsystem.
Studentachievementmanagementsystemtofacilitatetheprovisionofefficientmanagement,theimplementationofthefollowingbasicfunctions：
1systemmanagementmodule：
maintainingthenormaloperationofthesystemandsecuritysettings,includingadd,modify,deleteuserpassworduserandsoon.
2Schoolofinformationmodule:
therealizationofschoolfaculty,professionaloperation,class.Include:
add,modify,delete,professionalcolleges,classandotherinformation.Thethreefunctionmodulesareindependent,completethewholeschoolclassmanagement.
3studentmanagementmodule:
therealizationofstudents'personalinformationmanagement,includingadd,querystudentschool,studentmodifyfunctions,therebyfacilitatingschooladministrationtotheschool'sbasicsituationoffastinquiryandunderstanding.
The4curriculummanagementmodule:
Thismoduleofthevariousclassesofcurriculumsetting,andcanbesetupinwhichthecourseoftheteachingmaterialselection,convenientschoolteachingmaterialmanagementdepartmentandtheschooladministrationofficeoftheteachingmanagementstaff.Themoduleincludesthebasiccurriculumandthecoursessettingoftwomodules.
5performancemanagementmodule:
testingthestudentslearningisoneofthemainmeans,themoduletesttypesetting,atotalofmidtermandfinalexamsintwotypes,alsosetuptheachievementtoadd,queryresults,performance,functionmodulessuchasbrowsingperformancechanges.
6：
Thismoduleexitmoduleprogramexit.
Theprocessfriendlyinterface,powerful,suitableforpracticalapplications.
Keywords:
databaseACCESSdatabase
第一章绪论
1.概述
该信息管理系统可以说是一个综合性的学校学生管理系统，它集成了学生学籍管理系统、学生成绩管理系统、学生档案管理系统等多种功能，因而具有较强的实用性和先进性。
项目提出的意义
现在我国的大中专院校的学生信息管理水平普遍不高，有的还停留在纸介质基础上，这种管理手段已不能适应时代的发展，因为它浪费了许多的人力和物力。
在当今信息时代这种传统的管理方法必然被计算机为基础的信息管理系统所代替。
如果本系统能被学校所采用，将会改变以前靠手工管理学生成绩的状况，可以树立良好的办学形象，提高工作效率。
项目开发背景
学生信息管理系统是一个教育单位不可缺少的部分，它的内容对于学校的决策者和管理者来说都至关重要，对学生来说也可以轻松的查阅自己在校的成绩以及信息等。
但是一直以来人们都是靠传统人工的方式管理学生成绩，这种管理方式存在着许多缺点，如：
效率低，保密性差，另外时间一长，将产生大量的文件和数据，这对于查找，更新和维护都带来了不少的困难。
随着科学技术的不断提高，计算机对学生信息进行管理，有着手工管理所无法比拟的优点。
例如：
检索迅速，查找方便，可靠性高，存储量大，保密性好，寿命长，成本低等。
这些优点能够极大地提高学生信息管理的效率，方便系统管理员对学生成绩等信息的添加，修改，删除，查询，留言等操作，同时一样的方面学生对自己各科成绩查询，学习的交流。
项目开发的目标
建立学生信息管理系统，采用计算机对学生信息进行管理，进一步提高办学效益和现代化水平。
帮助广大教师提高工作效率，实现学生信息管理工作流程的系统化、规范化和自动化。
二、相关技术与开发工具介绍
本系统采用面向对象的软件开发办法，以Microsoft公司的可视开发环境VisualBasic6.0作为主要开发工具，使用MicrosoftAccess2000作为关系数据库，并为VB编程语言中采用ADO数据库编程模型，配合功能强大的SQL查询语言实现建立关系数据库，放问数据库，对数据库的更新，较好地实现了预定的需求功能。
第二章需求分析
通过调查，要求系统需要有以下功能：
⑴要求有良好的人机界面；
⑵较好的权限管理；
⑶原始数据修改简单方便，支持多条件修改；
⑷方便的数据查询，支持多条件查询；
⑸相应的权限下，删除数据方便简单，数据稳定性好；
⑹数据计算自动完成，尽量减少人工干预；
可行性分析：
由于本系统管理的对象单一，都是在校学生，且每个数据内容具有较强的关联性，涉及的计算过程不是很复杂。
因此，比较适合于采用数据库管理。
且学校用于学生管理的微机都是奔腾3以上的机器，在存储量、速度方面都能满足数据库运行的要求。
在技术难度方面，由于有指导老师的指导和相关参考文献，特别是网上资料，特别是参考其它程序的功能，因此完全可以实现。
数据库是MIS中的重要支持技术，在MIS开发过程中，如何选择数据库管理是一个重要的问题，目前，数据库产品较多，每种产品都具有各自的特点和适用范围，因此，在选择数据库时，应考虑数据库应用的特点及适用范围，本系统选用的数据库语言介绍如下：
VisualBasic是一种可视化的、面对对象和调用事件驱动方式的结构化高级程序设计，可用于开发Windows环境下的种类应用程序。
它简单易学、效率高，且功能强大。
在VisualBasic环境下，利用事件驱动的编程机制、新颖易用的可视化设计工具，可以高效、快速地开发出Windows环境下功能强大、图形界面丰富的应用软件系统。
第三章功能设计
2.3业务流程分析
2.4数据流程分析：
普通用户（学生）：
提供查询（需登录，仅显示登录用户信息）
中等用户（教师）：
提供增删改查（需登录，只可操作成绩表，并且教师工号对自己对应的成绩）
管理员（教务处）：
提供增删改查（可对学生，教师，成绩等操作）
普通用户：
登录账户为学生学号
中级用户：
登录账号为教师工号，密码自定义，可修改
管理员：
登录账号为特定，密码可修改，可增加特殊账号
软件功能设计
第四章详细设计
数据库设计
学生表（student）:
列
字段名
类型
长度
是否为空
主键
学号
Id
Char
20
否
是
姓名
name
Char
20
否
否
性别
sex
Char
2
是
否
出生年月
birthday
Date/time
8
是
否
民族
nation
Text
10
是
否
籍贯
native
text
10
是
否
入学时间
enterTime
Date/time
8
是
否
院系编号
fID
text
5
是
否
专业编号
speID
text
5
是
否
班级编号
cID
text
5
是
否
教师表：
（）
列
字段名
类型
长度
是否为空
主键
教师工号
tID
text
20
否
是
教师姓名
tName
text
10
否
否
性别
tSex
text
2
是
否
名族
tNation
text
10
是
否
籍贯
tNative
text
10
是
否
政治面貌
Political
text
10
是
否
职称
tital
text
10
是
否
所属部门
department
text
10
是
否
登陆密码
password
text
50
是
否
管理员表：
（）
列
字段名
类型
长度
是否为空
主键
管理员编号
adID
text
10
否
是
管理员账号
adName
text
50
否
否
密码
adPassword
text
50
否
否
所属部门
adDepart
text
10
否
否
成绩表：
（）
列
字段名
类型
长度
是否为空
主键
学生编号
stuID
text
12
否
否
学科编号
subID
text
10
否
否
平时成绩
usual
text
10
否
否
期末
final
text
10
否
否
总评
eff
text
10
是
否
教师工号
teacherID
text
20
否
否
院系表（faculty）：
列
字段名
类型
长度
是否为空
主键
院系编号
fID
text
2
否
是
院系名称
fName
text
10
否
否
专业表（special）：
列
字段名
类型
长度
是否为空
主键
专业编号
speID
text
2
否
是
专业名称
sName
text
50
否
否
所属院系
sfID
text
2
否
否
学科表（subject）：
列
字段名
类型
长度
是否为空
主键
编号
subID
text
5
否
是
名称
subName
text
50
否
否
班级表（class）：
列
字段名
类型
长度
是否为空
主键
班级编号
cID
text
2
是
否
班级名称
cName
text
50
是
否
所属院系
fID
text
2
是
否
所属专业
sID
text
2
是
否
程序代码设计要求：
根据系统的主要功能及上一章的总体设计，系统开发进入第二个阶段：
详细设计。
在这一阶段的工作中，主要任务有以下几项：
1、根据原型化的开发原则，为系统的每个模块功能进行界面设计，作为进一步优化的基础。
2、进行系统的流程分析，为模块的细化做好准备。
3、对每个模块进行详细的算法设计。
详细代码设计
公共模块：
解决登陆用户信息以及数据库标志等公共信息，所以定义通用变量
PublicgUserNameAsString'保存用户名称
PublicgTidAsString'保存教师信息
PublicgStuIDAsString'保存学生登录信息
PublicflagAsInteger'添加和修改的标志
PublicgSQLAsString'保存SQL语句
Publickqsql2AsString'保存查询其他考勤结果SQL语句
PublicArecordIDAsInteger
PublicLrecordIDAsInteger
PublicorecordIDAsInteger
PublicErecordIDAsInteger
PubliciflagAsInteger'数据库是否打开标志
数据库连接选用ADODB连接方式，首先先编写一公共模块，用于存放数据库访问类。
PublicFunctionTransactSQL（ByValsqlAsString）AsADODB.Recordset
DimconAsADODB.Connection
DimrsAsADODB.Recordset
DimstrConnectionAsString
DimstrArray（）AsString
Setcon=NewADODB.Connection
Setrs=NewADODB.Recordset
OnErrorGoToTransactSQL_Error
strConnection="Provider=Microsoft.jet.oledb.4.0;DataSource="&App.Path&"\DB\StuData.mdb"
strArray=Split（sql）
con.OpenstrConnection
IfStrComp（UCase$（strArray（0））,"select",vbTextCompare）=0Then
rs.OpenTrim$（sql）,con,adOpenKeyset,adLockOptimistic
SetTransactSQL=rs
iflag=1
Else
con.Executesql
iflag=1
EndIf
TransactSQL_Exit:
Setrs=Nothing
Setcon=Nothing
ExitFunction
TransactSQL_Error:
MsgBox"查询错误：
"&Err.Description
iflag=2
ResumeTransactSQL_Exit
EndFunction
解决关闭窗口后程序任在后台运行类：
PublicSubShutdown（OptionalByValForceAsBoolean=False）
DimIAsLong
OnErrorResumeNext
ForI=Forms.Count-1To0Step-1
IfNotForceThen
IfForms.Count>IThen
ExitSub
EndIf
EndIf
NextI
IfForceOr（Forms.Count=0）ThenClose
IfForceOr（Forms.Count>0）ThenEnd
EndSub
识别tab键
PublicSubTabToEnter（KeyAsInteger）
IfKey=13Then
SendKeys"{TAB}"
EndIf
EndSub
登陆界面设计
由于有三类用户同时登陆
其中，学生输入学号登陆，教师登陆由教工号于密码登陆，管理员由账号密码登陆。
代码如下：
PrivateSubcmdOK_Click（）
DimsqlAsString
DimrsAsADODB.Recordset
IfTrim（UserName.Text=""）Then
MsgBox"没有输入用户名，请重新输入！
",vbOKOnly+vbExclamation,"警告"
UserName.SetFocus
Else
sql="select*fromAdministratorwhereadName='"&UserName.Text&"'"
Setrs=TransactSQL（sql）
Ififlag=1Then
Ifrs.EOF=TrueThen
MsgBox"没有这个用户，请重新输入！
",vbOKOnly+vbExclamation,"警告"
UserName.SetFocus
Else
IfTrim（rs.Fields
（2））=Trim（adPassWord.Text）The
升级会员 