学生信息管理系统.docx

1、学生信息管理系统伊犁师范学院信管12-4班学生大作业（设计）论 文 题 目：小型学生信息管理系统学 生 姓 名：杨亚龙系 别：电子与信息工程学院专 业：信息管理与信息系统学 号：12210314007指 导 教 师：帕丽旦定 稿 时 间：2012年12月16日 目录系统分析 21.开发本程序的运行环境 22.程序整体架构 23. 数据库设计 43.1数据库的选择 432数据库结构设计 44. 详细设计 54.1主要界面设计 54.2 主要程序代码设计 85. 设计总结 11致谢 13参考文献 13小型学生信息管理系统杨亚龙（伊犁师范学院信息管理与信息系统12-4，新疆 伊宁市 835000）系

2、统分析：本程序面向对象开发工具Visual Basic6.0和数据库设计软件Access 2000开发了小型学生信息管理程序。该大学生小型学生信息管理程序主要实现以下5个功能模块：密码模块, 可以登陆、退出；用户管理模块，用户名，密码修改；学生基本信息管理模块，可以对学生的基本信息进行查找、添加、删除、打印等操作；学生成绩信息管理模块，可以对学生的成绩信息进行查找、添加、删除、打印等操作；学生综合素质测评信息管理模块，可以对学生的综合素质信息进行查找、添加、删除、打印等操作； 1 开发本程序的系统运行环境客户端的要求不是很高，其运行环境要求如下： 处理器：Intel Pentium（R）Dua

3、l_Core 或更高内存：1G以上硬盘空间：2GB显卡：NVIDIA GeForce G 105M 显示适配器或更高操作系统：Windows2003/XP数据库：Microsofr Access 20032. 程序整体构架小型学生信息管理程序的目的在于实现小型学生信息无纸化记录，这设计所实现的功能即结构可以一下所示的界面来描述图1 系统模块图3.数据库设计3.1 数据库的选型随着计算机技术的发展，数据库越来越显示出其强大的数据存储和数据管理功能。目前，所使用的数据库类型较多，这设计采用了Microsoft Access2003，它是运行于windows系列平台之上的具备了多媒体于开放性的数据库

4、系统，它的直观性、开放性、易用性以及功能强大的特点成为目前很受欢迎的数据库软件。3.2 数据结构设计本系统使用Access 作为数据库管理系统。在Access中新建一个库，命名为db1.mdb。这个库里面建立四个表。它们分别设计如附表所示。图2学生成绩信息表图3学生基本信息表图4学生综合素质测评表4. 详细设计4.1 主要界面设计4.1.1 登陆窗体界面的设计登录模块可以输入用户名各密码后进入本程序。界面如图所示：4.1.2学生信息管理模块主界面设计在界面上主要对实现其它模块界面的查寻。界面如图所示：4.1.3 学生基本信息查询管理模块在本模块中，主要是为学生的基本信息浏览提供方便，可以实现查

5、找、添加、删除、打印记录等操作。界面如下图所示：4.1.4学生成绩信息管理模块在本模块中，主要是对学生成绩信息的浏览提供方便，可以实现查找、添加、删除、打印记录等操作。界面如下图所示：4.1.5学生综合素质测评信息管理模块在本模块中，主要是对学生综合素质信息的浏览提供方便，可以实现查找、添加、删除、打印记录等操作。界面如下图所示：4.1.6用户信息管理模块在此模块中主要实现对用户信息的添加修改等操作。界面如图所示： 4.2 主要程序代码的编写4.2.1 登录窗体界面的代码:Private Sub Command1_Click()Do While Data1.Recordset.EOF = Fa

6、lseIf Data1.Recordset.Fields(0) = Text1.Text And Data1.Recordset.Fields(1) = Text2.Text Then Module2.qx = Data1.Recordset.Fields(2) MDIForm1.Show Me.HideAction = MsgBox(成 功 登 陆, vbOKOnly, 登 陆)Form1.HideForm3.ShowModule1.name1 = Text1 模块1赋值，用于公共应用Exit DoElse Data1.Recordset.MoveNext End IfLoopIf Data

7、1.Recordset.EOF = True ThenAction = MsgBox( 你输入的信息有误，请重新输入！, vbOKOnly, 温馨提示) 消息框的写法Text1.Text = Text2.Text = Text1.SetFocus text1获取焦点End IfEnd Sub4.2.2 退出代码Private Sub Command2_Click() EndEnd Sub4.2.3 时间显示与动态字体代码：Private Sub Timer1_Timer()a = Now()Label1.Caption = aIf (Form1.Width - Label5.Left) 100

8、 ThenLabel5.Move Label5.Left + 100ElseLabel5.Move 0End IfEnd Sub4.2.4学生信息主界面模块代码Private Sub Command1_Click()Form2.ShowForm3.HideEnd SubPrivate Sub Command2_Click()Form4.ShowForm3.HideEnd SubPrivate Sub Command3_Click()Form5.ShowForm3.HideEnd SubPrivate Sub Command4_Click()EndEnd Sub4.2.5学生信息查询代码Priv

9、ate Sub Command9_Click()Dim a As Stringa = InputBox(请输入学号, 查找信息)If a = ThenExit SubEnd IfAdodc1.Recordset.Find 学号= & a & If Adodc1.Recordset.EOF ThenMsgBox 查无此记录End IfEnd Sub4.2.6打印代码Private Sub Command6_Click()DataReport1.ShowEnd Sub4.2.7删除记录代码Private Sub Command9_Click()删除记录的方法Action = MsgBox(是否删除

10、?, vbYesNo, 删除记录)If Action = vbYes ThenAdodc1.Recordset.DeleteAdodc1.Recordset.MovePreviousEnd IfEnd Sub5. 设计总结经过一学期对vb课程的学习，自己开发了这款小型的学生信息管理系统，其功能基本符合用户要求，能够完成信息的查询、存储、修改、添加等功能。在这一段时间里，自己认为学到了好多东西，对程序开发知识的学习有了进一步的提高。由于目前自己在程序开发方面的知识能力有限，所以开发出的本系统在功能上和美观上等方面还有些不理想的地方，信息出错处理不够人性化等方面问题都有待于进一步改善。致谢在系统开

11、发的这一段日子里，我受到了帕丽旦老师的指导，帕老师在这一段时间里耐心的指导我完成本系统的开发，帕老师严谨的指导态度与深厚的理论知识都让我收益非浅，从她身上学到了很多东西，无论是理论还是实践都使我的知识有很大的提高，在此我提出感谢，同时也感谢那些对我提供帮助的同学们，他们的支持使我顺利的完成了本系统的开发。参考文献：1 王平，王俊玲.Visual Basic数据程序设计教程M.武汉：华中科技大学出版社.2 工晟，韩泽坤.Access 经典案例解析M.北京：清华大学出版社.3 刘晓华.Visual Basic多媒体编程精编16讲M.北京：电子工业出版社.4 张军安.Visual Basic 应用基础教程M.西安：西北工业大学出版社.