学生信息管理系统(周春燕).doc

学生信息管理系统(周春燕)

———————————————————————————————— 作者：
———————————————————————————————— 日期：

2

个人收集整理 勿做商业用途
六安职业技术学院

学生信息管理系统

Student Information Management System

指导教师： 吴永林
专业名称: 计算机应用技术
研究方向： 简单快捷的管理学生信息
所在系部： 信息工程系

二○一一年六月

- 1 -

毕业论文（设计）开题报告
姓名
周春燕
班级
Wj0801
指导教师
吴永林
学号
082847
毕业论文（设计）题目
学生信息管理系统
对于当今大学校园内的学生信息管理来说,其数据量大,各种信息管理内容复杂，查询和管理校园内的学生信息等工作由人工完成将是很累的，这种管理手段已不能适应时代的发展，因为它浪费了许多的人力和物力.但是一直以来人们使用传统人工的方式管理学生信息，这种管理方式存在着许多缺点，如效率低等，另外,时间一长，将产生大量的文件和数据，这给查找和更新带来不少的困难.不仅浪费了许多人力物力资源,而且还很容易出现差错，有一个符合要求的软件对其进行智能化的学生信息管理是最好不过的，节省了人力物力资源，并且对各种信息的把握和操作也更加方便了，对所有信息有了一个全局的掌握.
我选择设计这个系统主要原因有:
一是：我熟悉学校的学生信息管理工作，进行需求分析时比较方便;
二是:学习了关于系统设计的一些课程，在此我设计了关于学生信息管理的系统，希望能够有所用处。
三：该系统可以存储历届的学生信息，安全、高效；
五:查找信息速度快、效率高,可以检索有条件信息。
通过本论文课题的研究,预计达到:
界面设计美观； 数据存储安全、可靠； 信息分类清晰、准确；
保证数据查询的灵活性； 操作简单易用、易维护性；
占用资源少、对硬件要求低。
具体安排进度：
2011年3月1日—30日，选好课题,查找资料，编写提纲；
2011年4月1日—20日,了解论文的格式，咨询指导老师从哪方面入手，进行写的状态形成初稿,形成初稿;
2011年4月21日-5月10日，提交初稿，在指导老师的指导下，形成二稿；
2011年5月11日-5月31日，提交二稿，在老师的指导下修改定稿并准备答辩.

毕业论文（设计）开题报告成绩评定表
指导
教师
意见

指导教师签名： 年 月 日
开题报告答辩评语及成绩
（百分制）

教研室主任签名： 年 月 日
系部
意见

系部签字盖章： 年 月 日

毕业论文(设计）成绩评定
指
导
教
师
意
见

答
辩
专
家
组
意
见

系
专
业
教
学
委
员
会
意
见

摘要
对于当今大学校园内的学生信息管理来说，其数据量大,各种信息管理内容复杂，查询和管理校园内的学生信息等工作由人工完成将是很累的，这种管理手段已不能适应时代的发展，因为它浪费了许多的人力和物力。在信息化时代,学生信息管理越来越信息化,简单方便的管理学生信息越来越得到大部分学校的关注，因此研究学生信息的管理越来越显重要。本课题主要运用了Visual Basic和Microsoft visual studio 2005语言研究学生信息管理系统，详细分析了学生信息的添加、删除、修改以及查询等技术。
关键字：信息管理 Visual Basic Microsoft visual studio 2005

Abstract
University school for today student information management， its data capacity, the complexity of the various information management, query and management of campus information for students to complete the work by hand would be tired， and this management tool can not meet the development of the times, because it wasted a lot of manpower and material resources. In the information age， more and more information student information management， simple management of student information has increasingly gained attention in most schools， so the research student information management increasingly important。 The main subject of the use of Visual Basic and Microsoft visual studio 2005 Language student information management system, a detailed analysis of student information to add， delete, modify and query technologies. 文档为个人收集整理,来源于网络文档为个人收集整理，来源于网络
Key Words： Information management Visual Basic Microsoft visual studio 2005
目 录
引言…………………………………………………………………3
第一章：系统开发技术简介……………………………………………4
1。1 Visual Basic 语言概述
1。2 SQL server 2005技术简介
1。3 运行环境
第二章 数据库设计…………………………………………………………5
2.1 数据库概要说明
2.2 数据库逻辑设计
第三章 系统详细设计………………………………………………………7
3。1与数据库连接的实现
3.2 登录与主程序界面的设计
3.3 添加新用户模块
3。3。1添加学生信息
3。3.2添加学生成绩信息
3。4 信息查询模块
3。4.1学生信息查询模块
3.4。2学生课程查询模块
3。4。3学生成绩查询模块
3.5修改模块
3。5.1修改学生信息模块
3.5.2修改学生成绩模块
3。6删除信息
3.6。1删除学生信息
3。6。2删除学生成绩信息
第四章 结束语………………………………………………………………19
第五章 致谢………………………………………………………………20
参考文献………………………………………………………………21
引言
随着全球信息化的飞速发展，学生信息管理系统已经成为各大校园的一项重要内容,学生信息管理的简便性、可靠性、完整性和安全性是一个非常重要的问题，更是校园生存力和竞争力的重要体现,信息管理越来越为众多校园所关注。
以前各个学校的学生信息管理基本上都是靠手工进行，随着各个学校的规模增大，有关学生信息管理工作所涉及的数据量越来越大,有的学校不得不靠增加人力、物力来进行学生信息管理。但手工管理具有效率底、易出错、检索信息慢、对学校的管理提供决策信息较为困难等缺点。在学校学习了关于系统设计的一些课程，在此我设计了关于学生信息管理的系统，希望能够有所用处，也将自己所学的运用于实际中。
总之，本系统使用的Microsoft visual studio 2005和Visual Basic的开发语言。详细介绍了学生信息管理系统从技术及运行环境、系统分析、数据库设计、总体设计和详细设计的全部过程。实现一个管理信息系统的方法。作为毕业论文设计，由于时间比较紧张，加上自己没有过系统开发的经验，它肯定存在一些不足的地方，希望老师给与指导.本人将再接再厉在原来的基础上，更加完美的完成此次设计.

· 21 ·
第一章 系统开发技术简介
1。1 Visual Basic 语言概述
Visual Basic 是一种可视化、面向对象和采用事件驱动方式的结构化高级程序设计语言，可用于开发Windows环境下的各类应用程序.它简单易学、效率高、且功能强大.Visual Basic 语言用其设计应用程序时具有两个基本特点：可视化设计和事件驱动编程.
1。2 SQL server 2005技术简介
SQL(Structured Query Language）是一种通用的关系型数据库的编程语言，是一组命令的集合,包括关系型数据库的建立、维护和查询等操作，已成为关系型数据库普遍使用的标准。
Mircrosoft SQL Server 2005是一个应用广泛的数据库管理系统，具有许多显著特点。
SQL语言是一种非过程化的语言。
SQL是所有关系数据库的公共语言.
SQL语言非常简洁。
SQL语言可以直接以命令方式使用。
1。3运行环境
为了保证宿舍卫生检查管理信息系统运行的效率和可靠性，运行要求如下：
硬件平台：
² CPU：Pentium Ⅲ及其兼容处理器,建议主频600MHz或更高
² 内存：512MB以上
软件平台：
² 操作系统：Windows 2005 Server SP4、Windows 2005 Advanced Server SP4、Windows 2005 Date Center Server SP4、 Windows Server 2003 SP1、Windows 2003企业版SP1、Windows 2003数据中心版SP1
² 数据库：SQL Server 2005
² 分辨率:最佳效果1024*76
第二章 数据库设计
2.1 数据库概要说明
本系统采用的是SQL server 2005数据库,系统数据库命名为“学生信息管理”，数据库用来存储学生信息、课程信息、用户信息等，在该数据库中包含4张表,下面给出数据表的概要说明和主要数据表的结构定义。
表4—1 数据表的对照表
表名
说明
Stu
用来保存学生信息
xk
学生的选课信息
kc
学生的课程信息
yh
用户及密码
Cj
学生的成绩信息
2.2 数据库逻辑设计
系统数据库中各表的结构如下。
（1)yh信息表
用户信息表用来保存用户和密码
Yh表
说明：用户信息表
字段名
类型
大小
主键
空值
默认
描述
user_ID
char
10

Y

user_PWD
char
10

Y

(2）xk信息表
选课信息表用于存储选课信息以及成绩相关信息，其中“kch”,为主键，包括“kch”、“xh"、“cj”字段，其结构表如表所示

Xk表
说明：选课信息表
字段名
类型
大小
主键
空值
默认
描述
xh
char
10
Y

kch
char
4

Y
‘无’

cj
char
10

Y
‘无'

(3）stu信息表
stu信息表用来存储学生信息，其中“xh”为主键，包括“xb”、“xm"、“age”、“bj”、字段，其结构表如表4-8所示
表4—8 stu的表结构
Stu表
说明：stu信息表
字段名
类型
大小
主键
空值
默认
描述
xh
char
4
Y

xm
char
10
Y

xb
char
10

Y
‘无’

age
char
30

Y
‘无'

Bj
char
20

Y
‘无’

（4)kc信息表
kc信息表用于保存kc信息，其中“kch”为主键，包括“kch”、“kcm”、“teacher”、字段，其结构表如4
表4—9 kc的表结构
Kc表
说明：kc信息表
字段名
类型
大小
主键
空值
默认
描述
kch
char
8
Y

kcm
char
4

teacher
char
10

‘0'

（5）cj表
Cj表用来保存cj信息,期中xh为主键
学生成绩信息
字段名
类型
大小
主键
空值
默认
描述
Xh
Char
10
Y

Xm
Char
10

平时成绩
Char
10

期中成绩
Char
10

期末成绩
Char
10

第三章 系统详细设计
3。1与数据库连接的实现
(1）附加数据库
打开Microsoft visual studio 2005，然后在左侧的“数据库”图标上右击，单击弹出菜单上的[所有任务]|［附加数据库］命令，在弹出的对话框中，单击［浏览］,选择路径F:\信息管理系统文件，最后单击［确定］，附加数据库成功。数据库配置如图5-1所示

图5-1 数据库配置
(2)通过SQL脚本生成数据库
用查询分析器打开F：\信息管理系统 文件，单击执行就会生成相应的表。这样可以生成一个数据清空的数据库，用户可以设置自己的基础数据。
3。2 登录与主程序界面的设计
(1）登录模块
启动程序以后,首先进入登录界面，系统登录主要用于对登录学生管理信息系统的用户进行安全性检查，以防止非法用户登录该系统。登录界面如图5-2所示。登录界面主要实现以下功能:
以文本框的形式显示系统用户
登录和密码验证成功后，进入系统主界面
输入密码错误，提醒登录给出错误

登录界面
输入用户名和密码以后，单击[确定］，这时应该设计程序验证输入的用户名和密码与数据库中保存信息的差别,若相同则进入系统，否则给出错误提示信息。本系统的登录设计对用户输入用户名和密码的次数进行限制，从而增加了系统的安全性。这部分代码如下:
Imports System.data
Imports System。Data。SqlClient
Dim cn As SqlConnection, da As SqlClient。SqlDataAdapter, ds As New DataSet
cn = New SqlConnection()
cn。ConnectionString = ”server=.；initial catalog=信息管理;user id=sa;pwd=123456"
cn。Open（)
da = New SqlClient.SqlDataAdapter（"select * from yh where yhm='” ＆ TextBox1.Text ＆ "’and mm=’" ＆ TextBox2.Text ＆ ”’”, cn)
da.Fill（ds, ”yh”）
If ds。Tables(0）.Rows.Count 〉 0 Then
MsgBox(”right”）
main.Show(）
Me。Finalize()
Else
MsgBox（”你输入的用户名和密码错误")
End If
（2）主程序界面
运行程序首先看到的是登录界面，如图5—2所示。输入用户名和密码，单击［确定］,进入主窗体界面，如图5—3所示

3.3 添加新用户模块
3。3。1添加学生信息

首先完成新用户注册的功能,输入需要创建的信息后，单击图5-4左侧的[确认]按钮,就可以修改成功。这部分代码如下:
Private Sub Button1_Click(ByVal sender As System。Object， ByVal e As System。EventArgs） Handles Button1。Click
Dim cn As New SqlClient.SqlConnection, cm As New SqlClient。SqlCommand
cn.ConnectionString = "server=。；initial catalog=信息管理；user id=sa；pwd=123456”
cn。Open（)
cm。Connection = cn
cm。CommandType = CommandType。Text
If RadioButton1。Checked = True Then
cm.CommandText = "insert stu values（’" ＆ TextBox1.Text & ”’，'” & TextBox2.Text & "'，’男'，'” & ComboBox1.SelectedItem ＆ ”',’” & TextBox3。Text ＆ ”')"
Else
cm。CommandText = ”insert stu values('" ＆ TextBox1。Text & ”’，’” & TextBox2.Text ＆ ”','女','" ＆ ComboBox1。SelectedItem & ”’,'” ＆ TextBox3。Text & ”'）"
End If
cm。ExecuteNonQuery（）
MsgBox(”添加成功”)
End Sub
3。3。2添加学生成绩信息

Dim cn As New SqlClient.SqlConnection， cm As New SqlClient.SqlCommand
cn.ConnectionString = ”server=。;initial catalog=信息管理；user id=sa;pwd=123456”
cn.Open()
cm.Connection = cn
cm.CommandType = CommandType.Text
cm.ExecuteNonQuery（)
MsgBox("添加成功”)
3.4。 信息查询模块
3。4.1 学生信息查询模块
在主界面中用户单击工具栏上的按钮，就可以看到学生信息的界面，如图5-6所示.用户可以在这个界面上分别按照学号等信息
在学生查询窗体中实现查询学生信息的功能，窗体如图5—6所示。

选择查询类型，填入查询内容，单击［查询]，就能完成相应的查询。这部分代码如下：
Private Sub Button1_Click(ByVal sender As System.Object， ByVal e As System。EventArgs） Handles Button1。Click
Dim cn As SqlConnection, da As SqlDataAdapter, ds As New DataSet
cn = New SqlConnection(）
cn.ConnectionString = ”server=。；initial catalog=信息管理；user id=sa；pwd=123456”
da = New SqlDataAdapter（”select ＊ from stu where xh=’" & TextBox1.Text ＆ "’"， cn)
ds。Clear()
da.Fill（ds, "stu")
If ds。Tables（0)。Rows.Count 〉 0 Then
Me。DataGridView1.Refresh（)
Me.DataGridView1。DataSource = ds
Me。DataGridView1.DataMember = "stu"
Else
MsgBox（”没有此学号”）
End If
End Sub
3.4.2 学生课程查询模块

Dim cn As New SqlConnection, da As SqlDataAdapter， ds As New DataSet
cn。ConnectionString = "server=.;initial catalog=信息管理；user id=sa；pwd=123456”
cn。Open()
da = New SqlClient。SqlDataAdapter（"select * from kc”, cn)
ds.Clear()
da。Fill（ds， "kc"）
学生课程.Show（)
3。4。3 学生成绩查询模块

Dim cn As New SqlConnection, da As SqlDataAdapter, ds As New DataSet
cn.ConnectionString = ”server=。;initial catalog=信息管理;user id=sa；pwd=123456”
cn。Open()
da = New SqlClient。SqlDataAdapter(”select ＊ from cj"， cn）
ds。Clear(）
da。Fill(ds， ”cj”)
学生成绩.Show（）
3．5修改模块
3.5．1 修改学生信息模块
在修改学生信息窗体中实现修改学生信息的功能，如图所示。

这段代码如下：
Private Sub Button1_Click（ByVal sender As System。Object, ByVal e As System.EventArgs) Handles Button1。Click
Dim cm As New SqlCommand
cm。Connection = cn
cm.CommandType = CommandType.Text
cm。CommandText = ”update stu set xm='" & TextBox1.Text ＆ ”',xb=’” & TextBox2。Text ＆ "'，bj='” & TextBox3。Text & ”’where xh='” & ListBox1.SelectedItem & ”'"
cm。ExecuteNonQuery（）
MsgBox（”修改成功”)
End Sub
3.5.2修改学生成绩信息

Imports System.Data
Imports System.Data.SqlClient
Public Class 修改学生成绩
Dim cn As New SqlClient.SqlConnection， da As SqlDataAdapter, ds As New DataSet
Private Sub 修改学生成绩_Load(ByVal sender As System.Object， ByVal e As System.EventArgs） Handles MyBase。Load
cn.ConnectionString = ”server=.；initial catalog=信息管理；user id=sa;pwd=123456”
cn。Open（）
da = New SqlClient。SqlDataAdapter（"select ＊ from cj", cn）
da.Fill（ds, ”cj")
Dim sno As String, n As Integer， i As Integer = 0
n = ds.Tables（0).Rows。Count
For i = 0 To n — 1
sno = ds。Tables（0）.Rows(i）（"xh”）
ListBox1。Items。Add（sno）
Next
ListBox1。SelectedIndex = 0
TextBox1.Text = ds.Tables(0）.Rows（0)(”xm”)
TextBox2。Text = ds.Tables(0).Rows（0)（”xb”)
TextBox3.Text = ds。Tables（0）.Rows(0）（"kc”）
TextBox4。Text = ds。Tables(0）.Rows(0）（”平时成绩")
TextBox5.Text = ds.Tables(0)。Rows(0)（"期中成绩"）
TextBox6.Text = ds。Tables（0）。Rows（0)（"期末成绩"）
End Sub
Private Sub ListBox1_SelectedIndexChanged（ByVal sender As System.Object, ByVal e As System。EventArgs) Handles ListBox1。SelectedIndexChanged
Dim i As Integer
i = ListBox1。SelectedIndex
TextBox1.Text = ds。Tables(0）.Rows(i）（"xm")
TextBox2.Text = ds。Tables（0）.Rows(i)（”xb”)
TextBox3。Text = ds。Tables（0）.Rows(i)("kc"）
TextBox4。Text = ds。Tables（0)。Rows（i）（”平时成绩")
TextBox5。Text = ds。Tables(0）。Rows(i）("期中成绩”)
TextBox6.Text = ds。Tables(0).Rows（i)（"期末成绩"）
End Sub
Private Sub Button1_Click（ByVal sender As System。Object， ByVal e As System。EventArgs) Handles Button1。Click
Dim cm As New SqlCommand
cm.Connection = cn
cm.CommandType = CommandType。Text
cm。CommandText = "update stu set xm=’" ＆ TextBox1。Text ＆ ”'，xb='” & TextBox2。Text ＆ ”’，kc='” ＆ TextBox3。Text ＆ "’,平时成绩='" ＆ TextBox4。Text ＆ ”',期中成绩=’” & TextBox5。Text ＆ ”'，期末成绩='" ＆ TextBox6.Text ＆ "'，"
cm。ExecuteNonQuery（)
MsgBox（"修改成功"）
End Sub

Private Sub Button2_Click（ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2。Click
Me。Close（)
End Sub
End Class
3。6删除信息
3.6。1删除学生信息
在主界面中用户单击[删除管理]项，进入到删除信息的界面，如图所示.在这个界面中，可以删除信息。

这段代码如下：
cn。ConnectionString = "server=。;initial catalog=信息管理；user id=sa;pwd=123456”
cn.Open()
da = New SqlClient.SqlDataAdapter("select ＊ from stu"， cn)
da。Fill（ds, ”stu"）
Dim cm As New SqlClient.SqlCommand
cm。Connection = cn
cm。CommandType = CommandType.Text
cm.CommandText = "delete stu where xh=’" & TextBox1。Text ＆ ”’”
cm.ExecuteNonQuery（）
MsgBox（”删除成功")
3.6.2删除学生成绩信息

cn.ConnectionString = ”server=。;initial catalog=信息管理;user id=sa；pwd=123456”
cn。Open（)
da = New SqlClient.SqlDataAdapter（”select ＊ from cj"， cn）
da。Fill(ds, ”cj")
Dim cm As New SqlClient。SqlCommand
cm.Connection = cn
cm。CommandType = CommandType.Text
cm。CommandText = ”delete cj where xh=’" ＆ TextBox1。Text & "'"
cm.ExecuteNonQuery（)
MsgBox(”删除成功")

第四章 结束语
经过设计和开发，学生信息管理系统基本开发完毕。其功能基本符合用户需求，能够完成管理主界面与登录程序设计，用户方便进行数据添加、数据查询、数据修改。
通过这次设计，使我学到了很多东西，收益非浅，我感觉理论到实践是一个艰难的过程，必须勤动手,才能发现问题，使自己得到真正的提高。经过了这次的设计使我学到了很多知识，给我今后在工作和学习上也提供了不少宝贵的经验。并且通过这次做设计也使我也发现了自己在学习上的不足，主要是动手能力的不足，我会努力在以后的工作道路上继续充实自我，完善自我。但在这次设计中的最大收获并不是掌握这几门开发工具的应用，而是学会了设计系统的思维方法。

第五章 致谢
时光匆匆如流水，转眼便是大学毕业时节，春梦秋云，聚散真容易。离校日期已日趋临近，毕业论文的的完成也随之进入了尾声。
本篇论文件是在吴老师的精心指导和大力支持下完成的。吴老师以其严谨求实的治学态度、高度的敬业精神、兢兢业业、孜孜以求的工作作风对我产生了深刻的影响。在此，表示深深的谢意！
在离开这个美丽的校园之际，我想向曾经给我帮助和支持的人们表示衷心的感谢。首先要感谢我的老师,他在学习上给了我大量的指导，让我学到了知识。在此祝愿他身体健康，全家幸福!
感谢同室的宿友们，她们是我学习、工作和生活上的伙伴.感谢我的辅导员，全班同学,从他们身上，我学到很多东西,和他们在一起的日子是读书期间快乐的时光。
感谢我的朋友们,他们给了我无数的关心和鼓励，也让我的学习生活充满了温暖和欢乐。我非常珍视和他们的友谊!
感谢生我养我的父母，他们给了我无私的爱，我深知他们为我求学所付出的巨大牺牲和努力,而我至今仍无以为报。祝福他们,以及那些给予我关爱的长辈,祝他们幸福、安康！在未来的日子里，我会更加努力的学习和工作，不辜负父母对我的殷殷期望!我一定会好好孝敬和报答他们！

参考文献
Visual Basic6。0 数据库开发与专业应用 敬铮 国防工业出版社
Visual Basic6.0 数据库程序设计高手 温贤发 科学出版
面向对象程序设计系列教材 龚沛曾 高等教育出版社
Visual Basic6。0 编程实例解析 何文俊