石家庄铁道大学四方学院集中实践报告书课题名称教务管理系统姓名学号系、部土木工程专业专业班级指导教师刘仁芬2015年6月25日※※※※※※※※※※※※※※※※※※※※※※※※2014级高级语言程序设计一、设计任务及要求:设计任务:教务管理系统的开发要求:①建立一个工程,将完成本题目创建的所有文件添加到工程中;②根据题目的要求建立数据库,库中建立所需的表。③数据表之间根据需要建立必要的联系。④用窗体设计一个漂亮的系统封面。⑤要求用窗体设计功能丰富的信息查询界面和查询结果的统计界面。⑥用主窗体上的菜单实现输入、查询、退出等功能项的选择。⑦将完成的全部内容生成一个.exe文件.二、指导教师评语:三、成绩指导教师签名:年月日教务管理系统的开发1选题的意义现今学校生源量大大增加,为方便管理,可采用计算机管理,更方便,快捷本系统根据教务管理的现状及未来的发展方向,结合有学校管理当中的管理学实践,设计了教务管理系统。本系统适用于教务处学生管理系统。系统数据的管理采用了操作系统的最新管理方式,用户操作将会更简单、更直观、更方便。系统中各业务管理模块可以单机独立运行。使用本系统,可以大幅度提教务管理的工作效率。2系统功能需求分析2.1系统概述该系统是以教务管理为基础开发的教务管理系统,适合大部分学校使用,该系统具有较高可靠性,教务管理系统包括教学管理,成绩管理,教材管理,学生查询等多项功能,方便教师学生快速的查询更改信息。2.2系统的组成及各模块的功能教务管理系统的组成主要包括以下几点功能:1.系统登录模块:用户名和密码2.用户注册模块:用户注册3.教学管理模块:学生名单、学生课程和教学任务4.成绩管理模块:成绩查询和成绩录入5.教材管理模块:教材入库和教材信息查询2.3系统的运行环境1.系统使用环境操作系统:Windows2000/XP系统支持:Visualbasic6.0及以上版本支持库数据库:Access。硬件环境:处理器;IntelPentium166MX或者更高。硬盘:剩余使用空间1GB以上。内存:32MB以上。显卡:SVGA显示适配器。2.系统开发环境操作系统:Windows2000/XP。系统支持:VisualBasic6.03系统设计3.1总体结构设计3.2数据库实现表1教材领用字段名称数据类型字段大小教材名称文本255领用数量文本255表2成绩录入数据表字段名称数据类型姓名文本255学号文本255成绩数字255表3教材管理数据表字段名称数据类型字段大小名称文本255数量数字255价格数字255编号数字2554系统实现系统登陆教务管理系统教学管理成绩管理教材管理退出图1总体模块图4.1教材领用模块的设计与实现图2教材领用PrivateSubCommand1_Click()Dimf%f=Text2.TextAdodc1.Recordset.Fields(数量).Value=Str(Val(Adodc1.Recordset.Fields(数量).Value)-f)Adodc1.Recordset.UpdateMsgBox领用成功!,vbExclamation+vbOKOnlyEndSubPrivateSubCommand2_Click()Form11.ShowForm12.HideEndSub4.2其他模块的设计与实现图3成绩录入PrivateSubCommand1_Click()Adodc1.Recordset.AddNewEndSubPrivateSubCommand2_Click()Adodc1.Recordset.UpdateEndSubPrivateSubCommand3_Click()Form2.ShowForm5.HideEndSubPrivateSubCommand4_Click()Adodc1.RecordSource=select*from[成绩录入]where班级='+Text2+'Adodc1.RefreshEndSub图4成绩查询PrivateSubCommand1_Click()Adodc1.ConnectionString=Provider=Microsoft.ACE.OLEDB.12.0;DataSource=db2.accdb;PersistSecurityInfo=FalseAdodc1.CommandType=adCmdTextAdodc1.RecordSource=select*from成绩录入where学号='+Text1.Text+'Adodc1.RefreshEndSubPrivateSubCommand2_Click()Form2.ShowForm6.HideEndSubPrivateSubForm_Load()EndSub图5教材入库PrivateSubCommand1_Click()Adodc1.Recordset.AddNewEndSubPrivateSubCommand2_Click()Adodc1.Recordset.UpdateEndSubPrivateSubCommand3_Click()Form2.ShowForm7.HideEndSub图6登陆主界面PrivateSubForm_Load()IfForm1.s管理员Thenxuesheng.Enabled=Falseruku.Enabled=Falsejiaoshi.Enabled=FalseEndIfIfForm1.s老师Thenluru.Enabled=FalseEndIfEndSubEndSubPrivateSubjing_Click()Form10.ShowForm2.HideEndSubPrivateSubjiaoshi_Click()Form4.ShowForm2.HideEndSubPrivateSubkecheng_Click()Form14.ShowForm2.Hide5设计体会5.1总结首先感指导老师刘仁芬,没有您的帮助,我不可能做出合格的系统同时,我也要感谢我的同学,课下,在我不会的时候是他们帮助了我,没有他们我同样也完成不了这次设计。同时,我也要再次感谢全体老师,是你们在辛勤地为我们做了许多我们不曾注重的一些细节问题,为我们无论是在设计上还是在论文中,您们的劳动都是我的毕业设计能够完成不可缺少的因素。5.2存在的主要问题由于所学知识有限,所做出来的设计还有很多漏洞,许多功能还无法实现,希望老师提出宝贵意见。参考文献[1]郑砚周青李华杰.《visualbasic8.0基础教程》,北京:清华大学出版社,2004-5-1[2]刘怀亮.VisualBasic.NET程序设计.冶金工业出版社,2008[3]吴霞,万缨VisualBasic.NET基础教程.清华大学出版社,2007[4]郑阿奇,彭作民.VisualBasic.NET程序设计教程.机械出版社,2006[5]刘新民.VisualBasic6.0程序设计.清华大学出版社,2004