《VB学生公寓管理系统(2014版)》由会员分享，可在线阅读，更多相关《VB学生公寓管理系统(2014版)（23页珍藏版）》请在金锄头文库上搜索。
1、VB学生公寓管理系统(2014 版)青海师范大学数学系2010届信息与计算科学专业毕业论文学生公寓管理系统姓班名:级：李迎宝10c张淑敏（教授）指导教师：完成时间：2014年5月5日目录摘要1Abstract112课题描述2需求分析22.1可行性研究22.1.12.1.22.1.3技术可行性2经济可行性2操作可行性22.2功能需求22.3性能需求33程序设计33.1系统层次模块图33.2数据库物理设计34系统实现54.1系统用户管理模块54.2人员信息管理84.3宿舍卫生情况124.4探访窗口154.5查询窗口1756系统测试20总结21参考文献22学生公寓管理系统李迎宝（青海师范大学数学系2
2、010级c班，青海西宁，810000）摘要：本软件的前台设计由VisualBasic6.0 实现，后台数据库用ACCESS数据库表进行创建和管理。本系统界面设计大方、 简洁、实用，操作简单方便。该系统具有卫生评比、来客登记和公寓信息功能。卫生评比管理模块提供对卫生评比信息的管理功能，违纪处理管理模块实现违纪处理信息的管理，来客登记管理模块提供对来访人员信息的管理功能，房间信息管理模块提供房间信息维护功能。关键词：公寓管理系统；VisualBasic6.0 ；Access数据库StudentapartmentmanagementsystemLiYingbao(QinghaiNormalUnive
3、rsityDepartmentofmathematics2010Cclass,QinghaiXining,810008)Abstract:TheforegroundofthesoftwarebyVisualBasic6,backgrounddatabaseusingACCESSdatabasetablesarecreatedandmanaged.Thesysteminterfacedesigngenerous,concise,practical,simpleandconvenientoperation.Thesystemhasthehealthassessment,visitorregistr
4、ationandapartmentinformationfunction.Healthassessmentmanagementmoduleprovidesthehealthassessmentinformationmanagementfunctions,andprocessingmanagementmoduletoachievethelawtodealwithinformationmanagement,visitorregistrationmanagementmoduleprovidesthevisitorinformationmanagementfunctions,roominformati
5、onmanagementmoduleprovidestheroominformationmaintenancefunction.Keywords:Theapartmentmanagementsystem;VisualBasic6;Accessdatabasetable1.课题描述1各个学校对学生宿舍的管理已经有了很长的历史，并且已经具备了一定的规模和形态，同时对学生公寓的服务和管理也要求很高.诸如对学生入住情况的详细了解，以及来访者的情况都要求宿舍管理人员做的好，做的完善。这样要求公寓管理人员对学生宿舍管理进行宏观的和微观的细致管理，其中最好的办法是用计算机操作的学生宿舍管理系统来实现对学生宿
6、舍的管理。学生宿舍管理系统在各个学校中都具有广泛的应用，它具有卫生评比、来客登 记和公寓信息功能。它不仅具有检索迅速、查找方便、操作简单、可靠性高、存 储量大、保密性好、寿命长和成本低的优点，还可以极大地提高宿舍管理员的工作效率和质量。开发工具：VisualBasic6.02需求分析2.1可行性研究可行性研究的目的，就是用最小的代价在尽可能短的时间内确定问题是否能够解决，是否值得去解。我们从三个方面来进行可行性研究，即技术可行性、经济可行性和操作可行性。2.1.1技术可行性学生宿舍管理系统，采用VisualBasic6.0进行编程和界面 设计，以Access 为后台数据库来实现的，全面采用以窗
7、口、表单、对话框和联机帮助 为特征的图形用户界面的技术和操作方法。系统操作简单，功能大，使用方便，具有很强的技术可行性。2.1.2经济可行性学生公寓管理是一个很大的项目，在早期，还没有利用计算机管理时，一切都是利用人工进行管理的，这样管理起来既烦琐又复杂， 资料也很容易被丢失，而且耗 时、耗资金。而利用本系统，可以高效地对学生宿舍进行统一管理与控制， 资料也不容易被丢失，这样大大节省了人力与资源，提高了管理效率， 给管理人员带来很多方便。22.1.3操作可行性操作可行性也即实用性。随着计算机技术的发展以及网络的发展，对学生宿舍的管理与控制越来越实用并且得到管理者的证实，无论是查询还是修改都有很
8、方便，查询的信息一目了然。因此，它具有很强的实用性。因此本系统在操作上也可行。根据上述三个方面的研究得出：可以开发本系统。2.2功能需求基于系统需求分析，该系统需要实现以下基本功能：卫生评比管理模块，主要完成评比信息的录入、修改和删除以及评比结果的查询功能。来客登记管理模块，主要提供来访登记、离开登 记和来访信息查询功能。宿舍信息管理模块，主要是提供对房间信息的录入、修改、删除功能，同时提供房房间信息查询功能。数据库管理：对现有的数据库进行管理，包括数据备份和恢复，以方便用户对数据库的管理和维护工作，提高系统的数据安全性。2.3性能需求系统运行环境：Windows2000及其以上数据库：ACC
9、ESS 数据库3系统设计3.1系统层次模块图3学生公寓管理系统人员信息卫生情况访客信息管理信息查询宿舍人员输入宿舍成员信息卫生情况录入卫生信息表来访登记来客信息表3.2数据库物理设计系统建立的数据库表主要有四个，如下图所示。字段名学号姓名籍贯出生日期院系民族电话专业班级性别学制数据类型varcharvarcharvarcharvarcharvarcharvarcharvarcharvarcharvarcharvarcharvarchar字段长度与格式5050505050505050505050关键字是否否否否否否否否否否4图3.6“宿舍人 员” 信息表结 构字段名学号被访人员来访时间离开时间被
10、访宿舍来访人员数据类型varcharvarcharvarcharvarcharvarcharvarchar字段长度与格式505050505050关键字是否否否否否图3.7“来访”信息表结构字段名宿舍号宿舍名卫生等级时间数据类型varcharvarcharvarcharvarchar字段长度与格式50505050关键字是否否否图3.8“宿舍卫 生” 信息表结 构字段名学号密码数据类型varcharvarchar字段长度与格式5050关键字是是图3.9“用户账 号” 信息表结 构4系统实现4.1系统用户管理模块说明：1.登录界面，这个系统本来是学生和管理员公用系统，通过类别选择学生还是管理人员，我
11、只简单的设计了学生登陆后的系统，第一个界面有一个注册账号通过它可以注册登录的新的账号和密码。5登录界面代码PrivateSubCombo1_Click()http:/bo1.Text=宿舍管理员http:/bel2=工号：http:/bel3=密码：Elsehttp:/bel2=学号：http:/bel3=密码：EndIfEndSubPrivateSubCommand1_Click()EndEndSubPrivateSubCommand2_Click()http:/bo1.Text=宿舍管理员ThenIfText1.Text=userThenText2.SetFocusElse6IfText1
12、.Text123456ThenMsgBox请输 入正确密码！,64,注意Form1.Text2.Text=EndIfEndIfElseIfText1.Text=abcThenText2.SetFocusElseIfText1.Text123456ThenMsgBox请输 入正确密码！,64,注意Form1.Text2.Text=7EndIfEndIfEndIfEndSubPrivateSubLabel4_Click()账号.ShowEndSub4.2人员信息管理说明：登录进去之后是：宿舍人员信息、宿舍卫生信息、来访信息、人 员信息的查询这么几个按钮。说明：通过“添加信息 ”按钮进 入下面的界面
13、，可添加、删除、修改宿舍人员信息，然后把信息保存到ACCESS表中以便于后续的查询管理。89主要代码如下：PrivateSubCommand1_Click()OnErrorResumeNextCommand3.Enabled=NotCommand3.EnabledCommand4.Enabled=NotCommand4.EnabledCommand5.Enabled=NotCommand5.EnabledIfCommand1.Caption=确定输入ThenCommand1.Caption=确认Data1.Recordset.AddNewElseCommand1.Caption=确定输入Data1.Recordset.UpdateData1.Recordset.MoveLastData1.UpdateRecordData1.RefreshEndIfEndSubPrivateSubCommand2_Click()学生3.Hide学生1.ShowEndSubPrivateSubCommand3_Click()OnErrorResumeNextCommand1.Enabled=确定 输入Command5.Enabled=修改C
