浙江工业大学宿舍条件怎么样-片段摘抄
石家庄铁道大学课程设计
小型学生成绩管理系
统设计报告
单
位
分院
(
系
)
专
业
学
号
学生姓名
组
员
指导教师
完成日期
2011
年
7
月
5
日
1
摘
要
成绩管理是学校管理中相当繁重的工作,牵涉到学生成绩管理、教师管理
和课程管理等。由于成绩记录的数量众多、管理复杂容易造成混乱,并且学生
的
数量以及人数也会不断变化。而且大学一般进行的是素质教育,学生个人可
以通过密码来
保护个人的成绩隐私,免得学生因为成绩而造成心理障碍。老师
也要统计学生的各科成绩
及平均成绩,这样有利于发现学生的薄弱之处,以加
强训练,为国家培养全方面人才,当
然也方便了老师因材施教,培养专业型技
术人才。所以学生成绩管理相当重要。成绩管理
系统可以实现对整个成绩信息
进行准确而高效的记载。
本系统的主要功能及任务是:
·方便学生对自己的成绩信息进行浏览并且可以保有个人成绩的隐私权;
·方便教师对学生的成绩信息进行浏览、查找并进行管理;
·提供一个电子化的成绩管理平台。
为满足为
学校服务这一基本功能,
数字校园应定位于信息服务,
对学生的成绩的高
效而准确的管理系统设计的出发点和最终目的,既要能够满足学生和老师的一般需求,
又要能够针对用户的类型、需求特征等确定它的的权限以便进行管理。
学生成绩管理系统以学校实际成绩管理情况为依据,提供了成绩浏览 、查
找和更新,统计查询等实用而丰富的功能。本系统使用
Visual Basic 6.0
中文
版作为开发工具,后台数据库采用
Microsoft Access
的
MDB
数据库。
关键词
:小型学生成绩管理系统,
VB
,数据库,控件,控件与数据库的绑定
2
目
录
1.
选题的意义
................. ..........................................
4
2
.系统功能需求分析
.............. ......................................
4
2.1
系统概述
........................... .................................................. ........................................
4
2.2
系统的构成
.......................... .................................................. .....................................
4
2.3
各模块的功能
......................... .................................................. ..................................
4
2.4
系统的运行环境
........................ .................................................. ...............................
5
3
.系统设计
.................. ..........................................
5
3.1
总体结构设计
.
.......... .................................................. ...............................................
5
3.2
数据库设计
.
........... .................................................. ..................................................
7
4
.系统实现
.. .................................................. ........
8
4.1
登陆模块的设计与实现
..................... .................................................. ......................
8
4.2
学生信息维护模块的设计与实现
................. .................................................. ........
1
4
4.3
学生查询模块
........ .................................................. ..................................................
2
9
4.4
退出界面
........................................... .................................................. .......................
3
3
5
.总结
.................... ...........................................
3
5
5.1
总结
p>
............................................. .................................................. .............................
3
5
5.2
存在的主要问题
........................ .................................................. .............................
3
5
3
一
选题的意义
从大的方面来讲,首先,现在我国
的部分高中及其以下级别的大部分中学,
学生成绩的管理水平还停留在纸介质的基础上,
这样的机制已经不能适应时代
的发展,因为它浪费了许多人力和物力,在信息时代这种传
统的管理方法必然
被计算机为基础的信息管理所取代。其次现在倡导大学实施素质教育,
大学生
应该保有对自己成绩的隐私权,以免在心理上造成阴影,或者只为了取得高分,<
/p>
而忽视了专业知识的学习与研究。我选择这个题目,希望可以在信息管理方面
有所提高。改革的总设计师邓小平同志说过“科学技术是第一生产力”,我希
望能用我一年的所学编制出一个实用的程序来帮助学校进行更有效的信息管
理。
从小的方面来说,我感觉这个题目和我的学校生活密切相关,我也比较熟悉
p>
该系统,更容易学到对于我
vb
语言学习有用的知识。从此巩 固自己所学的关于
计算机方面的知识。
二.系统的功能分析
1.
系统的概述
随着
学校的规模不断扩大,学生数量急剧增加,有关学生的各种信息量也
成倍增长。面对庞大
的信息量,需要有学生管理系统来提高学生管理工作的效
率。通过这样的系统,可以做到
信息的规范管理、科学统计和快速的查询,从
而减少管理方面的工作量。方便有效的进行
学生成绩管理工作。
2.
系统的组成
系统开发的总任务是实现学生信息关系的系统化、规范化和自动化。
< /p>
系统主要由五部分组成:教师用户理、学生成绩的管理、学生学籍信息的管理、
信息的查询,其中还包括登录界面以及成绩的统计模块。
3.
各模块的功能
4
●系统用户的管理:实现用户的添加、删除和密码的修改
●学生学籍信息的管理:实现学生学籍信息的添加、删除和修改。
●学生成绩的管理:实现学生成绩的录入,删除和修改。
●学生信息的查询:实现学生学籍的查询、成绩的查询。
●
学生成绩信息的统计:实现学生男女生人数的计。
4
系统的运行环境
系统使用环境
操作系统:
windows xp/2000/me/98
系统支持:
visual basic 6.0
以及以上
数据库:
access
系统开发环境
操作系统:
windows xp/2000/me/98
系统支持:
visual basic 6.0
三
系统设计
1.
总体结构设计
对上述各项功能进行集中、分块,按照结构化层序设计的要求,得到如下所示
的系统功能功能模块图。
5
进入系统的界面
修改密码
学生登录
首页
选择身份
教师进入
修改密码
学生查询界面
信<
/p>
息
维
护
信
息
查
询
信
息
统
计
信
息
的
添
加
信
息
< br>的
删
除
信
息
的
修
改
按
姓
信
按
数 p>
名
息
学
学
号
号
查
显
询
示
统
计
< br>男
女
生
不
同
的
排
序
退
出界面
6
2.
数据库设计
数据库在本成绩管理系统中占有非常重要的地位,数据库结构的好坏将直
接
对应用系统的效率以及实现的效率产生影响。合理的数据库及结构设计可以
提高数据存储
的效率,保证数据的完整和一致。同时合理的数据库结构也将有
利于程序的实现。设计本
系统的数据库应该充分满足用户的需求。
针对一般学生管理系统的需求
,通过对学生学习过程的内容的分析,设计
如下面所示的数据项和数据结构
?
成绩表:
包括的字段有:
学号,姓名,性别,年龄,高数成绩,英语成
绩,计算机成绩,平均成绩。
?
密码表:
包括的字段有:
用户名,密码。
?
教师信息:包括的字段有:用户账号,用户密码。
<
/p>
⑵得到上面的数据项就可以设计出能够满足用户需求的各种实体以及他们之
间的关系。由上面的设计规划出的实体有:用户实体、信息实体、成绩实体。
按照以上实体进行设计:(
1
)打开可视化数据管理器程序( p>
2
)建立数
据库(
3
)创建数 据库表(
4
)添加字段(
5
)生成表⑹
< p>添加内容(
7
)更新
成绩表
字段名称
学号
姓名
性别
年龄
高数成绩
英语成绩
计算机成绩
平均成绩
等
。
数据类型
文本
文本
文本
文本
数字
数字
数字
数字
字段大小
10
10
2
2
50
50
50
50
7
四
系统实现
现在已经完成了程序各个功能模块的创建,现
在可以进行
系统的实现了
1
进入系统的界面实现
进入
系统的界面。此界面主要是为了更新数据库内的信息。
在制造数据库的时候,
所以想到用
公式计算。
点击 按钮时即计算了平均成绩。
使平均成绩填入
了数据库中平均成绩表格内。
其次也使程序有了一个整体的
界面。
< br>其运行时的界面如下(隐藏有一个
ADO
控件,连接数据库)
程序如下:
8
Private Sub Command1_Click()
Dim i%
h
rst
For i = 0 To Count - 1
(7).Value
((4).Value + _
(5).Value + _
(6).Value) / 3
xt
If Then Exit For
Next i
End Sub
=
2.
登录界面的实现
此系统老
师和学生均可以进入。但由于目的和功能不同。必须先选择身份才能
进入。
运行时的界面如下:
9
程序如下:
Private Sub Form_Load()
End Sub
Private
Sub Label2_Click()
us
End Sub
Private
Sub Label3_Click()
10
us
End Sub
3.
教师登录界面
要求必须是数据库中存在的老师才能进入,即只有所填信息完全符合“教师信
息”才能继续进入系统。
界面如下
:
程序如下:
Public ok As
Boolean
Private Sub Command1_Click()
If =
MsgBox
用户名不能为空,请输入您的卡号
!
+
vbExclamation,
警告
us
Else
11
tionString = connectstring()
Source
=
from
密码表
where
用
户
账
号
='
&
&
and
用
户
密
码
='
&
&
h
If =
True Then
MsgBox
用户名或密码输入有误,请重新输入
!
vbOKOnly
+ vbExclamation,
警告”
=
=
us
Else
Text1 =
End If
End If
End Sub
Private Sub Form_Load()
End Sub
12
4.
学生登录界面
此界面和教师登录界面基本相同,程序也基本相似。
界面如下:
程序如下
:
Public ok As Boolean
Private
Sub Command1_Click()
If =
MsgBox
用户名不能为空,请输入您的卡号
!
+
vbExclamation,
警告
us
Else
tionString =
connectstring()
Source
=
from
密码表
where
用
户
账
号
='
&
&
and
用
户
密
码
='
&
&
13
h
If = True Then
MsgBox
用户名或密码输入有误,请重新输入
!
vbOKOnly
+ vbExclamation,
警告”
=
=
us
Else
Text1 =
End If
End If
End Sub
Private Sub Form_Load()
End Sub
二
.
学生信息维护模块的设计和实现
< /p>
此模块包括学生信息的添加,修改,删除。也包括教师密码
的修改
。
界面分三个界面,如下:
14
15
程序如下:
Private Sub Command1_Click()
If <>
If Then
MsgBox
您输入的学号不存在
!
=
us
Else
Source
=
*
from
成绩表
where
学号
='
d = False
d = False
d =
False
d = False
h
End If
Else
Source =
成绩表
d = True
d = True
d = True
d = True
16
h
End If
End
Sub
Private Sub Command10_Click()
us
Dim wherestring As
String
If <>
If
Then
MsgBox
您输入的学生不存在
ElseIf =
按姓名
wherestring =
姓名
='
ElseIf =
按学号
wherestring =
学号
='
End If
Else
wherestring =
End If
Source =
成绩表
wherestring
h
End Sub
17
Private Sub
Command11_Click()
Dim t As Integer, n
As Integer, a As String
t = 0
n = 0
For i = 1 To Count
a = (2).Value
If a =
男
t = t + 1
Else
n = n + 1
End If
xt
Next i
= t
= n
End Sub
Private Sub
Command12_Click()
Source
=
* from
成绩表
order
by
高数成绩
h
h
rst
18