石家庄铁道大学四方学院集中实践报告书课题名称 四方学院后勤管理姓 名 学 号 系、 部 土木工程系专业班级 指导教师刘仁芬2015年 6 月 25 日※※※※※※※※※ ※※ ※※ ※※※※※※※※※※※2014级高级语言程序设计四方学院后勤管理系统的开发1选题的意义对后勤管理来说，对后勤管理状况起决定作用的是建立一个完整的报修维修管理系统。
如何利用先进的管理手段来提高后勤管理的水平是我们的主要发展方向。
面对信息时代的新情况，利用科技手段提高后勤管理无疑是一条行之有效的途径。
因此，使后勤管理工作规范化，系统化，提高后勤数据处理的速度和准确性，使该系统能够及时、准确、有效的查询和修改报修情况才可以更方便快捷且行之有效的施行后勤管理。
2 系统功能需求分析2.1系统概述该系统是以管理为基础开发的学院正常运行的管理与统计系统，适合各类型院校使用。
该系统应有较高的可靠性，学院后勤管理系统包括信息查询、保修管理、维修管理、验收管理、物料管理、系统管理等多种功能。
我们所设计的后勤管理系统具有以上功能，可以方便快捷准确的获取以上信息，为学校生活提供方便。
信息查询：系统用户可查：最新报修信息、最新维修信息、学校相关通知等。
保修管理：报修用户可以随时对损毁物品和设施进行报修，修改和查询报修信息等。
维修管理：维修中心的用户对报修信息的管理。
验收管理：施工结束由维修中心用户记录相关报修项目处理情况。
物料管理：维修中心用户根据施工结束登记的维修用料信息。
系统管理：由系统管理员对登录用户、工作人员列表（系统中报修人员、维修人员、验收人员均提供下拉列表选择）、维修价目等参数进行管理和设置。
2.2系统的组成及各模块的功能学院后勤管理系统的组成主要包括以下几点功能:1.用户登录模块：账户，姓名，密码，角色2.维修管理模块：ID，维修楼，寝室号，维修时间，维修人，状况，维修物品3.保修管理模块：ID，损坏物品设施，个数4.物料管理模块：维修用料信息，维修日期，栋，寝室号5.系统管理模块：ID，登录用户，保修人员，维修人员，验收人员，维修价目6.验收管理模块：维修楼，寝室号，是否维修完2.3系统的运行环境1.系统使用环境操作系统:Windows XP/7。
系统支持：Visual basic 6.0及以上版本支持库。
数据库：Access。
硬件环境：处理器;Intel Pentium 166MX或者更高。
硬盘：剩余使用空间1GB以上。
内存：32MB以上。
显卡：SVGA显示适配器。
2.系统开发环境操作系统：Windows XP/7。
系统支持：Visual Basic 6.0。
3系统设计3.1总体结构设计图1 总体模块图3.2数据库实现表1 登录界面数据表字段名称数据类型字段大小编号自动编号长整型账号文本50密码文本50表2 报修管理数据表字段名称数据类型字段大小损毁物品、设施文本255个数数字长整形编号自动编号长整型表3 验收管理数据表字段名称数据类型字段大小维修楼数字长整形寝室号数字长整形是否维修完成文本255表4 信息查询数据库字段名称数据类型字段大小报修楼数字长整形寝室号数字长整形报修物品报修时间状况维修时间维修人文本日期/时间文本日期时间文本2552552554系统实现4.1登录模块的设计与实现图2登录界面Private Sub Command1_Click()UserName = Combo1.TextIf Option1(0).Value = True ThenAdodc1.RecordSource = "select * from 登陆界面where 账户='" + Combo1.Text + "' and 角色='学生'"ElseAdodc1.RecordSource = "select * from 登陆界面where 账户='" + Combo1.Text + "' and 角色='管理员'"End IfAdodc1.RefreshIf Adodc1.Recordset.Fields(2).Value = Text1 ThenIf Option1(0).Value = True ThenForm11.ShowElse主要功能.ShowEnd IfElseMsgBox "密码错误！"End IfUnload MeEnd SubPrivate Sub Command2_Click()登陆界面.Hide主界面.ShowEnd SubPrivate Sub Form_Load()Adodc1.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=四方学院后勤管理系统.accdb;Persist Security Info=False"Adodc1.RecordSource = "select * from 登陆界面"Adodc1.RefreshCombo1.ClearDo While Not Adodc1.Recordset.EOFCombo1.AddItem Adodc1.Recordset.Fields(0).ValueAdodc1.Recordset.MoveNextLoopEnd SubPrivate Sub Label3_Click()Form1.ShowEnd Sub4.2其他模块的设计与实现图3主界面Private Sub Command1_Click()主界面.Hide登陆界面.ShowEnd SubPrivate Sub Command2_Click()主界面.HideEnd SubPrivate Sub Picture1_Click()End Sub图4报修管理Private Sub Command1_Click()Unload MeEnd SubPrivate Sub Command2_Click()Form13.ShowEnd SubPrivate Sub Form_Load()End Sub图5信息查询Private Sub Command1_Click()Adodc1.Recordset.AddNewEnd SubPrivate Sub Command2_Click()Adodc1.Recordset.UpdateEnd SubPrivate Sub Command3_Click()Adodc1.Recordset.DeleteEnd SubPrivate Sub Command4_Click()Unload MeEnd SubPrivate Sub Form_Load()'adodc1.ConnectionString=Microsoft.ACE.OLEDB.12.0;Data Source=四方学院后勤管理系统.accdb;Persist Security Info=FalseEnd SubPrivate Sub Picture1_Click()End Sub图6验收管理Private Sub Command1_Click()图Unload MeEnd SubPrivate Sub Command2_Click()Adodc1.Recordset.AddNewEnd SubPrivate Sub Command3_Click()Adodc1.Recordset.UpdateEnd SubPrivate Sub DataGrid1_Click()End Sub图7主要功能Private Sub Command1_Click()Form2.ShowEnd SubPrivate Sub Command2_Click()'主要功能.Hide报修管理.ShowEnd SubPrivate Sub Command3_Click()'主要功能.HideForm10.ShowEnd SubPrivate Sub Command4_Click()'主要功能.Hide验收管理.ShowEnd SubPrivate Sub Command5_Click()'主要功能.Hide物料管理.ShowEnd SubPrivate Sub Command6_Click()'主要功能.Hide系统管理.ShowEnd SubPrivate Sub Command7_Click()'主要功能.Hide登陆界面.ShowEnd SubPrivate Sub Picture1_Click()End Sub5设计体会5.1总结感谢一直对我课程设计提供帮助的刘仁芬老师，没有您的悉心指导，我不可能完成符合要求的合格的课程设计。
与此同时，我也要感谢对我课程设计提供帮助的同学们，是你们给予了我更多更广泛的设计思路，才使得我的思维更加宽广，这对于我的课程设计来说，是一种莫大的帮助，谢谢你们。
同时，我也要再次感谢全体老师，是你们在辛勤地为我们做了许多我们不曾注重的一些细节问题，为我们无论是在设计上还是在论文中，您们的劳动都是我的毕业设计能够完成不可缺少的因素。
5.2存在的主要问题鉴于能力水平所限，没有插入封面图片。
同时，我们存在的问题还不少，界面不够精明，样式死板，可供查询的内容比较少，望老师提出批评意见。
参考文献[1]刘炳文.Visual 程序设计.清华大学出版社，2007[2]刘怀亮. Visual 程序设计.冶金工业出版社，2008[3]吴霞，万缨Visual 基础教程.清华大学出版社，2007[4] 郑阿奇，彭作民. Visual 程序设计教程.机械出版社，2006[5]刘新民. Visual Basic 6.0程序设计.清华大学出版社，2004。