学生成绩管理信息系统课程设计.docx
- 文档编号:24219578
- 上传时间:2023-05-25
- 格式:DOCX
- 页数:16
- 大小:94.43KB
学生成绩管理信息系统课程设计.docx
《学生成绩管理信息系统课程设计.docx》由会员分享,可在线阅读,更多相关《学生成绩管理信息系统课程设计.docx(16页珍藏版)》请在冰豆网上搜索。
学生成绩管理信息系统课程设计
学生成绩管理信息系统课程设计
学生成绩管理信息系统
分析与设计报告
工程管理101
第一小组
组长:
田永涛
组员:
冯梦婷徐士超张功磊
2012-12-5
学生成绩管理信息系统
分析与设计报告目录
一、设计报告要求
按照课程内容中的信息系统开发过程和方法,选择适当的学生成绩系统开发,运用结构化开发方法完成整个系统的分析与设计过程及其相应报告。
包括系统规划、系统分析、系统设计过程,写出设计报告。
二、系统设计背景简介
学生信息管理系统(StudentInformationManagementSystem),以下简称SIMS,是针对学校人事处的大量业务处理工作而开发的管理软件,是典型的管理信息系统。
它是一个教育单位不可缺少的部分,它的内容对于学校的决策者和管理者来说都至关重要,它能够为用户提供充足的信息和快捷的查询手段。
能有效的帮助学校和老师掌握学生的情况,为学生提供成绩跟课程方面的查询。
在传统模式下利用人工进行学生信息管理,存在着较多的缺点,如:
效率底,保密性差,时间一长将产生大量的文件和数据,更不便于查找,更新,维护等。
诸如这些情况,令学校管理者对学生的信息管理带来了很大困难,严重影响了教育工作者的工作效率。
随着科学技术的不断提高,计算机科学日渐成熟,使用日趋成熟的计算机技术来代替传统的人工模式,来实现学生信息的现代化管理,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。
因此,开发这样一套管理软件成为很有必要的事情。
三、系统技术及运行环境
(一)VisualBasic6.0(VB)简介
VisualBasic6.0(VB)是一种由微软公司开发的包含协助开发环境的事件驱动编程语言。
它源自于BASIC编程语言。
VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建ActiveX控件。
程序员可以轻松的使用VB提供的组件快速建立一个应用程序。
(二)系统开发及运行环境
该运行环境的规定是保证本需求说明的功能得到实际真正体现的基础。
1.运行环境WindowsXp或更高版本的操作系统
数据库系统:
MicrosoftVisualBasic6.0
2.开发环境:
开发工具:
MicrosoftVisualBasic6.0
数据库系统:
MicrosoftVisualBasic6.0
四、系统分析
(一)需求分析
1.系统功能需求
(1)有关学籍信息的输入,包括输入学生基本信息、所在院系、所学专业、所在班级、所学课程和成绩等。
(2)学生信息的查询,包括查询学生基本信息、所在班级、已学课程和学生成绩等。
(3)学生信息的修改,包括增加、删除等。
(4)班级管理信息的输入,包括输入班级设置,年级信息等。
(5)课程信息的设置和查询等。
(6)课程信息的修改,包括增加,删除等。
(7)学生成绩信息的管理和查询等。
2.数据需求
通过调查,总结出用户对数据的需求如下:
(1)学生信息包括:
学号,学生姓名,性别,出生日期,专业,班级等
(2)课程信息包括:
课程编号,课程名称,所属专业等.
(3)选课信息包括:
学生姓名,课程名称,开课时间,成绩等.
3.性能需求
(1)系统的高速性,稳定性,安全性.
(2)系统的体系结构能够方便添加功能模块,适应业务,办公的发展.
(3)系统人机界面友好,易学易用.
(4)系统维护成本较低.
4.用户选择需求
本系统面向的用户有:
学校的系统人员、管理人员、教师、学生。
所以对计算机的人性化和易用性比较高,应用于学校学生信息管理,总体任务是实现学生信息关系的系统化、规范化和自动化,其主要任务是计算学生各种信息进行日常管理,如查询、修改、增加、删除,另外还考虑到了学生选课,做到看界面简单易懂,容易操作,提高了学校管理效率以及提升了学生信息的安全性和完整性。
(二)可行性分析
目的:
可行性研究的目的是用最小的代价在尽可能的时间内确定问题是否能解决。
经济性:
由于学校等中小型管理系统并不复杂,且VisualBasic6.0本身要求的运行环境不高,所以一般WindowsXP以上的系统环境都可以使用。
实用性:
本学生信息管理系统管理系统无太多复杂的操作要求,也没有过分花哨的装饰品,人性化的设计界面可以使操
作者轻易运用自如。
五、模块划分以及有关模块图
(一)登入模块
用户登陆(教师登陆,管理员登陆)
(二)学生信息管理
此模块由学生基本信息、系别信息、班级信息、成绩信息等组成。
(三)课程管理
此模块由课程信息、选课信息组成
(四)成绩管理
此模块由成绩信息组成。
(五)管理员管理
此模块由管理员信息组成
六、业务流程图及数据流程图
管理业务:
接收成绩表;
录入成绩单
生成学生成绩
外部实体:
教师;
教务处;
学生;
信息实体(存储):
成绩表;
账号表
信息表图:
顶层DFD
处理:
(区分信息处理行为和物流行为、系统内的和系统外的)
接收成绩单、教师、学生个人信息数据;
生成成绩表;
成绩综合分析
接收成绩
七、总体设计
(一)设计目标
本系统可以能减少很多不必要的资源,不用象以前那样用冗余的纸张式的管理。
大节省了学校能源。
并且计算机的存储与快速查询功能大大提高了学籍管理的效率,并且还提高了学籍信息管理的精确度。
方便快速的操作,可减少学籍信息管理的漏洞,又减少因工作的冗余出现的错误,并且操作非常简单,可减少许多不很必要的人员,这无论从物质上还是工作人员的工资上都为学校节约了开支。
为学校增加了财富。
数据库分析
用户需求具体有学籍管理系统提供保存、更新、查询、维护,这就需求数据库结构能充分满足各种信息的输入与输出,实现有组织地、动态地存储大量关联数据,方便用户访问系统中的数据,它与文件系统的重要区别是数据的充分共享,交叉访问,与应用程序的高度独立性。
(二)项目规划
学生管理系统是各大中专院校不可缺少的一部分,是一个VB数据库开发应用程序,它主要包括用户登录、学生信息输入修改、学生信息查询以及学生成绩输入、学生成绩查询、系统用户管理等几个页面,因而该系统具有较强的实用性。
八、详细设计
(一)数据库设计
字段名
数据类型
备注
学号
Char(8)
主键Notnull
姓名
Char(10)
Notnull
性别
出生日期
Char(14)
Notnull
字段名
数据类型
备注
学号
Char(8)
主键Notnull
姓名
Char(10)
Notnull
课程
Char(18)
Notnull
总成绩
Int(5)
Notnull
排名
Char
(2)
Notnull
字段名
数据类型
备注
账号
Char(8)
主键Notnull
密码
Char(6)
Notnull
(二)代码设计
1.登陆界面
PrivateSubCommand1_Click()
DimstrAsString
IfTrim(Text1.Text)=""OrTrim(Text2.Text)=""Then
MsgBox"输入不能为空",0+48,"警告"'判断是否为空,是则弹出窗体警告
Text1.SetFocus
Text1.Text=""
Text2.Text=""
Else
Adodc1.RecordSource="select*from账号表where用户名='"&Text1.Text&"'"
Adodc1.Refresh
IfAdodc1.Recordset.EOFThen
MsgBox"账户错误",0+48,"提示信息"
Text1.SetFocus
Text1.Text=""
Text2.Text=""
Else
str=Adodc1.Recordset.Fields("密码").Value
IfTrim(Text2.Text)<>strThen
MsgBox"密码错误",0+48,"warning"
Text2.SetFocus
Text2.Text=""
Else
Me.Hide
formmain.Show
EndIf
EndIf
EndIf
EndSub
PrivateSubCommand2_Click()
End
EndSub
PrivateSubCommand3_Click()
Me.Hide
formapply.Show
EndSub
PrivateSubText2_KeyPress(KeyAsciiAsInteger)
IfKeyAscii=13Then
CallCommand1_Click
EndIf
EndSub
PrivateSubText1_KeyPress(KeyAsciiAsInteger)
IfKeyAscii=13Then
Text2.SetFocus
EndIf
EndSub
2.学生基本情况代码
PrivateSubCommand4_Click()
Me.Hide
formmain.Show
EndSub
PrivateSubCombo1_Click()
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select*from基本情况表where性别='"&Combo1.Text&"'"
Adodc1.Refresh
EndSub
PrivateSubCombo2_Click()
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select*from基本情况表where专业='"&Combo2.Text&"'"
Adodc1.Refresh
EndSub
PrivateSubCommand1_Click()
IfText1>""Then
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select*from基本情况表where学号='"&Text1&"'"
Else
Adodc1.RecordSource="select*from基本情况表"
EndIf
Adodc1.Refresh
EndSub
PrivateSubCommand2_Click()
IfText2>""Then
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select*from基本情况表where姓名='"&Text2&"'"
Else
Adodc1.RecordSource="select*from基本情况表"
EndIf
Adodc1.Refresh
EndSub
PrivateSubCommand3_Click()
Adodc1.CommandType=adCmdTable
Adodc1.RecordSource="基本情况表"
Adodc1.Refresh
EndSub
3.成绩查询代码
PrivateSubCommand1_Click()
IfText1.Text>""Then
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select*from成绩表where姓名='"&Text1.Text&"'"
Else
Adodc1.RecordSource="select*from成绩表"
EndIf
Adodc1.Refresh
EndSub
PrivateSubCommand10_Click()
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select平均成绩,学号,姓名from成绩表"
Adodc1.Refresh
EndSub
PrivateSubCommand2_Click()
IfText2.Text>""Then
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select*from成绩表where学号='"&Text2.Text&"'"
Else
Adodc1.RecordSource="select*from成绩表"
EndIf
Adodc1.Refresh
EndSub
PrivateSubCommand3_Click()
IfAdodc1.RecordSource="select高数成绩,学号,姓名from成绩表"Then
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select高数成绩,学号,姓名from成绩表orderby高数成绩DESC"
Adodc1.Refresh
Else
IfAdodc1.RecordSource="select英语成绩,学号,姓名from成绩表"Then
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select英语成绩,学号,姓名from成绩表orderby英语成绩DESC"
Adodc1.Refresh
Else
IfAdodc1.RecordSource="select计算机成绩,学号,姓名from成绩表"Then
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select计算机成绩,学号,姓名from成绩表orderby计算机成绩DESC"
Adodc1.Refresh
Else
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select平均成绩,学号,姓名from成绩表orderby平均成绩DESC"
Adodc1.Refresh
EndIf
EndIf
EndIf
EndSub
PrivateSubCommand4_Click()
IfAdodc1.RecordSource="select高数成绩,学号,姓名from成绩表"Then
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select高数成绩,学号,姓名from成绩表where高数成绩between60and100"
Adodc1.Refresh
Else
IfAdodc1.RecordSource="select英语成绩,学号,姓名from成绩表"Then
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select英语成绩,学号,姓名from成绩表where英语成绩between60and100"
Adodc1.Refresh
Else
IfAdodc1.RecordSource="select计算机成绩,学号,姓名from成绩表"Then
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select计算机成绩,学号,姓名from成绩表where计算机成绩between60and100"
Adodc1.Refresh
Else
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select平均成绩,学号,姓名from成绩表where平均成绩between60and100"
Adodc1.Refresh
EndIf
EndIf
EndIf
EndSub
PrivateSubCommand5_Click()
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select*from成绩表"
Adodc1.Refresh
EndSub
PrivateSubCommand6_Click()
Me.Hide
formmain.Show
EndSub
PrivateSubCommand7_Click()
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select高数成绩,学号,姓名from成绩表"
Adodc1.Refresh
EndSub
PrivateSubCommand8_Click()
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select英语成绩,学号,姓名from成绩表"
Adodc1.Refresh
EndSub
PrivateSubCommand9_Click()
Adodc1.CommandType=adCmdUnknown
Adodc1.RecordSource="select计算机成绩,学号,姓名from成绩表"
Adodc1.Refresh
EndSub
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 学生 成绩 管理信息系统 课程设计