物业管理系统的设计与实现毕业设计论文.doc

《物业管理系统的设计与实现毕业设计论文.doc》由会员分享，可在线阅读，更多相关《物业管理系统的设计与实现毕业设计论文.doc（34页珍藏版）》请在三一文库上搜索。

1、学学 位位 论论 文文 物业管理系统的设计与实现物业管理系统的设计与实现 论论文作者姓名：文作者姓名： 申申请请学位学位专业专业： ： 申申请请学位学位类别类别： ： 指指导导教教师师姓姓名名（ （职职称称） ）： ： 论论文提交日期：文提交日期： 物业管理系统的设计与实现物业管理系统的设计与实现 摘摘 要要 随着计算机技术的普及应用，现代城市中的居民小区也广泛地引入了信息 管理机制。本文以 Visual Basic 6.0 和 SQL Server 2000 作为开发工具，设计了一 套针对现代小区物业管理的信息化平台，主要实现了业主信息管理、物管费用 管理、业主投诉管理和小区设备的运维管理等

2、模块。 对所选课题的背景进行了简单的介绍，提出对本课题的研究方法。对 Visual Basic 6.0 和 SQL Server 2000 进行简单的介绍。提出设计的架构，定出 4 个功能模块，画出系统流程图和系统功能结构图。根据上述 2 图，进行数据库 的设计，添加一个系统用户信息表，共设计 5 张表。再根据 5 张表，进行界面 设计，写出代码和界面的截图。完成设计并进行系统测试。 关键词关键词：数据库；物业管理；信息管理；Visual Basic6.0；SQL server 2000 The Design and Implementation of the Estate Managemen

3、t System Abstract Along with the popularization application of the computer technology, the information management mechanism has been widely introduced into the inhabitant plot of modern city. The paper takes Visual Basic 6.0 and SQL Server 2000 as the development tool, designs a set of estate manag

4、ement system. This platform is in the view of the modern plot, it mainly realizes the modules of the owner information management, the service fare management, the complaining management and the community equipment information management and so on. The paper makes a simple introduction for the backg

5、round of the task which has been chosen, and then puts forward the way of research for the paper. It also makes a simple intro of the Visual Basic 6.0 and SQL Server 2000. Then the paper put forward the configuration of the design, aim to decide to design 4 function modules and paint the pictures of

6、 system flow and system function configuration., and design the database based on the 2 pictures, add a datasheet which named the sheet of system user information, and the total number of the sheet is 5. Then it designs the interface base on the 5 sheet, write the code and put the pictures which has

7、 been intercepted on the paper. This system has been debugged when the project finished. Key words: database; Estate management; information management; Visual Basic6.0; SQL server 2000 目目 录录 论文总页数：22 页 11 引言1 1.1 课题背景1 1.2 国内外研究现状1 1.3 本课题研究的意义.1 1.4 本课题的研究方法.2 22 开发工具简介2 2.1 VISUAL BASIC概述2 2.2 SQ

8、L SERVER 2000 简介.4 33 系统总体设计5 3.1 系统结构5 3.2 系统流程图5 3.3 系统功能结构图5 44 数据库设计6 4.1 业主信息管理表设计.6 4.2 物管费用管理表设计.7 4.3 业主投诉管理表设计.7 4.4 小区设备的运维管理表设计.8 4.5 系统用户管理表设计.9 55 系统详细设计9 5.1 登录界面设计10 5.2 系统主界面设计12 5.3 业主信息管理界面设计.12 5.4 收费项目管理主界面设计.14 5.5 投诉项目管理投诉单界面设计15 5.6 维修项目管理-维修单界面设计16 66 系统测试17 6.1 测试项目17 6.2 测试

9、结果18 7结 论18 8参 考文献20 9致 谢21 10声 明22 第 1 页 共 22 页 1 1 引言引言 1.11.1 课题背景课题背景 随着我国市场经济的快速发展和人们生活水平的不断提高，简单的社区服 务已经不能满足人们的需求。如何利用先进的管理手段，提高物业管理水平， 是当今社会所面临的一个重要课题。要想提高物业管理水平，必须全方位地提 高物业管理意识。只有高标准、高质量的社区服务才能满足人们的需求。面对 信息时代的挑战，利用高科技手段来提高物业管理无疑是一条行之有效的途径。 在某种意义上，信息与科技在物业管理与现代化建设中显现出越来越重要的地 位。物业管理方面的信息化与科学化，

10、已成为现代化生活水平步入高台阶的重 要标志。 1.21.2 国内外研究现状国内外研究现状 目前国内市场上现成的物业管理系统为数不少，但功能也都集中几个部分。 就目前国内的软件开发技术，短期内所诞生的新型物业管理系统将不会有太大 的改变，其实质内容都是使物业管理更快捷、更智能化。 1.31.3 本课题研究的意义本课题研究的意义 随着市场经济的发展和人们生活水平的提高，住宅小区已经成为人们安家 置业的首选，几十万到几百万的小区住宅比比皆是。人们花的钱越多，不但对 住宅的本身的美观、质量要求越来越高，同时对物业小区的服务和管理也要求 很高，诸如对小区的维修维护，甚至对各项投诉都要求小区管理者做的好，

11、做 的完善。这样要求小区管理者对物业管理进行宏观的和微观的细致管理，其中 最好的办法是用计算机操作的小区物业管理系统来实现对小区物业的管理，这 就为设计小区物业管理系统提供了市场需要。而设计的小区物业管理系统在现 代社会是最热门的行业，是最关切老百姓实际生活的设计，各种人性化的配置， 使管理者和业主对住宅小区中的事物能更方便、更快捷、更满意的得到答复。 伴随着小区的规模不断扩大和住户的不断增多，像小区中的汽车，小区附带设 施，小区的各项维修、投诉等都将越来越复杂，工作量也将越来越大。但一直 以来人们使用传统人工的方式管理各种数据，这种管理方式存在着许多缺点,比 如:效率低、保密性差，另外时间一

12、长，将产生大量的文件和数据,这对于查找、 更新和维护都带来了不少的困难。 随着科学技术的不断提高,计算机科学技术日渐成熟,其强大的功能已为人 们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。 作为计算机应用的一部分,使用计算机对企业单位的各项信息进行管理，具 有着手工管理所无法比拟的优点。例如:检索迅速、查找方便、可靠性高、存储 第 2 页 共 22 页 量大、保密性好、寿命长、成本低等。这些优点能够极大地提高工作的效率,也 是企业的科学化、正规化管理与世界接轨的重要条件。 因此，开发这样一套小区物业管理系统软件成为很有必要的事情。 1.41.4 本课题的研究方法本课题的研究方

13、法 本课题主要的目标是设计一套具有一定实用价值的物业管理系统。在研究 过从中，采用软件工程的思想，先进行需求分析，再进行设计，然后进行测试。 在文章的最后进行总结，提出系统改进方法和结论。 2 2 开发工具简介开发工具简介 2.12.1 VisualVisual BasicBasic 概述概述 Visual Basic（简称 VB）是美国微软（Microsoft）公司推出的 Windows 环境下的软件开发工具，使用 VB 可以既快又简便地开发 Windows 应用软件。 Visual 是指开发图形用户界面（GUI）的方法。Visual 的意思是“视觉的” 或“可视的” ，也就是直观的编程方法

14、。在 VB 中引入了控件的概念，如各种各 样的按钮、文本框、复选框等。VB 把这些控件模式化，并且每个控件都由若干 属性来控制其外观、工作方法。这样，采用 Visual 方法无需编写大量代码去描 述界面元素的外观和位置，而只要把预先建立的控件加到屏幕上。就像使用 “画图”之类的绘图程序，通过选择画图工具来画图一样。 Basic 是指 BASIC(Beginners All-purpose Symbolic Instruction Code) 语言，之所以叫做“Visual Basic”就是因为它使用了 BASIC 语言作为代码。 VB 在原有 BASIC 语言的基础上进一步发展，至今包含了数百

15、条语句、函数及关 键词，其中很多与 Windows GUI 有直接关系。VB 与 BASIC 之间有着千丝万缕的 联系，如果学过 BASIC 语言的话，看到 VB 的程序结构会感到很亲切。专业人员 可以用 Visual Basic 实现其他任何 Windows 编程语言的功能，而初学者只要掌 握几个关键词就可以建立实用的应用程序。 传统的编程方法使用的是面向过程、按顺序进行的机制，其缺点是程序员 始终要关心什么时候发生什么事情，处理 Windows 环境下的时间驱动方式工作 量太大。VB 采用的是面向对象、时间驱动编程机制，程序员只需编写响应用户 动作的程序，如移动鼠标、单击事件等，而不必考虑

16、按精确次序执行的每个步 骤，编写代码相对较少。另外，VB 提供的多种“控件”可以快速创建强大的应 用程序而不需涉及不必要的细节。 VB 使用的“可视化编程”方法，是“面向对象编程”技术的简化版。在 VB 环境中所涉及到的窗体、控件、部件和菜单项等均为对象，程序员不仅可以利 用控件来创建对象，而且还可以建立自己的“控件” ，这是 Windows 环境下的编 程新概念。 第 3 页 共 22 页 VB 程序设计具有以下特点： （1）可视化的设计平台 用传统程序设计语言编程时，需要通过编程计算来设计程序的界面，在设 计过程中看不到程序的实际显示效果，必须在运行程序的时候才能观察。如果 对程序的几面不

17、满意，还要回到程序中去修改，这一过程常常需要反复多次， 大大影响了编程的效率。VB 提供的可视化设计平台，把 Windows 界面设计的复 杂性“封装”起来。程序员不必再为界面的设计而编写大量程序代码，程序员 所需要编写的只是实现程序功能的那部分代码，从而大大提高了编程的效率。 （2）面向对象的设计方法 VB 采用面向对象的编程方法（OOP）把程序和数据封装起来作为一个对象， 并为每个对象赋予相应的属性。在设计对象时，不必编写建立和描述每个对象 的程序代码，而是用工具“画”在界面上，由 VB 自动生成对象的程序代码并封 装起来。 （3）事件驱动的编程机制 VB 通过事件执行对象的操作。在设计应

18、用程序时，不必建立具有明显开始 和结束的程序，即过程。这些过程分别面向不通的对象，由用户操作引发某个 事件来驱动完成某种特定功能，或由时间驱动程序调用通用过程执行指定的操 作。 （4）结构化的设计语言 VB 是在结构化的 BASIC 语言基础上发展起来的，加上了面向对象的设计方 法，因此是更具有结构化的程序设计语言。 （5）充分利用 Windows 资源 VB 提供的动态数据交换（DDE）编程技术，可以在应用程序中实现与其他 Windows 应用程序建立动态数据交换、在不同的应用程序之间进行通信的功能。 VB 提供的对象链接与嵌入（OLE）技术则是将每个应用程序都看作一个对 象，将不同的对象链

19、接起来，嵌入到某个应用程序中，从而可以得到加油声音、 影像、图像、动画、文字等各种信息的集合式文件。 VB 还可以通过动态链接库（DLL）技术将 C/C+或汇编语言编写的程序加入 到 VB 的应用给程序中，或是调用 Windows 应用程序接口（API）函数，实现 SDK 所具有的功能。 （6）开放的数据库功能与网络支持 VB 具有很强的数据库管理功能。不仅可以管理 MS Access 格式的数据库， 还能访问其他外部数据库，如 FoxPro、Paradox 等格式的数据库。另外，VB 还 第 4 页 共 22 页 提供了开放式数据连接（ODBC）功能，可以通过直接访问或建立连接的方式使 用并

20、操作后台大型网络数据库，如 SQL Server、Oracle 等。在应用程序中， 可以使用结构化查询语句（SQL）直接访问 Server 上的数据库，并提供简单的 面向对象的库操作命令、多用户数据库的加锁机制和网络数据库的编程技术， 为单机上运行的数据库提供 SQL 网络接口，一边在分布式环境中快速而有效地 实现客户/服务器（Client/Server）方案。 2.22.2 SQLSQL serverserver 20002000 简介简介 SQL Server 是一个关系数据库管理系统，它最初是由 Microsoft， Sybase 和 Ashton-Tate 三家公司共同开发的，于 19

21、88 年推出了第一个 OS/2 版本。在 Windows NT 推出后 Microsoft 与 Sybase 在 SQL Server 的开发上就 分道扬镳了，Microsoft 将 SQL Server 移植到 Windows NT 系统上，专注于开 发推广 SQL Server 的 Windows NT 版本。 SQL Server 2000 是 Microsoft 公司推出的 SQL Server 数据库管理系统的 最新版本，该版本继承了 SQL Server 7.0 版本的优点同时又比它增加了许多更 先进的功能，具有使用方便、可伸缩性好、与相关软件集成程度高等优点，可 跨越从运行 Mi

22、crosoft Windows 98 的膝上型电脑到运行 Microsoft Windows 2000 的大型多处理器的服务器等多种平台使用。 由于今天 Windows 操作系统占领着主导地的位，选择 SQL Server 一定会在 兼容性方面取得一些优势。另外，SQL Server 2000 除了具有扩展性，可靠性 以外，还具有可以迅速开发新的因特网系统的功能。尤其是它可以直接存贮 XML 数据，可以将搜索结果以 XML 格式输出等特点，有利于构建了异构系统的 互操作性，奠定了面向互联网的企业应用和服务的基石。这些特点在.NET 战略 中发挥着重要的作用。 SQL Server 2000 的

23、版本包括企业版、标准版、个人版、Windows CE 版、 开发版和评估版。不通版本的功能和用户群不通。 （1）企业版 该版本作为生产数据库服务器使用，支持 SQL Server 2000 中的所有可用 功能，并可根据支持最大的 Web 站点和企业联机事务处理（OLTP）及数据仓库 系统所需的性能水平进行伸缩。 （2）标准版 该版本作为小工作组或部门的数据库服务器使用。 （3）个人版 该版本供移动的用户使用，这些用户有时从网络上断开，但所运行的应用 程序需要 SQL Server 数据存储。在客户端计算机上运行需要本地 SQL Server 第 5 页 共 22 页 数据存储的独立应用程序，也

24、使用个人版。 （4）开发版 该版本供程序员用来开发将 SQL Server 2000 用作数据存储的应用程序。 虽然开发版支持企业版的所有功能，使开发人员能够编写和测试可使用这些功 能的应用程序，但是智能将开发版作为开发和测试系统使用，不能作为生产服 务器使用。 （5）Windows CE 版 该版本使用 Microsoft SQL Server 2000 TM Windows CE 版（SQL Server CE）在 Windows CE 设备上进行数据存储，能使用任何版本的 SQL Server 2000 复制数据，以使 Windows CE 数据与主数据库保持同步。 （6）企业评估版 可

25、从 Web 上免费下载的功能完整的版本，仅用于评估 SQL Server 功能，下 载 120 天后该版本停止运行。 3 3 系统总体设计系统总体设计 3.13.1 系统结构系统结构 设计该系统时，参照了很多已经成型的物业管理系统，主要也集中到 4 个 功能上面。因此，本系统设计的也是 4 个功能模块。 （1）住户资料管理：管理住户的基本资料，包括姓名、性别、职业、产权 状况等信息 （2）收费管理：物业管理的主要部分，主要管理缴费记录和未缴费用记录。 （3）投诉管理：管理住户的投诉信息，并记录处理和未处理事项。 （4）设备维修管理：管理提出维修的设备，并记录维护日志。 3.23.2 系统流程图

26、系统流程图 根据上面设计思路，作出以下系统流程 图 1 系统流程图 第 6 页 共 22 页 3.33.3 系统功能结构图系统功能结构图 根据上述条件，建立系统总体功能结构图如下 第 7 页 共 22 页 图 2 系统总体功能结构图 4 4 数据库设计数据库设计 根据图 2，对数据库进行规划，设计 5 张数据表。其详细设计如下： 4.14.1 业主信息管理表设计业主信息管理表设计 表 1 业主信息管理表 字段数据类型长度是否 NULL是否 PK字段说明 CLIENT_RECORD_IDvarchar16 否是档案 ID CLIENT_REGION_IDvarchar16 否是物业名称 CLIE

27、NT_HOUSE_NUMBERvarchar10 否是房号 CLIENT_NAMEvarchar20 是姓名 CLIENT_SEXvarchar4 是性别 CLIENT_NATIONvarchar16 是民族 CLIENT_CARDvarchar20 是身份证号 CLIENT_METIERvarchar16 是职业 CLIENT_PHONEvarchar20 是联系电话 CLIENT_COMPANYvarchar60 是工作单位 CLIENT_ACCOUNT_NUMBERvarchar22 是银行帐号 第 8 页 共 22 页 CLIENT_CARBARNvarchar20 是车位 CLIEN

28、T_CAR_NUMBERvarchar20 是车牌号 CLIENT_INTO_DATEdatetime8 是入住日期 CLIENT_HOUSE_TYPEvarchar16 是房产类别 CLIENT_PROPERTY_TYPEvarchar16 是产权状况 CLIENT_MODEL_NAMEvarchar16 是房型 CLIENT_BUILD_AREAnumeric13 是建筑面积 CLIENT_USE_AREAnumeric13 是套内面积 CLIENT_PRIOR_SURPLUSnumeric13 是结存余额 CLIENT_ARREARAGEnumeric13 是未缴费用 CLIENT_HO

29、USE_ADDvarchar80 是地址 NOTEvarchar160 是备注 EDIT_NAMEvarchar10 是修改人员 EDIT_DATEdatetime8 是修改日期 CREATE_NAMEvarchar10 是建档人员 CREATE_DATEdatetime8 是建档日期 4.24.2 物管费用管理表设计物管费用管理表设计 表 2 物管费用管理表 字段数据类型长度是否 NULL是否 PK字段说明 PAY_RECORD_IDVarchar16 否是缴费 ID CHARGE_ITEM_NAMEVarchar20 否是收费项目 CHARGE_START_DATEdatetime8 是起

30、始日期 CHARGE_START_DATANumeric13 是起始表数 CHARGE_END_DATEdatetime8 是终止日期 CHARGE_END_DATANumeric13 是终止表数 CHARGE_MOVE_DATANumeric13 是用量 CHARGE_WEARNumeric13 是分摊系数 CHARGE_SUM_DATANumeric13 是总表数 CHARGE_PRICENumeric13 是单价金额 CHARGE_MONEYNumeric13 是应缴费用 CHARGE_EXPLAINVarchar20 是收费说明 CHARGE_ORDER_IDInt4 是收费单号 NO

31、TEVarchar40 是备注 EDIT_NAMEVarchar10 是修改人员 EDIT_DATEdatetime8 是修改日期 CREATE_NAMEVarchar10 是建档人员 CREATE_DATEdatetime8 是建档日期 4.34.3 业主投诉管理表设计业主投诉管理表设计 表 3 业主投诉管理表 第 9 页 共 22 页 字段数据类型长度是否 NULL是否 PK字段说明 PETITION_IDvarchar16 否是投诉单号 CLIENT_REGION_IDvarchar16 否是物业名称 CLIENT_RECORD_IDvarchar16 否是档案 ID CLIENT_HO

32、USE_ADDvarchar80 否地址 CLIENT_HOUSE_NUMBERvarchar10 是房号 CLIENT_NAMEvarchar20 是姓名 CLIENT_PHONEvarchar20 是联系电话 PETITION_DATEdatetime8 是投诉时间 PETITION_CIRCSvarchar120 是投诉情况 DISPATCH_DATEdatetime8 是发单时间 DISPATCH_MAN_NAMEvarchar20 是发单人 ACCEPT_DATEdatetime8 是接单时间 ACCEPT_MAN_NAMEvarchar120 是接单人 PETITION_CONTE

33、NTvarchar255 是投诉内容 PETITION_TRANSACT_CIRCSvarchar255 是处理情况 PETITION_LEAD_OPINIONvarchar255 是领导意见 TRANSACT_DATEdatetime8 是处理时间 COMPLETE_DATEdatetime8 是完成时间 CLIENT_FEEDBACKvarchar20 是住户反馈 CLIENT_SIGNATUREvarchar20 是住户签字 NOTEvarchar255 是备注 STATUSvarchar8 是状态 VERIFY_NAMEvarchar10 是审核人员 VERIFY_DATEdateti

34、me8 是审核日期 EDIT_NAMEvarchar10 是修改人员 EDIT_DATEdatetime8 是修改日期 CREATE_NAMEvarchar10 是建档人员 CREATE_DATEdatetime8 是建档日期 4.44.4 小区设备的运维管理表设计小区设备的运维管理表设计 表 4 小区设备的运维管理表 字段数据类型长度是否 NULL是否 PK字段说明 SERVICING_IDvarchar16 否是报修单号 CLIENT_REGION_IDvarchar16 否是物业名称 CLIENT_RECORD_IDvarchar16 否是档案 ID CLIENT_HOUSE_ADDva

35、rchar80 否是地址 CLIENT_HOUSE_NUMBERvarchar10 是房号 CLIENT_NAMEvarchar20 是姓名 CLIENT_PHONEvarchar20 是联系电话 INFORM_DATEdatetime8 是报修时间 INFORM_CIRCSvarchar120 是报修情况 DISPATCH_DATEdatetime8 是发单时间 第 10 页 共 22 页 DISPATCH_MAN_NAMEvarchar20 是发单人 ACCEPT_DATEdatetime8 是接单时间 ACCEPT_MAN_NAMEvarchar120 是接单人 SERVICING_CO

36、NTENTvarchar255 是维修内容 SERVICING_MATERIALvarchar255 是材料 SERVICING_DATEdatetime8 是维修时间 COMPLETE_DATEdatetime8 是完成时间 SERVICING_MATERIAL_MONEYnumeric13 是材料费 SERVICING_SERVER_MONEYnumeric13 是人工费 SERVICING_TOTAL_MONEYnumeric13 是合计 CLIENT_FEEDBACKvarchar20 是住户反馈 CLIENT_SIGNATUREvarchar20 是住户签字 NOTEvarchar2

37、55 是备注 STATUSvarchar8 是状态 VERIFY_NAMEvarchar10 是审核人员 VERIFY_DATEdatetime8 是审核时间 EDIT_NAMEvarchar10 是修改人员 EDIT_DATEdatetime8 是修改日期 CREATE_NAMEvarchar10 是建档人员 CREATE_DATEdatetime8 是建档日期 4.54.5 系统用户管理表设计系统用户管理表设计 表 5 系统用户管理表 字段数据类型长度是否 NULL是否 PK字段说明 USE_IDVarchar6 否是 ID USE_NAMEVarchar20 否用户名称 USE_PASS

38、WORDVarchar10 否用户密码 SYS_USERChar2 否系统管理员 STOP_RIGHTVarchar4 否是否有效 NOTEVarchar30 是备注 EDIT_NAMEVarchar10 是修改人员 EDIT_DATEDatetime8 是修改日期 CREATE_NAMEVarchar10 是建档人员 CREATE_DATEDatetime8 是建档日期 5 5 系统详细设计系统详细设计 建立好数据库以后，设计前台界面。并编写代码，完成与数据库的连接。 建立 VB 模块对整个界面进行一次数据库连接。其代码如下： Public conn As New ADODB.Connect

39、ion Public rs As New ADODB.Recordset Public addFlag As Boolean 第 11 页 共 22 页 Public Function OpenCn() As Boolean Dim mag As String On Error GoTo strerrmag Set conn = New ADODB.Connection conn.ConnectionString = “Provider=SQLOLEDB.1;Password= ;Persist Security Info=True;User ID=sa;Initial Catalog=use

40、r;Data Source=MICROSOF-FB5E72“ conn.ConnectionTimeout = 25 conn.Provider = “sqloledb“ conn.Properties(“data source“).Value = “MICROSOF-FB5E72“ 服务器的名字 conn.Properties(“initial catalog“).Value = “HYHHomeDataBase“ 库 名 conn.Properties(“integrated security“).Value = “SSPI“ 登陆类型 conn.Open OpenCn = True ad

41、dFlag = True Exit Function strerrmag: mag = “Data cant connect“ Call MsgBox(mag, vbOKCancel, “Error:Data connect“) addFlag = False End End Function Public Sub clocn() On Error Resume Next If conn.State adStateClosed Then conn.Close Set conn = Nothing End Sub 通过模块，使系统在启动时进行数据库连接，并打开整个数据库。各个功 能模块的具体数据

42、库连接，将在界面代码中实现。 5.15.1 登录界面设计登录界面设计 登录：用户输入用户名和密码，后台数据库查找并进行匹配，匹配成功， 第 12 页 共 22 页 则进入系统主界面。 图 3 登录界面 其代码如下： Private Sub cmdCancel_Click() 设置全局变量为 false 不提示失败的登录 LoginSucceeded = False Me.Hide End End Sub Private Sub cmdOK_Click() 检查正确的密码 If txtPassword.Text = “ Then 将代码放在这里传递 成功到 calling 函数 设置全局变量时最

43、容易的 LoginSucceeded = True Me.Hide Form1.Show Else MsgBox “无效的密码，请重试!“, , “登录“ txtPassword.SetFocus SendKeys “Home+End“ End If End Sub 第 13 页 共 22 页 5.25.2 系统主界面设计系统主界面设计 系统主界面：系统的主要界面。显示连接各功能模块的按钮及菜单，是各 模块连接的桥梁。 图 4 系统主界面 界面主要功能介绍： 在该界面中可以通过命令按钮进入相应的操作，也可以使用菜单功能进入。 界面简单明了，方便快捷。 其主要代码为各页面连接，故在此不列出。 5

44、.35.3 业主信息管理界面设计业主信息管理界面设计 住户信息管理：提供住户的信息管理，包括添加、删除、修改和查询等基 本操作。在该界面中，使用 DataGrid 控件，可直观的看到数据库表中的内容。 通过 Ado 控件来实现与数据库的连接，其使用方式和代码如下： With Adodc1 .ConnectionString = “Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=HYHHomeDataBase;Data Source=MICROSOF-FB5E72“ 连接数据库字符串 .Reco

45、rdSource = “select * from HY_CLIENT_TABLE“ 连接到表 End With 进行数据库连接，连接到 HY_CLIENT_TABLE。 连接成功后，运行程序，进入业主信息管理界面，可对业主的相关信息进 行添加、修改、删除等操作。 第 14 页 共 22 页 住户相关信息有：物业地址、房号、姓名、性别、职业、工作单位、身份 证号、车位、车牌号、民族、联系电话、银行帐号、房产类别、产权状况、入 住日期、建筑面积、套内面积、房型、备注。其表示如下图： 图 5 业主信息管理详细功能图 界面图如下： 图 6 住户信息管理界面 其主要代码如下： 信息添加代码： Adod

46、c1.Recordset.AddNew . . . . Form2.Adodc1.Refresh 信息删除代码： 第 15 页 共 22 页 k = MsgBox(“确定删除本条记录吗？“, vbInformation + vbYesNo, “提示“) If k = vbYes Then Adodc1.Recordset.Delete End If Form2.Adodc1.Refresh 信息修改代码： Adodc1.Recordset.Update Form2.Adodc1.Refresh 5.45.4 收费项目管理主界面设计收费项目管理主界面设计 收费项目管理：管理基本的物业收费。基本操

47、作包括添加收费项目、修改 收费项目、查询缴费记录、删除缴费记录等。同样也使用 Ado 控件通过代码 With Adodc2 .ConnectionString = “Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=HYHHomeDataBase;Data Source=MICROSOF-FB5E72“ 连接数据库字符串 .RecordSource = “select * from HY_CLIENT_CHARGE_ITEM_TABLE“ 连接到表 End With 实现与数据库的连接，Data

48、Grid 直观的显示数据库内容。 收费项目记录信息有：收费项目、起始日期、起始表数、终止日期、终止 表数、用量、总表数、缴费日期、金额单价、应缴费用、分摊系数、收费说明、 备注。 其功能结构图可以表示如图 7.用户运行程序进入物管费用管理界面，通过 界面的命令按钮，对相应信息进行操作。 图 7 物管费用管理详细功能图 物管费用管理界面如下图： 第 16 页 共 22 页 图 8 收费项目管理界面 主要代码与住户信息管理代码相似，故不在列出。 5.55.5 投诉项目管理投诉项目管理投诉单界面设计投诉单界面设计 投诉项目管理：添加、修改、删除和查询投诉记录。添加投诉项目按钮弹 出投诉单窗口，在该界

49、面中填写投诉相关信息，并保存。由物业公司查看并处 理投诉。使用 Ado 控件通过字符串 “Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=HYHHomeDataBase;Data Source=MICROSOF-FB5E72” 实现与数据库的连接。 相关信息包括：投诉单号、投诉时间、投诉情况、发单时间、发单人、接 单时间、接单人、投诉内容、处理情况、领导意见、处理时间、完成时间、住 户反馈、住户签字和备注。 表示如下图： 图 9 业主投诉管理详细功能图 完成该功能的投诉单界面如下： 第 17 页 共 22 页 图 10 投诉单界面 其主要代码有： 添加、保存信息代码： Private Sub Command1_Click() Adodc1.Recordset.AddNew Adodc1.Recordset.Fields(“PETITION_ID“) = Text1.Text Form8.Adodc1.Refresh 点击“取消”按钮，则退出投诉单界面。 5.65.6 维修项目管理维修项目管理-维修单界面设计维修单界面设计 维修项目管理：添加、修改、删除和查询维修记录。添加维修项目按钮弹 出维修单窗口，在该界面中