VB设计报告学生管理系统Word格式.docx
- 文档编号:7917954
- 上传时间:2023-05-09
- 格式:DOCX
- 页数:25
- 大小:380.07KB
VB设计报告学生管理系统Word格式.docx
《VB设计报告学生管理系统Word格式.docx》由会员分享,可在线阅读,更多相关《VB设计报告学生管理系统Word格式.docx(25页珍藏版)》请在冰点文库上搜索。
一个数据库中,包含了许多条记录,而每条记录是由多个字段所组成,不同的字段存放着不同的数据。
所以数据库的严格定义是一组相关记录的集合,而字段则是最基本的数据项,也是数据库中最小的单位。
在计算机中帮我们管理数据库的系统,我们称之为数据库管理系统。
数据库管理系统是架构在一个或多个数据库之上,并针对数据库中的数据进行管理运用。
Access的优点在于它能使用数据表示图或自定义窗体收集信息,数据表示图提供了一种类似于Excel的电子表格,可以使数据库一目了然。
另外,Access允许创建自定义报表用于打印或输出数据库中的信息。
Access也提供了数据存储库,可以使用桌面数据库文件把数据库文件置于网络文件服务器,与其他网络用户共享数据库。
如上所述,Access作为关系数据库开发具备了许多优点,可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。
1.2编程环境的选择
1.2.1VisualBasic.NET编程环境
系统使用环境
操作系统:
WindowsXP
系统支持:
VisualBasic.NET
数据库:
Access
系统开发环境
VisualBasic2008
二、流程设计
2.1系统流程图设计
2.1.1VB.NET流程设计
设计学生管理系统首先需要一个总体流程(如图2-1),就是对学生管理系统的设计方案。
(图2-1)
2.1.2Access2003流程设计
数据库在本学生管理系统中占有非常重要的地位,数据库结构的好坏将直接对应用系统的效率以及实现的效率产生影响。
合理的数据库及结构设计可以提高数据存储的效率,保证数据的完整和一致。
同时合理的数据库结构也将有利于程序的实现。
设计本系统的数据库应该充分满足用户的需求。
针对一般学生管理系统的需求,通过对学生学习过程的内容的分析,设计如下面所示的数据项和数据结构。
我们根据课程需求,建立两个表:
学生信息表、学生成绩表.如下图:
图2.2建立数据库
(1)学生信息表:
包括的字段有:
学号,姓名,性别,班级,出生日期,联系方式,家庭住址。
表2.1基本信息表
字段名称
数据类型
字段大小
学号
文本
20
姓名
性别
联系方式
班级
家庭住址
出生日期
日期/时间
50
(2)学生成绩表:
包括的字段有:
学号,姓名,性别,班级,高数成绩,英语成绩,计算机成绩。
表2.2成绩表
英语
V
数据库
C语言
网络
历史
时事政策
表2.3学生成绩
表2.4学生信息
通过建立的学生信息表和学生成绩表作为后台来连接前台的VisualBasic6.0来实现整个系统。
三、具体的设计过程
3.1登陆和进入界面
3.1.1用户登陆管理界面
首先是进入登陆界面,如图2.2.1所示,本窗体显示系统名称,密码校验等信息,本系统的用户分为两类:
教师,学生。
使用者可以在组合框中选择所要登录的用户的类型,并输入相应的用户名和密码,单击“确定”就会将输入提交给系统以验证用户、密码及身份。
如果用户类型及密码正确,则会进入系统的MDI主窗体(MDIMain.frm)
.登陆流程图如下:
图3.1流程图
图3.2登陆界面
登陆用户的代码:
StaticnAsInteger
IfMe.RadioButton1.CheckedThen
IfMe.TextBox1.Text="
"
AndMe.TextBox2.Text="
Then
MsgBox("
帐号或密码不能为空,请从新输入!
0+16,"
提示"
)
Me.TextBox1.Focus()
ElseIfMe.TextBox1.Text="
teacher"
请输入密码!
0+64,"
Me.TextBox2.Focus()
ElseIfMe.TextBox1.Text<
>
"
AndMe.TextBox2.Text<
111"
帐号或密码错误,请从新输入!
Me.TextBox1.Text="
Me.TextBox2.Text="
n+=1
Ifn=3Then
Me.Close()
EndIf
密码错误,请从新输入!
提示!
用户界面.Show()
Me.Hide()
IfMe.RadioButton2.CheckedThen
student"
222"
用户界面.信息录入ToolStripMenuItem.Enabled=False
用户界面.信息删除ToolStripMenuItem.Enabled=False
用户界面.信息修改ToolStripMenuItem.Enabled=False
取消代码:
Me.TextBox2.Text="
Me.TextBox1.Focus()
退出代码:
DimmsgAsInteger
msg=MsgBox("
是否退出?
MsgBoxStyle.YesNo)
Ifmsg=6Then
Me.Close()
Else
Me.Show()
EndIf
3.1.2用户进入界面
用户进入界面可对成绩的管便捷我们添加了切换用户的功能,然后可以对学生成绩管理进行操作。
用户进入界面图如下:
图3.3进入界面
该窗体添加了菜单控件
控件。
文件菜单中的切换用户代码:
登录窗口.Show()
Me.Hide()
登录窗口.TextBox1.Text="
登录窗口.TextBox2.Text="
登录窗口.TextBox1.Focus()
End
学生信息和学生成绩菜单中子菜单的代码:
1、信息录入进入窗体代码:
Dim信息录入AsNew信息录入
信息录入.MdiParent=Me
信息录入窗口.Show()
2、信息删除进入窗体代码:
Dim信息删除AsNew信息删除
信息删除.MdiParent=Me
信息删除窗口.Show()
3、信息修改进入窗体代码:
Dim信息修改AsNew信息修改
信息修改.MdiParent=Me
信息修改窗口.Show()
4、信息查询进入窗体代码:
Dim信息查询AsNew信息查询
信息查询.MdiParent=Me
信息查询窗口.Show()
5、成绩录入进入窗体代码:
Dim成绩录入AsNew成绩录入
成绩录入.MdiParent=Me
成绩录入窗口.Show()
6、成绩删除进入窗体代码:
Dim成绩删除AsNew成绩删除
成绩删除.MdiParent=Me
成绩删除窗口.Show()
7、成绩修改进入窗体代码:
成绩修改窗口.Show()
8、成绩查询进入窗体代码:
Dim成绩查询AsNew成绩查询
成绩查询.MdiParent=Me
成绩查询窗口.Show()
根据实际情况来设计,添加timer控件来显示当前时间、当前日期。
当前日期、时间代码:
Me.ToolStripStatusLabel1.Text="
当前时间:
&
Today.Date
Me.ToolStripStatusLabel2.Text="
TimeOfDay
3.2学生成绩管理系统
3.2.1学生成绩查询
图3.4成绩查询
该窗体添加了DataGridview控件来实现数据库与VB的连接,与数据库连接还需要依次添加了以下几个控件,与数据库连接。
,并添加了两个RadioButton控件,分别添加了4个button,查询、取消、刷新、返回。
查询代码:
DimsssAsString
Me.OleDbConnection1.Open()
sss="
Select*from学生成绩表where学号='
Me.TextBox1.Text&
'
Me.OleDbDataAdapter1.SelectCommand.CommandText=sss
Me.OleDbDataAdapter1.SelectCommand.ExecuteNonQuery()
Me.DataSet91.Clear()
Me.OleDbDataAdapter1.Fill(Me.DataSet91)
Me.OleDbConnection1.Close()
Select*from学生成绩表where姓名='
Me.TextBox2.Text&
刷新代码:
Select*from学生成绩表"
EndSub
3.2.2学生成绩录入
图3.5成绩录入
该窗体添加了DataGridview控件来实现数据库与VB的连接,与数据库连接还需要依次添加如下控件。
,还有各科的textbox,一个添加按钮。
添加代码:
insertinto学生成绩表(学号,姓名,VB,C语言,网络,数据库,历史,英语)values('
'
"
Me.TextBox3.Text&
Me.TextBox4.Text&
Me.TextBox5.Text&
Me.TextBox6.Text&
Me.TextBox7.Text&
Me.TextBox8.Text&
)"
Me.OleDbDataAdapter1.InsertCommand.CommandText=sss
Me.OleDbDataAdapter1.InsertCommand.ExecuteNonQuery()
Me.DataSet61.Clear()
Me.OleDbDataAdapter1.Fill(Me.DataSet61)
Me.OleDbConnection1.Close()
3.2.3成绩删除
图3.6成绩删除
该窗体添加了DataGridview控件来实现数据库与VB的连接,与数据库连接还需要依次添加以下几个控件
一个删除按钮。
删除代码:
delete*from学生成绩表where学号=‘"
TextBox1.Text“‘
Me.OleDbDataAdapter1.DeleteCommand.CommandText=sss
Me.OleDbDataAdapter1.DeleteCommand.ExecuteNonQuery()
Me.DataSet81.Clear()
Me.OleDbDataAdapter1.Fill(Me.DataSet81)
3.2.4成绩修改
图3.6成绩修改
该窗体添加了DataGridview控件来实现数据库与VB的连接,与数据库连接还需要依次添加以下几个控件
,这次并添加了上一个、下一个、第一个、最后一个、修改按钮。
再将每个textbox绑定。
查看第一条记录代码:
Me.BindingContext(Me.DataSet11,"
学生成绩表"
).Position=0
查看最后一条记录代码:
Me.BindingContext(Me.DataSet11,"
).Position=Me.BindingContext(Me.DataSet11,"
).Count-1
查看下一条记录代码:
).Position+=1
查看上一条记录代码:
).Position-=1
成绩修改代码:
update学生成绩表setVB='
C语言='
网络='
数据库='
'
时事政策='
历史='
英语='
where学号='
Me.OleDbDataAdapter1.UpdateCommand.CommandText=sss
Me.OleDbDataAdapter1.UpdateCommand.ExecuteNonQuery()
Me.DataSet11.Clear()
Me.OleDbDataAdapter1.Fill(Me.DataSet11)
3.2.5学生成绩查询
图3.7成绩查询
和查询按钮
成绩查询代码:
Me.OleDbDataAdapter1.SelectCommand.ExecuteNonQuery()
Me.DataSet91.Clear()
Me.OleDbDataAdapter1.Fill(Me.DataSet91)
Me.OleDbConnection1.Close()
EndIf
3.3学生信息管理系统
3.3.1学生信息查询
图3.8信息查询
和查询按钮。
学生信息查询代码:
Select*from学生信息表where学号='
EndIf
3.3.2学生信息录入
图3.9信息录入
和录入按钮。
学生信息录入代码:
insertinto学生信息表(学号,姓名,性别,班级,出生日期,家庭地址,联系方式)values
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 设计 报告 学生 管理 系统