学生成绩管理系统需求分析报告
一、摘要
计算机的发展将人类带到了信息技术时代，人们的生活发生了巨大的变化。使用计算机进行庞大的数据库管理是应用最广泛的一种。《学生成绩管理系统》是用可视化的面向对象的程序设计语言Visual Basic 6.0和数据库管理系统Access开发的一个学生成绩管理系统。主窗口使用了类似于Word的多文档窗口。通过ADO对象的数据环境控件连接Access数据库。具有一般数据库管理系统的输入、删除、修改等基本功能，界面友好，操作简单。学生成绩管理信息系统可以有效提高学校管理成绩的效率与准确性,是学校办公自动化的重要组成部分。VB具有可视化集成开发环境,以事件驱动、图形用户界面等为特点,在设计学生成绩管理系统方面有着独特的优越性。通过学生成绩管理系统的研制,对基于VB建立成绩管理系统的一般方法,成绩管理系统的结构及功能模块、特点进行研究。该系统简便实用、通用性强,具有很好的可移植性。
二、前言
对于一所学校来说，如何利用计算机改变每次考试结束后老师们统计大量的学生成绩时的繁重任务？如何消除因时间紧所产生的统计结果错误百出？设计出学生成绩管理系统就是一个很好的解决方法。
本文通过用VB面向对象的编程环境编写学生成绩管理系统，利用软件工程原理，采用生命周期方法学，根据3NF的关系模式设计数据库表，用模块化设计方式将 系统的各个功能模块层层分解，设计出系统的模块化结构，并根据系统的具体要求和需要实现的功能，详细地定义了各个模块的具体功能。
开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面，实现了学生成绩数据库的创建及学生成绩的输入、浏览、维护和统计，使得系统具有功能强大，界面友好的特点。
在设计学生成绩管理系统过程中，得到了各位老师的指导，在此表示感谢。由于本人水平有限，程序中不足之处在所难免，敬请各位老师批评指正。
第一章 系统的设计目标与需求分析
1、开发语言简介
Visual Basic,简称VB，是Microsoft公司推出的一种Windows应用程序开发工具。是当今世界上使用最广泛的编程语言之一，它也被公认为是编程效率最高的一种编程方法。无论是开发功能强大、性能可靠的商务软件，还是编写能处理实际问题的实用小程序，VB都是最快速、最简便的方法。
何谓 Visual Basic？“Visual”指的是采用可视化的开发图形用户界面（GUI）的方法，一般不需要编写大量代码去描述界面元素的外观和位置，而只要把需要的控件拖放到屏幕上的相应位置即可；“Basic”指的是BASIC语言，因为VB是在原有的BASIC语言的基础上发展起来的，至今包含了数百条语句、函数及关键词，其中很多和 Windows GUI 有直接关系。专业人员可以用 Visual Basic 实现其它任何 Windows 编程语言的功能，而初学者只要掌握几个关键词就可以建立实用的应用程序。
2、统设计目标
（1） 能够查询浏览学生的信息、学生成绩信息、用户信息等
（2） 能够实现对用户的添加、学生信息的添加、学生成绩的添加
（3） 学生成绩资料的数据库建立和管理
（4） 简易操作，不需要计算机专业人员。
（5） 学生信息添加,包括学生的学号、姓名、性别、年龄、籍贯、班级。
（6） 学生成绩添加，包括学生的学号、VB成绩、数学成绩、计算机网络成绩、和英语成绩。
（7） 学生成绩查询，查询条件为学生学号信息的查询，查询结果以图表形式列出。
（8）学生信息查询，查询条件为学生学号信息的查询，查询结果以图表形式列出。
（9） 用户管理：用户添加，包括用户名、用户密码、用户类型的添加；用户查询，以用户名为查询条件，包括查询、修改、删除等。
（10）用户登录
3、理解需求
21世纪以来，人类经济高速发展，人们发生了日新月异的变化，特别是计算机的应用及普及到经济和社会生活的各个领域。使原本的旧的管理方法越来越不适应现在社会的发展。许多人还停留在以前的手工操作。这大大地阻碍了人类经济的发展。为了适应现代社会人们高度强烈的时间观念，学校信息管理系统软件为学校办公室带来了极大的方便。我所开发的这个系统所采用的是当前较为流行的编程软件VISUAL BASIC 6.0作为实现语言，以数据库Microsoft SQL Server2000作为系统的后台操作，其功能在系统内部有源代码直接完成。我们只需按系统要求输入即可操作。
为将来学校上网做好准备
跟据1999年中国电信的调查报告显示我国的上网人数已达到890万，互联网已经十分普及，学校往界的毕业生希望能在世界的任何一个角落查到自己校友的信息，本系统为学校将来的上网作了先期工作，比如数据库的建立。
根据实际情况，我们使用原型法（Rapid Prototyping）即以少量代价快速地构造一个可执行的软件系统模型。使用户和开发人员可以较快地确定需求，然后采用循环进化的开发方式，对系统模型作连续的精化，将系统需具备的性质逐渐增加上去，直到所有的性质全部满足。此时模块也发展成为最终产品了。
设计一个数据库系统，首先必须确认数据库系统的用户和用途。由于数据库系统是一个组织部门的模拟，数据库系统设计者必须对一个组织部门的基本情况有所了解，比如该组织部门的组织机构、各部门的联系、有关事物和活动以及描述它们的数据、信息流程、政策和制度、报表及其格式和有关的文档等。收集和分析这些资料的过程称为需求分析。例如在一个大学，学生是按照系部、班级来进行组织，而课程则是按照专业、任课教师等进行组织。每个学生需要选修自己专业内的课程并取得成绩，而校方则需要统计每门课的平均分和学生的平均成绩，这就是学生和课程之间的联系和需要进行的处理。需求分析的目标是给出应用领域中数据项、数据项之间的关系和数据操作任务的详细定义，为数据库系统的概念设计、逻辑设计和物理设计奠定基础，为优化数据库系统的逻辑结构和物理结构提供可靠依据。设计人员应与用户密切合作，用户则应积极参与，从而使设计人员对用户需求有全面、准确的理解。
需求分析的过程是对现实世界深入了解的过程，数据库系统能否正确的反映现实世界主要取决于需求分析，需求分析人员既要对数据库技术有一定的了解，又要对组织部门的情况比较熟悉，一般由数据库系统设计人员和本组织部门的有关工作人员合作进行。需求分析的结果整理成需求分析说明书，这是数据库技术人员与应用组织部门的工作人员取得共识的基础，必须得到有关组织部门人员的确认。
第二章 系统可行性分析
支持的终端数：至少30台
同时操作的用户数：至少15人
同时处理的文件数：10
响应时间：最多3秒
运行时间：最多4秒
数据转换时间：最多5秒
数据传送时间：最多4秒
更新处理时间：最多4秒
要能够抵御用户可能的误操作，保证软件的健壮性
要对数据进行检验，保证数据有效性
.在数据被破坏时，具有数据恢复能力
易用性：尽量做到少输入汉字，做到用鼠标电选完成操作
安全性：
1、数据要绝对安全防止有意无意的破坏数据。若数据遭到破坏，系统具数据恢复功能，不可恢复的数据仅限于当日录入和修改的数据。
021、只有管理员才能输入、修改和删除有关的数据。
3、学生只可以查看自己的成绩。
4、严格控制对数据的修改，只能数据录入的用户才有权对数据进行修改。
三：数据流程图
四、功能需求
“学生成绩管理信息系统”包括三个模块：用户添加与修改与查询、成绩添加与查询、学生信息添加与查询。这三个模块既相互联系又相互独立，学生信息添加为所有模块的基础。
(1) 用户添加与修改与查询模块：
主要功能用来对用户的信息进行添加、修改和删除。具体包括用户的录入、修改、增加、删除、查询、等功能，信息录入需要分姓名、密码以及某用户类型。修改要与信息录入相对应。增加、删除是对基本表的操作。查询条件设置应该齐全，可以用户查询，类型查询，也可以姓名查询，学号查询等等。
(2) 成绩添加与查询模块：
主要功能用来对学生的成绩以学号为单位进行处理。具体包括各学生VB成绩、数学成绩、计算机网络成绩及英语成绩；各个学生成绩课查询，也可以修改。
(3) 学生信息添加与查询模块：
主要功能用来对学生的信息以学号为单位进行处理。具体包括各学生的学号、姓名、性别、年龄、籍贯、班级等。
五、功能划分
数据字典
用户表
学生信息表
学生成绩表
功能模块：
用户登陆；
用户查询；
用户添加与修改；
学生信息添加；
学生信息查询与删除；
学生成绩添加；
学生成绩查询与删除；
联系我们资料；
主界面；
五、系统整体界面及主要代码
（可用文字说明、流程图或图等表述）
1．数据库的建立；（负责人：赵小明）
2．登录窗口；（负责人：焦照明）
rivate Sub Command1_Click()
If Text1 = "" Or Text2 = "" Then
MsgBox "请输入正确的用户名或密码"
Else
a = "select * from yonghu where 用户名='" & Text1 & "'and 用户密码='" & Text2 & "'"
If rs.State = 1 Then rs.Close
rs.Open a, conn, 3, 1
If rs.RecordCount = 0 Then
MsgBox "非法用户登陆"
Else
Unload Me
主界面.Show
End If
End If
3．添加模块：
用户添加(负责人：钟永磊)、
Private Sub Command1_Click()
If Text1 = "" Or Text2 = "" Or Combo1.Text = "" Then
MsgBox "请输入用户名,密码或选择用户类型!"
Exit Sub
Else
a = "select 用户名 from yonghu where 用户名='" & Text1 & "'"
If rs.State = 1 Then rs.Close
rs.Open a, conn, 3, 1
If rs.RecordCount > 0 Then
MsgBox "已经存在相同的用户名,请重新输入!"
Else
a = "insert into yonghu(用户名,用户密码,用户类型)values('" & Text1 & "','" & Text2 & "','" & Combo1 & "')"
conn.Execute (a)
MsgBox "用户添加成功"
End If
End If
Text1 = ""
Text2 = ""
End Sub
学生成绩添加（负责人：钟永磊）
Private Sub Command1_Click()
If Text1 = "" Or Text2 = "" Or Text3 = "" Or Text4 = "" Or Text5 = "" Then
MsgBox "请输入一组完整的信息"
Exit Sub
Else
a = "select * from chengji where 学号='" & Text1 & "'"
If rs.State = 1 Then rs.Close
rs.Open a, conn, 3, 1
If rs.RecordCount > 0 Then
MsgBox "该用户已存在,请重新输入!"
Else
a = "insert into chengji(学号,vb,数学,英语,计算机网络)values('" & Text1 & "','" & Text2 & "','" & Text3 & "','" & Text4 & "','" & Text5 & "')"
conn.Execute (a)
MsgBox "添加成功"
End If
End If
End Sub
学生信息添加（负责人：赵小明）
Private Sub Command1_Click()
If Text1 = "" Or Text2 = "" Or Text3 = "" Or Text4 = "" Or Text5 = "" Or Text6 = "" Then
MsgBox "请输入一组完整的用户信息"
Exit Sub
Else
a = "select * from xinxi where 姓名='" & Text1 & "'"
If rs.State = 1 Then rs.Close
rs.Open a, conn, 3, 1
If rs.RecordCount > 0 Then
MsgBox "该用户已经存在,请从新输入!"
Else
a = "insert into xinxi(姓名,性别,年龄,学号,籍贯,班级) values('" & Text1 & "','" & Text2 & "','" & Text3 & "','" & Text4 & "','" & Text5 & "','" & Text6 & "')"
conn.Execute (a)
MsgBox "添加成功"
End If
End If
4．查询模块：
用户查询修改与删除（负责人：刘速）
Private Sub Command1_Click()
If Text1 = "" Then
MsgBox "请输入要查询的条件！"
Else
a = "select * from yonghu where 用户名='" & Text1 & "'"
If rs.State = 1 Then rs.Close
rs.Open a, conn, 3, 1
If rs.RecordCount = 0 Then
MsgBox "没有满足条件的记录"
Else
Set DataGrid1.DataSource = rs
Command2.Enabled = True
Command4.Enabled = True
End If
End If
End Sub
Private Sub Command2_Click()
If Text2 = "" Or Combo1.Text = "" Then
MsgBox "请输入完整修改信息"
Else
a = "update yonghu set 用户密码='" & Text2 & "',用户类型='" & Combo1 & "' where 用户名='" & Text1 & "'"
conn.Execute (a)
MsgBox "用户密码或类型修改成功"
rs.Requery
End If
End Sub
Private Sub Command3_Click()
Unload Me
End Sub
Private Sub Command4_Click()
a = "delete * from yonghu where 用户名='" & Text1 & "'"
conn.Execute (a)
rs.Requery
End Sub
学生成绩查询（负责人：刘速）
Private Sub Command1_Click()
If Text1 = "" Then
MsgBox "请输入要查询的学号！"
Else
a = "select * from chengji where 学号='" & Text1 & "'"
If rs.State = 1 Then rs.Close
rs.Open a, conn, 3, 1
If rs.RecordCount = 0 Then
MsgBox "没有满足条件的记录"
Else
Set DataGrid1.DataSource = rs
End If
End If
End Sub
Private Sub Command3_Click()
a = "delete * from chengji where 学号='" & Text1 & "'"
conn.Execute (a)
MsgBox "用户删除成功"
rs.Requery
End Sub
学生信息查询（负责人：刘速）
Private Sub Command1_Click()
If Text1 = "" Then
MsgBox "请输入要查询的学号！"
Else
a = "select * from xinxi where 学号='" & Text1 & "'"
If rs.State = 1 Then rs.Close
rs.Open a, conn, 3, 1
If rs.RecordCount = 0 Then
MsgBox "没有满足条件的记录"
Else
Set DataGrid1.DataSource = rs
End If
End If
End Sub
Private Sub Command3_Click()
a = "delete * from xinxi where 学号='" & Text1 & "'"
conn.Execute (a)
MsgBox "用户删除成功"
rs.Requery
End Sub
5.主界面及其他（负责人：焦照明）
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
Select Case Button.Index
Case 1
用户查询.Show 1
Case 2
用户添加.Show 1
Case 3
学生成绩添加.Show 1
Case 4
学生信息添加.Show 1
Case 5
学生成绩查询.Show 1
Case 6
学生信息查询.Show 1
Case 7
End
Case 8
关于我们.Show 1
Case 9
formtel.Show 1
End Select
六、总结
1.
在老师的帮助下，通过对VB程序编写操作这一过程，更好的掌握了对于VB程序的应用、掌握了VB程序设计的属性、方法及应用的使用、掌握使用VB程序设计中建立窗口，查询数据，添加数据，修改数据，删除数据的操作，掌握如何系统化得把一个程序连接起来的过程。
2．通过实训发现自己对VB程序设计及应用教程的学习还存在很多问题，尤其是对于一些细节的程序编写上的熟练掌握程度上，还有就是缺少熟练和灵活操作，不过我们以后会通过学习来更好的提高自己。