课程设计报告
题 目 屋租赁管理系统设计与实现
课 程 名 称 工程项目实践
院 部 名 称
专 业 计算机科学与技术
班 级 M11计算机科学与技术 II
学 生 姓 名
学 号
课程设计地点 校 内
课程设计学时 8 周
指 导 教 师 钟 睿
金陵科技学院教务处制
【注：根据课程设计大纲第四项具体要求撰写课程设计报告】
【摘要】随着我国市场经济的快速发展和人们生活水平的不断提高，简单的租凭服务已经不能满足人们的需求。如何利用先进的管理手段，提高房屋租凭管理水平，是当今社会所面临的一个重要课题。本文通过用Visual Basic 6.0编写房屋租赁管理系统，利用软件工程原理，采用面向对象的编程方法，其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面，实现了房屋租赁管理的自动化和信息化。整个系统从符合操作简便、界面友好、灵活实用、数据安全的要求出发，完成基本资料管理、客户资料管理、租凭合同管理、财务管理、统计报表管理等功能。经过实际测试证明，本文所设计的房屋租赁管理系统，可以用于物业管理部门从事房屋租赁信息管理的工作，基本满足各方面的需要。论文主要介绍了本课题的开发背景，所要完成的功能和开发的全过程。着重说明了系统设计的重点、设计思想、技术难点和解决方案。
【关键词】数据库 Visual Basic 6.0 房屋租赁管理系统
【Abstract 】Along with the our country market economy fast development and the people living standard unceasing enhancement, simple rented depends on the service already not to be able to meet people's need. How uses the advanced management method, enhances the room to depend on the management level, is an important topic which now the society faces. This article through uses VB6.0 to compile the house to rent the management system management system, using the software engineering principle, uses the object-oriented programming method, its development mainly includes the backstage database the establishment and the maintenance as well as front end the application procedure development two aspects, realized the house to rent the management the automation and the information。The overall system from conforms to the operation easily, the contact surface friendly, is nimble, practical, the safe request embarks, completes the basic document management, the customer material management, rents depends on function and so on contract management, financial control, statistical report form management After the actual test proof, the house which this article designs rents the management system management system to be allowed to use in the estate management department to be engaged in the house to rent the information management aspect the need. The paper mainly introduced this topic development background, must complete function and development entire process. Key explanation system design key point, design thought, difficult technology and solution.
【Keywords 】Database Visual the Basic 6.0 houses rent the management system management system
目录
前言……………………………………………………………………1 1 房屋租赁管理系统概述……………………………………………2
1.1 课题来源„„„„„„„„„„„„„„„„„„„„„„2
1.2 开发背景和开发目的„„„„„„„„„„„„„„„„„2
1.3 系统任务„„„„„„„„„„„„„„„„„„„„„„3
1.4 系统目标„„„„„„„„„„„„„„„„„„„„„„3
1.5 系统计划„„„„„„„„„„„„„„„„„„„„„„3 2 可行性研究…………………………………………………………4
2.1 技术可行性„„„„„„„„„„„„„„„„„„„„„4
2.2 经济可行性„„„„„„„„„„„„„„„„„„„„„5
2.3 社会可行性„„„„„„„„„„„„„„„„„„„„„5 3 系统分析……………………………………………………………6
3.1 业务流程„„„„„„„„„„„„„„„„„„„„„„6
3.2 数据流程图„„„„„„„„„„„„„„„„„„„„„8
3.3 数据字典„„„„„„„„„„„„„„„„„„„„„„9 4 系统设计……………………………………………………………11
4.1 系统模块设计„„„„„„„„„„„„„„„„„„„„11
4.2 数据库分析设计„„„„„„„„„„„„„„„„„„„14
4.3 输入输出设计„„„„„„„„„„„„„„„„„„„„16 5 系统实施与测试……………………………………………………17
5.1 系统实施„„„„„„„„„„„„„„„„„„„„„„17
5.2 系统测试„„„„„„„„„„„„„„„„„„„„„„17 结论……………………………………………………………………22 致谢……………………………………………………………………23 参考文献………………………………………………………………24 附录 部分程序清单…………………………………………………25
前言
信息化建设日渐深入，如何利用日新月异的计算机技术建立一套高效、灵活、功能强大的管理系统，正成为计算机专业人员关注的重要问题。信息化进程不断推进，使得其更加逐步地渗透到了普通人的生活领域。
本文通过对部分房屋出租方的功能分析、需求分析，进行房屋租赁管理系统的设计与实现。具体实现了房屋出租房、客户等相关信息的添加等。
房屋租赁管理系统是针对在房屋管理中所遇到的问题，如用户信息管理、房屋信息管理、租金信息管理的查询、统计等诸多功能。用人手处理以上工作，效率不高，工作量大，而且所得数据并不可靠。本系统改善了人手操作的不足，提供可靠的查询、准确无误的统计，简单快捷的查找流程。使繁琐复杂的房屋租赁管理工作变得轻松悠闲。本系统适用于中小型房屋中介应用。
房屋租赁管理系统，用来管理房屋与用户过程中的静态和动态信息。本系统是一个典型的房屋租赁管理系统，系统管理的信息主要分为基本资料管理、客户资料管理、租赁管理、财务管理以及统计报表五大部分等，系统的目的就是有效地处理这些信息。
1 房屋租赁管理系统概述
1.1 课题来源
我国市场经济快速发展，信息化水平不断提高，如何利用先进的管理手段，提高物业管理的水平，是当今社会所面临的一个重要课题。提高企业的管理水平，必须全方位地提高企业的管理意识。只有高标准、高质量的管理才能满足企业的发展需求。面对信息时代的挑战，利用高科技手段来提高房屋租赁管理无疑是一条行之有效的途径。在某种意义上，信息与科技在企业管理与现代化建设中显现出越来越重要的地位。房租租赁管理方面的信息化与科学化，已成为现代化生活水平步入高台阶的重要标志。
计算机技术不断的飞速发展，计算机以及计算机控制的自动处理技术已融入人类社会的各个领域并发挥着越来越重要的作用。当今社会，科学信息技术有了重大的飞跃，为人们的生活、工作、学习带来潜移默化的影响。今天我们使用计算机对房屋租赁信息进行管理，具有手工管理所无法比拟的优点。例如：检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高房屋租赁管理的效率。面对目前的实际状况，迫切需要开发一个简单快捷的系统来适应这些工作。
1.2 开发背景和开发目的
利用计算机实现物业管理中的房屋租赁管理势在必行。对于物业管理企业来说，利用计算机支持企业高效率完成房屋租赁管理的日常事务，是适应现代企业制度要求、推动企业劳动型管理走向科学化、规范化的必要条件。而房屋租赁管理是一项琐碎、复杂而又十分细致的工作。
房屋的基本资料，客户资料的管理，房屋租赁管理，各项收费以及统计报表的管理，一般不允许出错。如果实行手工操作，须手工填制大量的表格，这就会耗费工作人员大量的时间和精力。计算机进行房屋租赁工作的管理，不仅能够保证各项信息准确无误、快速输出，同时计算机具有手工管理所无法比拟的优点，例如：检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高物业管理的效率，也是企业的科学化、正规化管理，
与世界接轨的重要条件。
开发本系统就是为了解决物业管理企业在房屋租赁信息管理中的一些不规范，使房屋租赁信息的管理向着规范化、简单化、有效化的方向发展。
1.3 系统任务
房屋管理系统是管理房屋的重要工具，一个完善的房屋系统的任务主要包括以下几项：
房屋基本资料管理，主要负责管理各种房屋信息；
客户基本资料管理，主要负责客户的一些信息；
租金合同管理，主要负责为求租户与租户之间达成协议；
系统管理，主要负责管理用户信息和用户登录。
1.4 系统目标
采用企业现有的软硬件环境以及科学的管理系统开发方案，建立房屋租赁信息管理系统，实现房屋租赁信息管理的计算机自动化。系统应符合物业管理企业原有的房屋租赁管理制度，并达到操作直观、方便、使用、安全等要求。
1.5 系统计划
系统开发过程计划如下：总体上分为三大阶段来完成，要求每一阶段的任务都要按质按量来完成，以便整个系统功能能够正常运行。
第一阶段：系统分析，可行性分析；
第二阶段：系统总体设计，实现子系统及各个模块的组合；
第三阶段：软硬件的准备，系统的调试与测试。
2 可行性研究
2.1 技术可行性
技术可行性包括以下几个方面：硬件、系统软件、应用软件、技术人员。针对这四个方面可行性都是没有问题的。本系统预采用Visual Basic编程语言加Access 数据库。目前，数据库产品较多，每种产品都具有各自的特点和适用范围，选择最合适的。VB 程序语言具有许多优秀的特性，用其设计应用程序时有两个基本特点：可视化设计和事件驱动编程。
在设计时，头脑中所想象的应用程序界面，完全可以通过键盘鼠标以及徒手画出来，而不是编制大量的代码然后再编译生成，如果需要修改，也是利用键盘鼠标和手画，而底层的一些程序代码由VB 自动生成或修改。
Windows 操作系统出现以来，图形化的用户界面和多任务多进程的应用程序要求程序设计不能是单一性的，再使用VB 应用程序时，必须首先确定应用程序如何同用户进行交互，例如发生鼠标单击、键盘输入等事件时，由用户编写的代码控制这些事件的响应，这就是所谓的时间驱动编程。
传统的应用程序开发过程可以分为三个明显的步骤：编码、编译和测试。但是VB 与传统的语言不通，它使用交互式方法开发应用程序，使三个步骤之间不再有明显的界限。
在大多数语言里，如果编写代码时发生了错误，则在开始编译应用程序时该错误就会被编译器捕获。此时必须查找并改正该错误，然后再次进行编译，对每一个发现的错误都要重复这样的过程。VB 在编程者输入代码时便进行解释，即使捕获并突出显示大多数语法或拼写错误。
除即使捕获错误以外，VB 也在输入代码时部分的编译该代码。当准备运行和测试应用程序时，只需极短时间即可完成编译。如果编译器发现了错误，则将错误突出显示于代码中。这样可以更正错误并继续编译，而不需从头开始。
由于VB 的交互特性，因此在开发应用程序时，系统频繁地运行着应用程序，通过这种方式，代码运行的效果可以在开发时进行测试，而不必等到编译完成以后。
房屋租赁管理系统中采用的是Access2000数据库。Access2000就是一个关系数据库开发工具，数据库能汇集各种信息以供查询、存储和检索。Access 的
优点在于它使用数据库表示图或自定义窗体收集信息，数据表示图提供了一种类似于Excel 的电子表格，可以使数据库一目了然。另外，Access 也允许创建自定义报表用于打印或输出数据库中的信息。Access 也提供了数据存储库，可以使用桌面的数据库文件吧数据库文件置于网络文件服务器，与其他网络用户共享数据库。如上所述，Access 作为关系数据库开发具备了许多优点。可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。
数据库访问方式：ADO （Active Data Objects）实际是一种提供访问各种数据类型的连接机制。ADO 设计为一种极简单的格式，通过ODBC 的方法同数据库接口。可以使用任何一种ODBC 数据源，即不止适合于SQL Server、Oracle 、Access 等数据库应用程序，也适合于Excel 表格、文本文件、图形文件和无格式的数据文件。ADO 是基于OLE-DB 之上的技术，因此ADO 通过其内部的属性和方法提供统一的数据访问接口方法。其主要优点是易于使用、高速度、低内存支出和占用磁盘空间很少。
Data 控件是在数据库中的信息与将信息显示给用户看的Visual Basic 程序之间架起了一座桥梁。我们可以设置data 控件的各个属性，告诉它要调用哪个数据库的哪个部分，缺省的情况下，data 控件根据数据库中的一个或多个数据表建立一个dynaset-type （动态集合）类型的记录集合。一个记录集合是动态的也就意味着当原来的数据表中的内容该表了以后，该记录集合中的记录也会随之该表，data 控件还提供了用来浏览不同记录的各种跳转按钮。将data 控件旋转在窗体中之后，我们还必须在该控件与要处理的数据库之间建立联系。
2.2 经济可行性
本系统开发简单但要耗去一定的时间，所用的开发工具和软件都差不多是免费的。而且，由于系统能够在未来较长一段时期内稳定地发挥作用，这对于房屋租赁信息的自动化管理，以及管理企业的人力和财力都有很大的帮助。由此可见，开发此系统在经济上是完全可行的。
2.3 社会可行性
如今的计算机已经走进千家万户，硬件成本的下降，导致计算机购买成本的降低，这套系统有友好的用户界面、良好的安全性设置、详细的操作说明，这样可以使各类用户很快地掌握系统的使用方法，因此在社会上普及是可行的。
3 系统分析
系统分析阶段的任务是：系统分析员与用户在一起，充分了解用户的要求，并把双方的理解用系统说明书的方式表达出来。系统说明书审核通过之后，将成为系统设计的依据和将来验收的依据。系统分析是要回答系统要“做什么”这个问题。只有明确了问题，才有可能解决问题。
3.1 业务流程
房屋租赁管理活动其核心是对房屋、客户及其合同信息的管理。首先，房屋管理者要进行房屋登记，录入房屋的基本信息，以便对房屋有良好的管理；其次，要进行客户登记，客户进行登记之后才能进行查询；最后是发生在客户与房屋两个实体之间的合同信息，而且要对此信息做反馈。
3.1.1 总的业务流程图
业务处理管理
数据的存储 数据流向 业务处理功能描述 表格报表的制作
房屋租赁管理系统总的业务流程是：管理员对房屋和客户的管理。管理员通过对房屋做出相应的处理，然后根据处理的结果存储在房屋信息表里。通过对客户的管理，将管理后的信息存入客户信息表里。
图3.1 总的业务流程
3.1.2 详细业务流程图 （1）权限管理业务流程图
通过不同的用户类型，通过登录界面确定后，进入相应的系统界面，进行系统操作，不同的权限，会进行不同的功能模块操作。
图3.2 权限管理业务流程
（2）管理员信息管理业务流程图
管理员可以进行管理员信息的修改、删除、查询、添加管理员等操作。
图3.3 管理员信息管理业务流程
3.2 数据流程图
数据流程图是描述实际业务管理系统工作流程的一种图形表示法。它描述系统的逻辑模型图，其中没有任何具体的物理元素，只是描绘信息在系统中流动和处理的情况，本文主要是为了对房屋、客户基本信息等进行计算机管理。
系统总体流程图如下： 图3.4 系统流程
下面是对各个功能模块的流程分析： （1）房屋类别管理基本信息流程：
分析：房屋类别基本信息的流动首先是以房屋类别的编号为依据，来达到添加、修改、查询类别记录。同时，也对数据库中的房屋类别表的编号进行检查。
（2）客户信息管理基本信息流程：
分析：客户基本信息的流动，首先是以客户编号为流动方向的依据，来达到添加、修改、记录、删除记录。为了数据的一致性，进行这些操作的同时，也对数据库中的记录进行检查，检查是否有重复的记录。如有则不能进行添加。
（3）租赁信息类别管理基本信息流程：
分析：租赁信息类别基本信息的流动首先是以合同类别编号为流动方向的依据，来达到添加、修改、记录读者类别记录。为了数据的一致性，也对数据库的
记录进行检查。
3.3 数据字典
（1）数据元素
表3.1 数据元素
（2）数据流条目
表3.2 数据流条目
（3）处理功能条目
表3.3 处理功能条目
4 系统设计
4.1 系统模块设计
根据前边对房屋租赁管理系统的分析，一个标准的房屋租赁管理系统应该包含以下的一些功能：
图4.1 系统功能
4.1.1 基本资料模块
基本资料模块负责维护房屋类型信息，主要提供添加、修改、删除功能。房屋类型包括：房屋编号、房型、装修新情况、物业地址、建筑面积、出租价位、使用面积、目前状态、备注。
图4.2 基本资料功能模块
4.1.2 客户资料模块
客户资料模块主要由租户资料和求租户资料组成，主要提供增加、修改、删除和查询功能。客户类别信息主要包括：租户编号、租户姓名、性别、工作单位、电话、身份证、租住人数、备注；求租户编号、求租户姓名、电话、房型要求、面积要求、装修要求、意向价位、意向房屋编号、备注。
图4.3 租户资料功能模块
图4.4 求租资料功能模块
4.1.3 租赁管理模块
租赁管理模块主要负责为客户提供房屋信息服务，租赁信息主要包括合同签订、合同续签、合同管理、预定租房、合同查询、预订单查询、出租到期提醒、
预定到期提醒。
图4.5 租赁管理功能模块
4.1.4 系统管理模块
系统管理模块主要负责用户权限管理，包括用户管理、密码维护、重新登录，其功能模块如下所示：
用户管理模块负责管理用户信息，包括用户ID 、用户姓名、用户类别、密码等。
密码维护模块负责维护客户的密码信息。
重新登录模块主要负责给客户提供重新登录功能，重新登录时将检查用户权限。
4.2 数据库分析设计
4.2.1 数据库的规范化设计
进行数据库程序设计，首先要做的工作就是设计数据库表格，就是设计每一
个表应该由哪几列构成，这项工作看似很简单，实际上是很复杂的，实现的不好，会使表格中产生大量的重复性数据，造成存储空间的浪费，还有可能造成记录内容的不一致，即所谓的存储异常问题。
数据表格的设计是很重要的，如果设计的不合理，将会带来大量的问题。为了解决上面这个问题，我们应该将上述表格分成几个表格，具体的如何分解表格才算符合要求，这就需要用到数据组织的规范化形式。
在规范化理论中表式二维的，它具有如下四个性质： （1）在表中的任意一列上，数据项应属于同一个属性。 （2）表中所有行都是不相同的，不允许有重复组项出现。 （3）在表中，行的顺序无关紧要。
（4）在表中，列的顺序无关紧要，但不能重复。 4.2.2 表的建立
数据表之间的关系指明两个表之间共享一个共同的关键字值。一个连接是指一种虚拟的表。这种表是在当用户要求从相互关联的各个不同的表中获取信息时建立的，关键字段用于在相互连接的不同表中查找匹配的记录。一个更高级的连接形式成为自连接。这种连接是指一个表被连接。
根据系统分析，系统需要建立五个表，其中主要的三个表用途说明如下：
表4.1 系统需建立的表
4.2.3 系统E-R 图
E-R 图是一种信息模型图，体现了系统实体之间的关系。通过系统需求分析，了解了系统的分解功能，以及数据流程。根据这些实体和实体之间的关系可以得
到系统E-R 图如下所示：
图4.6 房屋租赁实体E-R 关系
图4.7 管理员实体E-R 关系
4.3 输入输出设计
实现目标：为了保证应用程序的安全，通常要使用系统登录程序来验证登录系统的用户是否合法，只有合法的用户才可进入系统。在输入用户名和密码后，如正确，则进图房屋租赁管理系统，管理员可以进行一系列操作；如用户名或密码错误，系统会显示提示信息，提示用户进行重新输入。如果连续输入三次错误，系统自行关闭，用户需要重新登录。
（1）通过输入正确的用户口令进入图书馆管理系统。
（2）密码错误提醒并返回错误点，三次口令错误，推出系统。 开发过程：
图4.8 输入输出实体E-R 关系
5 系统实施与测试
5.1 系统实施
5.1.1 硬件、软件的准备
根据系统分析和系统设计方案的要求，选择与安装符合新系统运行环境要求的硬件和软件。
硬件环境：推荐配置：256M 内存，P4 1.2GHz，40GB 硬盘，800*600分辨率显示器；
软件环境：客户端系统要求：操作系统Windows 98/Me
数据库Access2000
工具Visual Basic 6.0。
5.1.2 数据准备
按照数据库设计准备方案的要求，安装调试系统所需要的数据库管理系统。收集和整理信息系统的运行所需的基础数据，建立数据库。
5.1.3 程序设计
制定编程的规范约定；采用结构化程序设计方法；选择合适的程序设计语言进行编程，包括程序的设计、测试、运行和调试。
5.1.4 系统测试与调试
系统测试时为了发现系统中所存在的错误而运行系统的过程，其目的就是在系统投入运行之前，尽可能多的发现系统中的错误，以保证系统可靠地、高质量地实现设计功能；系统调试是将测试出的错误进行诊断和改正。
5.2 系统测试
目前，检测软件有三种手段：动态检查、静态检查和正确性证明。检测的目的是为了发现程序的错误。因此，测试的关键问题是如何设计测试用例，即设计一批测试数据，通过有限的测试用例，在有限的研制时间、研制经费的约束下，尽可能多地发现程序中的错误。测试有四种类型：模块测试、联合测试、验收测试、系统测试。
测试的原则：测试数据包括输入数据和预期的输出效果；不仅要选用合理的
输入数据作为测试用例，而且应选择不合理的数据作为测试用例；既要检查程序是否完成了它应做的工作，又要检查它是否还做了它不应做的事情；测试用例应长期保存，直到这个程序被废弃。
本程序所采用的测试方法是：白箱测试，黑箱测试。
白箱测试：根据一个软件部件的内部控制结构，测试它是否依据设计正确的执行。
对于本系统而言，我们在对初始情况下的测试主要是根据代码的思想来一步一步进行测试，运行循环和选择的方法在调试系统过程中应用的都是白箱测试方法，从编程的角度来调试系统，从而测试系统已知数据的运行得到相应的结果。
黑箱测试：根据一个软件部件由外部界面所能观察到的功能效果，测试它是否与其他部件正确的沟通，一般指输入正确时，看是否有正确的输出。
对于房屋租赁管理系统，我们主要是在系统运行过程中，输入相应数据，看是否能得到我们所期望的数据结果来进行测试，如果结果正确，则测试成功。
5.2.1 测试步骤
（1）设计测试情况
采用黑箱测试和白箱测试相结合的方法，根据程序的具体内容设计测试情况，并编制一些测试程序，以备上机运行，开展测试工作。
（2）进行模块测试
采用“自顶向下”和“自底向上”的方法测试每一个程序模块，直至整个系统。
（3）完成功能测试
验收测试，安装测试等高级测试内容，进而完成整个系统的测试任务。
5.2.2 测试用例
（1）根据以上步骤，以添加房屋类别为例：
输入：相关的房屋类别信息
期望输出：添加房屋类别成功
实际输出：添加房屋类别成功
图5.1 房屋类用例测试
（2）添加客户信息
输入：相关客户信息
期望输出：客户信息添加成功
实际输出：客户信息添加成功
图5.2 客户类用例测试
（3）修改当前用户密码
输入：用户需要修改的密码
期望输出：修改密码成功
实际输出：修改密码成功
图5.3 用户密码用例测试
其中用户admin 的密码已经修改，当再次进入系统时，如果用户admin 在登
录时，只能输入新密码才可登录，而旧密码提示“密码或用户名输入错误”，那么测试成功。
（4）添加管理员
输入：添加新的管理员用户名跟密码
期望输出：添加管理员成功
实际输出：添加管理员成功
图5.4 管理员用例测试
在对一些系统功能的测试中，还运用了对菜单的测试，系统多个模块功能联合的测试，均取得了预期的效果。
经过一个多月的努力，毕业设计终于完成了。在这段学习和实践的时间里，虽然遇到过很多的困难，也看到了希望。房屋租赁管理系统的设计，让我又掌握了一门技术，虽然还不够精通，但还是有一定的认识和了解，对于我将来的学习是有帮助的。本系统的功能基本符合设计需求，能够完成房屋租赁信息的存储和查询以及各类相关报表统计。使用户方便进行数据输入、修改、删除等管理操作。对于数据的一致性的问题也通过程序进行了有效的解决。
在系统设计过程中，我体会到了即使是一件小事也不能马虎，在设计之前一定要对所设计的系统有较为深刻的了解，并对用户的要求加以认真的分析，并给予分类，对所分类进行功能模块化设计，画出系统数据流程图，这样在进行详细设计时才可以做到有条不紊一步一步地进行。编制一个系统还是有很多可学习的地方，不仅要掌握好相关知识，而且做事要细心、谨慎，这也是将来工作和学习应该注意的地方。
总的来说，通过这次课题，我也同时学到了技术层面以外的知识，那就是在建立应用程序上的流程：定出研究方向，收集资料，分析资料，确定项目，实现分析，提出实现方案，程序编辑，程序调试，程序修改，程序增添等等的步骤。这些都使我认识到建立应用程序不是一件随便的事情，它有一个系统的、严密的、逻辑的工作流程。
将来的社会是竞争激烈的社会，特别是计算机行业，要不断的学习学习再学习，才可以吧自己融入到社会的发展中去，所以在工作过程中，要不断的充电，才可以更好的体会自己人生的价值。
由于本人水平有限，在文中难免有不足之处，望各位老师和同学批评指正。
通过这次毕业设计，使我感到高科技、新知识的力量。
在本次毕业设计中，我从指导老师身上学到了很多东西，取人之长，补己之短。指导老师认真负责的工作态度，严谨的治学精神和身后的理论水平都使我受益匪浅。无论在理论上还是实践中，都给予我很大的帮助，使我得到不少的提高。
整个毕业设计过程中，从最初的选题到中期检查，从系统的完成到现在的毕业设计论文，由于经验匮乏，难免有很多考虑不周的地方。导师无论多忙多累，都会给予了精心的指导和热情的帮助。这对于我今后的工作和学习都是一种巨大的帮助和财富，衷心感谢指导老师的耐心辅导，在此我向指导老师致以崇高的敬意。
另外，在系统开发过程中，周围的同学也给予了我相当大的帮助，解决了不少的难点，使得系统能够及时开发完成，在此一并表示感谢。
还要感谢大学四年来所有教过我的老师，为我打下了计算机的专业基础知识，为毕业设计打下了坚实的基础。对学院及专业一并表示深深的谢意！
参考文献
[1] 王栋 Visual Basic程序设计使用教程[M].北京:清华大学出版社,2005.
[2] 武新华, 魏平俊.Visual Basic管理信息系统开发案例[M].西安:西安电子科技大学出版社,2006.
[3] 邝孔武, 王晓敏. 信息系统分析与设计[M].北京:清华大学出版社,2003.
[4] 明日科技.Visual Basic管理信息系统完整项目实例剖析[M].北京:人民邮电出版社,2005.
[5] 萨师煊, 王珊. 数据库系统概论[M].北京:高等教育出版社,2003.
[6] 龚沛曾.Visual Basic程序设计教程[M]北京:高等教育出版社,2004.
[7] 黄明. 管理信息系统开发毕业设计与开发实例[M].西安:西安电子科技大学出版社,2005.
[8] 黄明.Visual Basic 6.0信息系统设计与开发实例[M].西安:西安电子科技大学出版社,2005.
[9] 何维义. 房屋租赁实战开发与管理[J].房屋中介理论与实践,2004，Vol8(4):42-44.
[10] 傅若宇. 房屋租赁管理与应用[J].2004，Vol(6):23-25.
[11] 马爱方. 房屋中介信息期刊管理与应用[J].房屋中介工作与研究,2006，Vol5(4):32-36.
[12] 张和平. 房屋租赁管理信息系统设计[J].合肥工业大学学报(自然科学版),2006,Vol(5):23-25.
[13] Shrabonti Ghosh, S.S. Alam, Computer Science [J]. Lecture Notes in Computer, 2006, Vol2(7):12-18.
[14] Jin Hgun Son, International Journal On Digital Libtaries [J]. Database Management, 2006, Vol2(9):34-39.
附录（部分程序清单）
部分源程序：
在此重点分析房屋与客户中新增，删除，保存三个命令按钮的源代码设计： 新增按钮的源代码：
Private Sub cmdAdd_Click()
’设置除保存和取消按钮外的其他按钮不可用
cmdAdd.Enabled = False
cmdEdit.Enabled = False
cmdDel.Enabled = False
cmdSave.Enabled = True
cmdCancel.Enabled = True
cmdFirst.Enabled = False
cmdPrev.Enabled = False
cmdNext.Enabled = False
cmdLast.Enabled = False
cmdQuery.Enabled = False
’需要清空所有text 框，并且设置它们可写
For i = 0 To 7
Text(i).Txt = “”
Text(i).Enabled = True
Next i
Combol.Enabled = True
’add 变量用于保存时判断是从添加还是修改后保存
add = 1
Text 1(0).SetFocus
End Sub
Private Sub cmdCancel_Click()
’取消按钮用于用户添加或修改过程中放弃添加或修改操作
cmdSave.Enabled = False
cmdCancel.Enabled = False
cmdAdd.Enabled = True
cmdQuery.Enabled = True
’如果是从添加后取消
If add = 1 Then
’如果当前House 表中有数据则显示第一条数据
If Nor rs_house.EOF And Not rs_house. BOF Then
For i = 0 To 7
Text(i).Text = rs_house.Fields(i)
Next i
If rs_house.Fields(8) = “已租” Then
Combol.ListIndex = 0
ElseIf rs_house.Fields(8) = “未租” Then
Combol.ListIndex = 1
ElseIf rs_house.Fields(8) = “意向” Then
Combol.ListIndex = 2
End If
CmdEdit.Enabled = True
CmdDel.Enabled = True
CmdFirst.Enabled = True
CmdPrev.Enabled = True
CmdNext.Enabled = True
CmdLast.Enabled = True
’如果没有数据，则显示空
Else
For I = 0 To 7
Text(i).Text = “”
Next i
CmdEdit.Enabled = False
CmdDel.Enabled = False
CmdFirst.Enabled = False
CmdPrev.Enabled = False
CmdNext.Enabled = False
CmdLast.Enabled = False
End Tf
’如果是修改后取消，则恢复到修改前的数据
ElseIf add = 0 Then
For I = 0 To 7
Text1(i).Text = rs_house.Fields(i)
Next i
If rs_house.Fields(8) = “已租” Then
Combol.ListIndex = 0
ElseIf rs_house.Fields(8) = “未租” Then
Combol.ListIndex = 1
ElseIf rs_house.Fields(8) = “意向” Then
Combol.ListIndex = 2
End If
End If
’开始时设置各个text 框不可写
For i = 0 To 7
Text1(i).Enabled = False
Next i
’先设置ComboBox 的默认值及不可改
Combol.Enabled = False
End Sub
Private Sub cmdClose_Click()
Unload Me
End Sub
删除按钮的源代码：
Private Sub cmdDel_Click()
’当单击删除记录时，需要弹出一个提示框，警告用户
Dim answer As String
Answer = MsgBox(“确定要删除吗？”，vbYesNo, “”)
’确实删除
If answer = vbYes Then
rs_house.Delete ’删除当前记录
rs_house.Update ’更新删除
MsgBox “成功删除！”， vbOKOnly + vbExlamation, “” Else
Exit Sub
End If
’删除之后，显示总信息条数需要减1
Text2.Text = Val(Text2.Text) – 1
’删除当前记录后，需要显示下一条记录，如果删除的是最后一条记录，则显示上一条记录
’先移动rs_house记录到后一条
rs_house.MoveNext
If rs_house.EOF Then
Rs_house.MovePrevious
’如果没有到记录首则显示该记录
If Not rs_house.BOF Then
For I = 0 To 7
Text1(i).Text = rs_house.Fields(i)
Next i
If rs_house.Fields(8) = “已租” Then
Combol.ListIndex = 0
ElseIf rs_house.Fields(8) = “未租” Then
Combol.ListIndex = 1
ElseIf rs_house.Fields(8) = “意向” Then
Combol.ListIndex = 2
End If
’如果到记录首，则表格已经为空，置所有text 框显示为空 ElseIf rs_house.BOF Then
For I = 0 To 7
Text1(i).Text = “”
Next i
cmdFirst.Enabled = False
cmdPrev.Enabled = False
cmdNext.Enabled = False
cmdLast.Enabled = False
End If
’如果删除的不是首尾记录，则显示当前记录即可
Else
For i = 0 To 7
Text1(i).Text = rs_house.Fields(i)
Next i
If rs_house.Fields(8) = “已租” Then
Combol.ListIndex = 0
ElseIf rs_house.Fields(8) = “未租” Then
Combol.ListIndex = 1
ElseIf rs_house.Fields(8) = “意向” Then
Combol.ListIndex = 2
End If
End If
End Sub
保存按钮的源代码：
Private Sub cmdEdit_Click()
’设置除保存和取消按钮外的其他按钮不可用
cmdAdd.Enabled = False
cmdEdit.Enabled = False
cmdDel.Enabled = False
cmdSave.Enabled = True
cmdCancel.Enabled = True
cmdFirst.Enabled = False
cmdPrev.Enabled = False
cmdNext.Enabled = False
cmdLast.Enabled = False
cmdQuery.Enabled = False
’需要设置除主键之外的text 框可写
For I = 1 To 7
Text1(i).Enabled = True
Next i
Combol.Enabled = True
add = 0
End Sub
Private Sub cmdFirst_Click()
’先移动rs_house记录到第一条
Rs_house.MoveFirst
’同时需要设置相应按钮为可用和不可用
cmdFirst.Enabled = False
cmdPrev.Enabled = False
cmdNext.Enabled = True
cmdLast.Enabled = True
’如果已经是第一条记录，则提示用户
If rs_house.BOF = True Then
MsgBox “对不起，已经是第一条记录了！”， vbOKOnly + vbInformation, “注意”
Exit Sub
’如果不是，则这个数据表的记录位置移到第一条记录，并且显示之 Else
For I = 0 To 7
Text(i).Text = rs_house.Fields(i)
Next i
If rs_house.Fields(8) = “已租” Then
Combol.ListIndex = 0
ElseIf rs_house.Fields(8) = “未租” Then
Combol.ListIndex = 1
ElseIf rs_house.Fields(8) = “意向” Then
Combol.ListIndex = 2
End If
End If
End SubPREV
课程设计报告
题 目 屋租赁管理系统设计与实现
课 程 名 称 工程项目实践
院 部 名 称
专 业 计算机科学与技术
班 级 M11计算机科学与技术 II
学 生 姓 名
学 号
课程设计地点 校 内
课程设计学时 8 周
指 导 教 师 钟 睿
金陵科技学院教务处制
【注：根据课程设计大纲第四项具体要求撰写课程设计报告】
【摘要】随着我国市场经济的快速发展和人们生活水平的不断提高，简单的租凭服务已经不能满足人们的需求。如何利用先进的管理手段，提高房屋租凭管理水平，是当今社会所面临的一个重要课题。本文通过用Visual Basic 6.0编写房屋租赁管理系统，利用软件工程原理，采用面向对象的编程方法，其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面，实现了房屋租赁管理的自动化和信息化。整个系统从符合操作简便、界面友好、灵活实用、数据安全的要求出发，完成基本资料管理、客户资料管理、租凭合同管理、财务管理、统计报表管理等功能。经过实际测试证明，本文所设计的房屋租赁管理系统，可以用于物业管理部门从事房屋租赁信息管理的工作，基本满足各方面的需要。论文主要介绍了本课题的开发背景，所要完成的功能和开发的全过程。着重说明了系统设计的重点、设计思想、技术难点和解决方案。
【关键词】数据库 Visual Basic 6.0 房屋租赁管理系统
【Abstract 】Along with the our country market economy fast development and the people living standard unceasing enhancement, simple rented depends on the service already not to be able to meet people's need. How uses the advanced management method, enhances the room to depend on the management level, is an important topic which now the society faces. This article through uses VB6.0 to compile the house to rent the management system management system, using the software engineering principle, uses the object-oriented programming method, its development mainly includes the backstage database the establishment and the maintenance as well as front end the application procedure development two aspects, realized the house to rent the management the automation and the information。The overall system from conforms to the operation easily, the contact surface friendly, is nimble, practical, the safe request embarks, completes the basic document management, the customer material management, rents depends on function and so on contract management, financial control, statistical report form management After the actual test proof, the house which this article designs rents the management system management system to be allowed to use in the estate management department to be engaged in the house to rent the information management aspect the need. The paper mainly introduced this topic development background, must complete function and development entire process. Key explanation system design key point, design thought, difficult technology and solution.
【Keywords 】Database Visual the Basic 6.0 houses rent the management system management system
目录
前言……………………………………………………………………1 1 房屋租赁管理系统概述……………………………………………2
1.1 课题来源„„„„„„„„„„„„„„„„„„„„„„2
1.2 开发背景和开发目的„„„„„„„„„„„„„„„„„2
1.3 系统任务„„„„„„„„„„„„„„„„„„„„„„3
1.4 系统目标„„„„„„„„„„„„„„„„„„„„„„3
1.5 系统计划„„„„„„„„„„„„„„„„„„„„„„3 2 可行性研究…………………………………………………………4
2.1 技术可行性„„„„„„„„„„„„„„„„„„„„„4
2.2 经济可行性„„„„„„„„„„„„„„„„„„„„„5
2.3 社会可行性„„„„„„„„„„„„„„„„„„„„„5 3 系统分析……………………………………………………………6
3.1 业务流程„„„„„„„„„„„„„„„„„„„„„„6
3.2 数据流程图„„„„„„„„„„„„„„„„„„„„„8
3.3 数据字典„„„„„„„„„„„„„„„„„„„„„„9 4 系统设计……………………………………………………………11
4.1 系统模块设计„„„„„„„„„„„„„„„„„„„„11
4.2 数据库分析设计„„„„„„„„„„„„„„„„„„„14
4.3 输入输出设计„„„„„„„„„„„„„„„„„„„„16 5 系统实施与测试……………………………………………………17
5.1 系统实施„„„„„„„„„„„„„„„„„„„„„„17
5.2 系统测试„„„„„„„„„„„„„„„„„„„„„„17 结论……………………………………………………………………22 致谢……………………………………………………………………23 参考文献………………………………………………………………24 附录 部分程序清单…………………………………………………25
前言
信息化建设日渐深入，如何利用日新月异的计算机技术建立一套高效、灵活、功能强大的管理系统，正成为计算机专业人员关注的重要问题。信息化进程不断推进，使得其更加逐步地渗透到了普通人的生活领域。
本文通过对部分房屋出租方的功能分析、需求分析，进行房屋租赁管理系统的设计与实现。具体实现了房屋出租房、客户等相关信息的添加等。
房屋租赁管理系统是针对在房屋管理中所遇到的问题，如用户信息管理、房屋信息管理、租金信息管理的查询、统计等诸多功能。用人手处理以上工作，效率不高，工作量大，而且所得数据并不可靠。本系统改善了人手操作的不足，提供可靠的查询、准确无误的统计，简单快捷的查找流程。使繁琐复杂的房屋租赁管理工作变得轻松悠闲。本系统适用于中小型房屋中介应用。
房屋租赁管理系统，用来管理房屋与用户过程中的静态和动态信息。本系统是一个典型的房屋租赁管理系统，系统管理的信息主要分为基本资料管理、客户资料管理、租赁管理、财务管理以及统计报表五大部分等，系统的目的就是有效地处理这些信息。
1 房屋租赁管理系统概述
1.1 课题来源
我国市场经济快速发展，信息化水平不断提高，如何利用先进的管理手段，提高物业管理的水平，是当今社会所面临的一个重要课题。提高企业的管理水平，必须全方位地提高企业的管理意识。只有高标准、高质量的管理才能满足企业的发展需求。面对信息时代的挑战，利用高科技手段来提高房屋租赁管理无疑是一条行之有效的途径。在某种意义上，信息与科技在企业管理与现代化建设中显现出越来越重要的地位。房租租赁管理方面的信息化与科学化，已成为现代化生活水平步入高台阶的重要标志。
计算机技术不断的飞速发展，计算机以及计算机控制的自动处理技术已融入人类社会的各个领域并发挥着越来越重要的作用。当今社会，科学信息技术有了重大的飞跃，为人们的生活、工作、学习带来潜移默化的影响。今天我们使用计算机对房屋租赁信息进行管理，具有手工管理所无法比拟的优点。例如：检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高房屋租赁管理的效率。面对目前的实际状况，迫切需要开发一个简单快捷的系统来适应这些工作。
1.2 开发背景和开发目的
利用计算机实现物业管理中的房屋租赁管理势在必行。对于物业管理企业来说，利用计算机支持企业高效率完成房屋租赁管理的日常事务，是适应现代企业制度要求、推动企业劳动型管理走向科学化、规范化的必要条件。而房屋租赁管理是一项琐碎、复杂而又十分细致的工作。
房屋的基本资料，客户资料的管理，房屋租赁管理，各项收费以及统计报表的管理，一般不允许出错。如果实行手工操作，须手工填制大量的表格，这就会耗费工作人员大量的时间和精力。计算机进行房屋租赁工作的管理，不仅能够保证各项信息准确无误、快速输出，同时计算机具有手工管理所无法比拟的优点，例如：检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高物业管理的效率，也是企业的科学化、正规化管理，
与世界接轨的重要条件。
开发本系统就是为了解决物业管理企业在房屋租赁信息管理中的一些不规范，使房屋租赁信息的管理向着规范化、简单化、有效化的方向发展。
1.3 系统任务
房屋管理系统是管理房屋的重要工具，一个完善的房屋系统的任务主要包括以下几项：
房屋基本资料管理，主要负责管理各种房屋信息；
客户基本资料管理，主要负责客户的一些信息；
租金合同管理，主要负责为求租户与租户之间达成协议；
系统管理，主要负责管理用户信息和用户登录。
1.4 系统目标
采用企业现有的软硬件环境以及科学的管理系统开发方案，建立房屋租赁信息管理系统，实现房屋租赁信息管理的计算机自动化。系统应符合物业管理企业原有的房屋租赁管理制度，并达到操作直观、方便、使用、安全等要求。
1.5 系统计划
系统开发过程计划如下：总体上分为三大阶段来完成，要求每一阶段的任务都要按质按量来完成，以便整个系统功能能够正常运行。
第一阶段：系统分析，可行性分析；
第二阶段：系统总体设计，实现子系统及各个模块的组合；
第三阶段：软硬件的准备，系统的调试与测试。
2 可行性研究
2.1 技术可行性
技术可行性包括以下几个方面：硬件、系统软件、应用软件、技术人员。针对这四个方面可行性都是没有问题的。本系统预采用Visual Basic编程语言加Access 数据库。目前，数据库产品较多，每种产品都具有各自的特点和适用范围，选择最合适的。VB 程序语言具有许多优秀的特性，用其设计应用程序时有两个基本特点：可视化设计和事件驱动编程。
在设计时，头脑中所想象的应用程序界面，完全可以通过键盘鼠标以及徒手画出来，而不是编制大量的代码然后再编译生成，如果需要修改，也是利用键盘鼠标和手画，而底层的一些程序代码由VB 自动生成或修改。
Windows 操作系统出现以来，图形化的用户界面和多任务多进程的应用程序要求程序设计不能是单一性的，再使用VB 应用程序时，必须首先确定应用程序如何同用户进行交互，例如发生鼠标单击、键盘输入等事件时，由用户编写的代码控制这些事件的响应，这就是所谓的时间驱动编程。
传统的应用程序开发过程可以分为三个明显的步骤：编码、编译和测试。但是VB 与传统的语言不通，它使用交互式方法开发应用程序，使三个步骤之间不再有明显的界限。
在大多数语言里，如果编写代码时发生了错误，则在开始编译应用程序时该错误就会被编译器捕获。此时必须查找并改正该错误，然后再次进行编译，对每一个发现的错误都要重复这样的过程。VB 在编程者输入代码时便进行解释，即使捕获并突出显示大多数语法或拼写错误。
除即使捕获错误以外，VB 也在输入代码时部分的编译该代码。当准备运行和测试应用程序时，只需极短时间即可完成编译。如果编译器发现了错误，则将错误突出显示于代码中。这样可以更正错误并继续编译，而不需从头开始。
由于VB 的交互特性，因此在开发应用程序时，系统频繁地运行着应用程序，通过这种方式，代码运行的效果可以在开发时进行测试，而不必等到编译完成以后。
房屋租赁管理系统中采用的是Access2000数据库。Access2000就是一个关系数据库开发工具，数据库能汇集各种信息以供查询、存储和检索。Access 的
优点在于它使用数据库表示图或自定义窗体收集信息，数据表示图提供了一种类似于Excel 的电子表格，可以使数据库一目了然。另外，Access 也允许创建自定义报表用于打印或输出数据库中的信息。Access 也提供了数据存储库，可以使用桌面的数据库文件吧数据库文件置于网络文件服务器，与其他网络用户共享数据库。如上所述，Access 作为关系数据库开发具备了许多优点。可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。
数据库访问方式：ADO （Active Data Objects）实际是一种提供访问各种数据类型的连接机制。ADO 设计为一种极简单的格式，通过ODBC 的方法同数据库接口。可以使用任何一种ODBC 数据源，即不止适合于SQL Server、Oracle 、Access 等数据库应用程序，也适合于Excel 表格、文本文件、图形文件和无格式的数据文件。ADO 是基于OLE-DB 之上的技术，因此ADO 通过其内部的属性和方法提供统一的数据访问接口方法。其主要优点是易于使用、高速度、低内存支出和占用磁盘空间很少。
Data 控件是在数据库中的信息与将信息显示给用户看的Visual Basic 程序之间架起了一座桥梁。我们可以设置data 控件的各个属性，告诉它要调用哪个数据库的哪个部分，缺省的情况下，data 控件根据数据库中的一个或多个数据表建立一个dynaset-type （动态集合）类型的记录集合。一个记录集合是动态的也就意味着当原来的数据表中的内容该表了以后，该记录集合中的记录也会随之该表，data 控件还提供了用来浏览不同记录的各种跳转按钮。将data 控件旋转在窗体中之后，我们还必须在该控件与要处理的数据库之间建立联系。
2.2 经济可行性
本系统开发简单但要耗去一定的时间，所用的开发工具和软件都差不多是免费的。而且，由于系统能够在未来较长一段时期内稳定地发挥作用，这对于房屋租赁信息的自动化管理，以及管理企业的人力和财力都有很大的帮助。由此可见，开发此系统在经济上是完全可行的。
2.3 社会可行性
如今的计算机已经走进千家万户，硬件成本的下降，导致计算机购买成本的降低，这套系统有友好的用户界面、良好的安全性设置、详细的操作说明，这样可以使各类用户很快地掌握系统的使用方法，因此在社会上普及是可行的。
3 系统分析
系统分析阶段的任务是：系统分析员与用户在一起，充分了解用户的要求，并把双方的理解用系统说明书的方式表达出来。系统说明书审核通过之后，将成为系统设计的依据和将来验收的依据。系统分析是要回答系统要“做什么”这个问题。只有明确了问题，才有可能解决问题。
3.1 业务流程
房屋租赁管理活动其核心是对房屋、客户及其合同信息的管理。首先，房屋管理者要进行房屋登记，录入房屋的基本信息，以便对房屋有良好的管理；其次，要进行客户登记，客户进行登记之后才能进行查询；最后是发生在客户与房屋两个实体之间的合同信息，而且要对此信息做反馈。
3.1.1 总的业务流程图
业务处理管理
数据的存储 数据流向 业务处理功能描述 表格报表的制作
房屋租赁管理系统总的业务流程是：管理员对房屋和客户的管理。管理员通过对房屋做出相应的处理，然后根据处理的结果存储在房屋信息表里。通过对客户的管理，将管理后的信息存入客户信息表里。
图3.1 总的业务流程
3.1.2 详细业务流程图 （1）权限管理业务流程图
通过不同的用户类型，通过登录界面确定后，进入相应的系统界面，进行系统操作，不同的权限，会进行不同的功能模块操作。
图3.2 权限管理业务流程
（2）管理员信息管理业务流程图
管理员可以进行管理员信息的修改、删除、查询、添加管理员等操作。
图3.3 管理员信息管理业务流程
3.2 数据流程图
数据流程图是描述实际业务管理系统工作流程的一种图形表示法。它描述系统的逻辑模型图，其中没有任何具体的物理元素，只是描绘信息在系统中流动和处理的情况，本文主要是为了对房屋、客户基本信息等进行计算机管理。
系统总体流程图如下： 图3.4 系统流程
下面是对各个功能模块的流程分析： （1）房屋类别管理基本信息流程：
分析：房屋类别基本信息的流动首先是以房屋类别的编号为依据，来达到添加、修改、查询类别记录。同时，也对数据库中的房屋类别表的编号进行检查。
（2）客户信息管理基本信息流程：
分析：客户基本信息的流动，首先是以客户编号为流动方向的依据，来达到添加、修改、记录、删除记录。为了数据的一致性，进行这些操作的同时，也对数据库中的记录进行检查，检查是否有重复的记录。如有则不能进行添加。
（3）租赁信息类别管理基本信息流程：
分析：租赁信息类别基本信息的流动首先是以合同类别编号为流动方向的依据，来达到添加、修改、记录读者类别记录。为了数据的一致性，也对数据库的
记录进行检查。
3.3 数据字典
（1）数据元素
表3.1 数据元素
（2）数据流条目
表3.2 数据流条目
（3）处理功能条目
表3.3 处理功能条目
4 系统设计
4.1 系统模块设计
根据前边对房屋租赁管理系统的分析，一个标准的房屋租赁管理系统应该包含以下的一些功能：
图4.1 系统功能
4.1.1 基本资料模块
基本资料模块负责维护房屋类型信息，主要提供添加、修改、删除功能。房屋类型包括：房屋编号、房型、装修新情况、物业地址、建筑面积、出租价位、使用面积、目前状态、备注。
图4.2 基本资料功能模块
4.1.2 客户资料模块
客户资料模块主要由租户资料和求租户资料组成，主要提供增加、修改、删除和查询功能。客户类别信息主要包括：租户编号、租户姓名、性别、工作单位、电话、身份证、租住人数、备注；求租户编号、求租户姓名、电话、房型要求、面积要求、装修要求、意向价位、意向房屋编号、备注。
图4.3 租户资料功能模块
图4.4 求租资料功能模块
4.1.3 租赁管理模块
租赁管理模块主要负责为客户提供房屋信息服务，租赁信息主要包括合同签订、合同续签、合同管理、预定租房、合同查询、预订单查询、出租到期提醒、
预定到期提醒。
图4.5 租赁管理功能模块
4.1.4 系统管理模块
系统管理模块主要负责用户权限管理，包括用户管理、密码维护、重新登录，其功能模块如下所示：
用户管理模块负责管理用户信息，包括用户ID 、用户姓名、用户类别、密码等。
密码维护模块负责维护客户的密码信息。
重新登录模块主要负责给客户提供重新登录功能，重新登录时将检查用户权限。
4.2 数据库分析设计
4.2.1 数据库的规范化设计
进行数据库程序设计，首先要做的工作就是设计数据库表格，就是设计每一
个表应该由哪几列构成，这项工作看似很简单，实际上是很复杂的，实现的不好，会使表格中产生大量的重复性数据，造成存储空间的浪费，还有可能造成记录内容的不一致，即所谓的存储异常问题。
数据表格的设计是很重要的，如果设计的不合理，将会带来大量的问题。为了解决上面这个问题，我们应该将上述表格分成几个表格，具体的如何分解表格才算符合要求，这就需要用到数据组织的规范化形式。
在规范化理论中表式二维的，它具有如下四个性质： （1）在表中的任意一列上，数据项应属于同一个属性。 （2）表中所有行都是不相同的，不允许有重复组项出现。 （3）在表中，行的顺序无关紧要。
（4）在表中，列的顺序无关紧要，但不能重复。 4.2.2 表的建立
数据表之间的关系指明两个表之间共享一个共同的关键字值。一个连接是指一种虚拟的表。这种表是在当用户要求从相互关联的各个不同的表中获取信息时建立的，关键字段用于在相互连接的不同表中查找匹配的记录。一个更高级的连接形式成为自连接。这种连接是指一个表被连接。
根据系统分析，系统需要建立五个表，其中主要的三个表用途说明如下：
表4.1 系统需建立的表
4.2.3 系统E-R 图
E-R 图是一种信息模型图，体现了系统实体之间的关系。通过系统需求分析，了解了系统的分解功能，以及数据流程。根据这些实体和实体之间的关系可以得
到系统E-R 图如下所示：
图4.6 房屋租赁实体E-R 关系
图4.7 管理员实体E-R 关系
4.3 输入输出设计
实现目标：为了保证应用程序的安全，通常要使用系统登录程序来验证登录系统的用户是否合法，只有合法的用户才可进入系统。在输入用户名和密码后，如正确，则进图房屋租赁管理系统，管理员可以进行一系列操作；如用户名或密码错误，系统会显示提示信息，提示用户进行重新输入。如果连续输入三次错误，系统自行关闭，用户需要重新登录。
（1）通过输入正确的用户口令进入图书馆管理系统。
（2）密码错误提醒并返回错误点，三次口令错误，推出系统。 开发过程：
图4.8 输入输出实体E-R 关系
5 系统实施与测试
5.1 系统实施
5.1.1 硬件、软件的准备
根据系统分析和系统设计方案的要求，选择与安装符合新系统运行环境要求的硬件和软件。
硬件环境：推荐配置：256M 内存，P4 1.2GHz，40GB 硬盘，800*600分辨率显示器；
软件环境：客户端系统要求：操作系统Windows 98/Me
数据库Access2000
工具Visual Basic 6.0。
5.1.2 数据准备
按照数据库设计准备方案的要求，安装调试系统所需要的数据库管理系统。收集和整理信息系统的运行所需的基础数据，建立数据库。
5.1.3 程序设计
制定编程的规范约定；采用结构化程序设计方法；选择合适的程序设计语言进行编程，包括程序的设计、测试、运行和调试。
5.1.4 系统测试与调试
系统测试时为了发现系统中所存在的错误而运行系统的过程，其目的就是在系统投入运行之前，尽可能多的发现系统中的错误，以保证系统可靠地、高质量地实现设计功能；系统调试是将测试出的错误进行诊断和改正。
5.2 系统测试
目前，检测软件有三种手段：动态检查、静态检查和正确性证明。检测的目的是为了发现程序的错误。因此，测试的关键问题是如何设计测试用例，即设计一批测试数据，通过有限的测试用例，在有限的研制时间、研制经费的约束下，尽可能多地发现程序中的错误。测试有四种类型：模块测试、联合测试、验收测试、系统测试。
测试的原则：测试数据包括输入数据和预期的输出效果；不仅要选用合理的
输入数据作为测试用例，而且应选择不合理的数据作为测试用例；既要检查程序是否完成了它应做的工作，又要检查它是否还做了它不应做的事情；测试用例应长期保存，直到这个程序被废弃。
本程序所采用的测试方法是：白箱测试，黑箱测试。
白箱测试：根据一个软件部件的内部控制结构，测试它是否依据设计正确的执行。
对于本系统而言，我们在对初始情况下的测试主要是根据代码的思想来一步一步进行测试，运行循环和选择的方法在调试系统过程中应用的都是白箱测试方法，从编程的角度来调试系统，从而测试系统已知数据的运行得到相应的结果。
黑箱测试：根据一个软件部件由外部界面所能观察到的功能效果，测试它是否与其他部件正确的沟通，一般指输入正确时，看是否有正确的输出。
对于房屋租赁管理系统，我们主要是在系统运行过程中，输入相应数据，看是否能得到我们所期望的数据结果来进行测试，如果结果正确，则测试成功。
5.2.1 测试步骤
（1）设计测试情况
采用黑箱测试和白箱测试相结合的方法，根据程序的具体内容设计测试情况，并编制一些测试程序，以备上机运行，开展测试工作。
（2）进行模块测试
采用“自顶向下”和“自底向上”的方法测试每一个程序模块，直至整个系统。
（3）完成功能测试
验收测试，安装测试等高级测试内容，进而完成整个系统的测试任务。
5.2.2 测试用例
（1）根据以上步骤，以添加房屋类别为例：
输入：相关的房屋类别信息
期望输出：添加房屋类别成功
实际输出：添加房屋类别成功
图5.1 房屋类用例测试
（2）添加客户信息
输入：相关客户信息
期望输出：客户信息添加成功
实际输出：客户信息添加成功
图5.2 客户类用例测试
（3）修改当前用户密码
输入：用户需要修改的密码
期望输出：修改密码成功
实际输出：修改密码成功
图5.3 用户密码用例测试
其中用户admin 的密码已经修改，当再次进入系统时，如果用户admin 在登
录时，只能输入新密码才可登录，而旧密码提示“密码或用户名输入错误”，那么测试成功。
（4）添加管理员
输入：添加新的管理员用户名跟密码
期望输出：添加管理员成功
实际输出：添加管理员成功
图5.4 管理员用例测试
在对一些系统功能的测试中，还运用了对菜单的测试，系统多个模块功能联合的测试，均取得了预期的效果。
经过一个多月的努力，毕业设计终于完成了。在这段学习和实践的时间里，虽然遇到过很多的困难，也看到了希望。房屋租赁管理系统的设计，让我又掌握了一门技术，虽然还不够精通，但还是有一定的认识和了解，对于我将来的学习是有帮助的。本系统的功能基本符合设计需求，能够完成房屋租赁信息的存储和查询以及各类相关报表统计。使用户方便进行数据输入、修改、删除等管理操作。对于数据的一致性的问题也通过程序进行了有效的解决。
在系统设计过程中，我体会到了即使是一件小事也不能马虎，在设计之前一定要对所设计的系统有较为深刻的了解，并对用户的要求加以认真的分析，并给予分类，对所分类进行功能模块化设计，画出系统数据流程图，这样在进行详细设计时才可以做到有条不紊一步一步地进行。编制一个系统还是有很多可学习的地方，不仅要掌握好相关知识，而且做事要细心、谨慎，这也是将来工作和学习应该注意的地方。
总的来说，通过这次课题，我也同时学到了技术层面以外的知识，那就是在建立应用程序上的流程：定出研究方向，收集资料，分析资料，确定项目，实现分析，提出实现方案，程序编辑，程序调试，程序修改，程序增添等等的步骤。这些都使我认识到建立应用程序不是一件随便的事情，它有一个系统的、严密的、逻辑的工作流程。
将来的社会是竞争激烈的社会，特别是计算机行业，要不断的学习学习再学习，才可以吧自己融入到社会的发展中去，所以在工作过程中，要不断的充电，才可以更好的体会自己人生的价值。
由于本人水平有限，在文中难免有不足之处，望各位老师和同学批评指正。
通过这次毕业设计，使我感到高科技、新知识的力量。
在本次毕业设计中，我从指导老师身上学到了很多东西，取人之长，补己之短。指导老师认真负责的工作态度，严谨的治学精神和身后的理论水平都使我受益匪浅。无论在理论上还是实践中，都给予我很大的帮助，使我得到不少的提高。
整个毕业设计过程中，从最初的选题到中期检查，从系统的完成到现在的毕业设计论文，由于经验匮乏，难免有很多考虑不周的地方。导师无论多忙多累，都会给予了精心的指导和热情的帮助。这对于我今后的工作和学习都是一种巨大的帮助和财富，衷心感谢指导老师的耐心辅导，在此我向指导老师致以崇高的敬意。
另外，在系统开发过程中，周围的同学也给予了我相当大的帮助，解决了不少的难点，使得系统能够及时开发完成，在此一并表示感谢。
还要感谢大学四年来所有教过我的老师，为我打下了计算机的专业基础知识，为毕业设计打下了坚实的基础。对学院及专业一并表示深深的谢意！
参考文献
[1] 王栋 Visual Basic程序设计使用教程[M].北京:清华大学出版社,2005.
[2] 武新华, 魏平俊.Visual Basic管理信息系统开发案例[M].西安:西安电子科技大学出版社,2006.
[3] 邝孔武, 王晓敏. 信息系统分析与设计[M].北京:清华大学出版社,2003.
[4] 明日科技.Visual Basic管理信息系统完整项目实例剖析[M].北京:人民邮电出版社,2005.
[5] 萨师煊, 王珊. 数据库系统概论[M].北京:高等教育出版社,2003.
[6] 龚沛曾.Visual Basic程序设计教程[M]北京:高等教育出版社,2004.
[7] 黄明. 管理信息系统开发毕业设计与开发实例[M].西安:西安电子科技大学出版社,2005.
[8] 黄明.Visual Basic 6.0信息系统设计与开发实例[M].西安:西安电子科技大学出版社,2005.
[9] 何维义. 房屋租赁实战开发与管理[J].房屋中介理论与实践,2004，Vol8(4):42-44.
[10] 傅若宇. 房屋租赁管理与应用[J].2004，Vol(6):23-25.
[11] 马爱方. 房屋中介信息期刊管理与应用[J].房屋中介工作与研究,2006，Vol5(4):32-36.
[12] 张和平. 房屋租赁管理信息系统设计[J].合肥工业大学学报(自然科学版),2006,Vol(5):23-25.
[13] Shrabonti Ghosh, S.S. Alam, Computer Science [J]. Lecture Notes in Computer, 2006, Vol2(7):12-18.
[14] Jin Hgun Son, International Journal On Digital Libtaries [J]. Database Management, 2006, Vol2(9):34-39.
附录（部分程序清单）
部分源程序：
在此重点分析房屋与客户中新增，删除，保存三个命令按钮的源代码设计： 新增按钮的源代码：
Private Sub cmdAdd_Click()
’设置除保存和取消按钮外的其他按钮不可用
cmdAdd.Enabled = False
cmdEdit.Enabled = False
cmdDel.Enabled = False
cmdSave.Enabled = True
cmdCancel.Enabled = True
cmdFirst.Enabled = False
cmdPrev.Enabled = False
cmdNext.Enabled = False
cmdLast.Enabled = False
cmdQuery.Enabled = False
’需要清空所有text 框，并且设置它们可写
For i = 0 To 7
Text(i).Txt = “”
Text(i).Enabled = True
Next i
Combol.Enabled = True
’add 变量用于保存时判断是从添加还是修改后保存
add = 1
Text 1(0).SetFocus
End Sub
Private Sub cmdCancel_Click()
’取消按钮用于用户添加或修改过程中放弃添加或修改操作
cmdSave.Enabled = False
cmdCancel.Enabled = False
cmdAdd.Enabled = True
cmdQuery.Enabled = True
’如果是从添加后取消
If add = 1 Then
’如果当前House 表中有数据则显示第一条数据
If Nor rs_house.EOF And Not rs_house. BOF Then
For i = 0 To 7
Text(i).Text = rs_house.Fields(i)
Next i
If rs_house.Fields(8) = “已租” Then
Combol.ListIndex = 0
ElseIf rs_house.Fields(8) = “未租” Then
Combol.ListIndex = 1
ElseIf rs_house.Fields(8) = “意向” Then
Combol.ListIndex = 2
End If
CmdEdit.Enabled = True
CmdDel.Enabled = True
CmdFirst.Enabled = True
CmdPrev.Enabled = True
CmdNext.Enabled = True
CmdLast.Enabled = True
’如果没有数据，则显示空
Else
For I = 0 To 7
Text(i).Text = “”
Next i
CmdEdit.Enabled = False
CmdDel.Enabled = False
CmdFirst.Enabled = False
CmdPrev.Enabled = False
CmdNext.Enabled = False
CmdLast.Enabled = False
End Tf
’如果是修改后取消，则恢复到修改前的数据
ElseIf add = 0 Then
For I = 0 To 7
Text1(i).Text = rs_house.Fields(i)
Next i
If rs_house.Fields(8) = “已租” Then
Combol.ListIndex = 0
ElseIf rs_house.Fields(8) = “未租” Then
Combol.ListIndex = 1
ElseIf rs_house.Fields(8) = “意向” Then
Combol.ListIndex = 2
End If
End If
’开始时设置各个text 框不可写
For i = 0 To 7
Text1(i).Enabled = False
Next i
’先设置ComboBox 的默认值及不可改
Combol.Enabled = False
End Sub
Private Sub cmdClose_Click()
Unload Me
End Sub
删除按钮的源代码：
Private Sub cmdDel_Click()
’当单击删除记录时，需要弹出一个提示框，警告用户
Dim answer As String
Answer = MsgBox(“确定要删除吗？”，vbYesNo, “”)
’确实删除
If answer = vbYes Then
rs_house.Delete ’删除当前记录
rs_house.Update ’更新删除
MsgBox “成功删除！”， vbOKOnly + vbExlamation, “” Else
Exit Sub
End If
’删除之后，显示总信息条数需要减1
Text2.Text = Val(Text2.Text) – 1
’删除当前记录后，需要显示下一条记录，如果删除的是最后一条记录，则显示上一条记录
’先移动rs_house记录到后一条
rs_house.MoveNext
If rs_house.EOF Then
Rs_house.MovePrevious
’如果没有到记录首则显示该记录
If Not rs_house.BOF Then
For I = 0 To 7
Text1(i).Text = rs_house.Fields(i)
Next i
If rs_house.Fields(8) = “已租” Then
Combol.ListIndex = 0
ElseIf rs_house.Fields(8) = “未租” Then
Combol.ListIndex = 1
ElseIf rs_house.Fields(8) = “意向” Then
Combol.ListIndex = 2
End If
’如果到记录首，则表格已经为空，置所有text 框显示为空 ElseIf rs_house.BOF Then
For I = 0 To 7
Text1(i).Text = “”
Next i
cmdFirst.Enabled = False
cmdPrev.Enabled = False
cmdNext.Enabled = False
cmdLast.Enabled = False
End If
’如果删除的不是首尾记录，则显示当前记录即可
Else
For i = 0 To 7
Text1(i).Text = rs_house.Fields(i)
Next i
If rs_house.Fields(8) = “已租” Then
Combol.ListIndex = 0
ElseIf rs_house.Fields(8) = “未租” Then
Combol.ListIndex = 1
ElseIf rs_house.Fields(8) = “意向” Then
Combol.ListIndex = 2
End If
End If
End Sub
保存按钮的源代码：
Private Sub cmdEdit_Click()
’设置除保存和取消按钮外的其他按钮不可用
cmdAdd.Enabled = False
cmdEdit.Enabled = False
cmdDel.Enabled = False
cmdSave.Enabled = True
cmdCancel.Enabled = True
cmdFirst.Enabled = False
cmdPrev.Enabled = False
cmdNext.Enabled = False
cmdLast.Enabled = False
cmdQuery.Enabled = False
’需要设置除主键之外的text 框可写
For I = 1 To 7
Text1(i).Enabled = True
Next i
Combol.Enabled = True
add = 0
End Sub
Private Sub cmdFirst_Click()
’先移动rs_house记录到第一条
Rs_house.MoveFirst
’同时需要设置相应按钮为可用和不可用
cmdFirst.Enabled = False
cmdPrev.Enabled = False
cmdNext.Enabled = True
cmdLast.Enabled = True
’如果已经是第一条记录，则提示用户
If rs_house.BOF = True Then
MsgBox “对不起，已经是第一条记录了！”， vbOKOnly + vbInformation, “注意”
Exit Sub
’如果不是，则这个数据表的记录位置移到第一条记录，并且显示之 Else
For I = 0 To 7
Text(i).Text = rs_house.Fields(i)
Next i
If rs_house.Fields(8) = “已租” Then
Combol.ListIndex = 0
ElseIf rs_house.Fields(8) = “未租” Then
Combol.ListIndex = 1
ElseIf rs_house.Fields(8) = “意向” Then
Combol.ListIndex = 2
End If
End If
End SubPREV