毕业设计（论文）-VB6.0西苑小区电费管理系统设计.doc

青岛理工大学 毕 业 设 计（论 文） 题目 西苑小区电费管理系统 学生姓名： 指导教师： 计算机工程学院计算机科学技术 专业计升本四班 2007 年 6 月 19 日 青岛理工大学毕业设计（论文） i 摘摘 要要 在计算机普及以前，小区主要用手工记账的方法管理电费财务，这种方式不仅浪费大量 的人力、物力、财力，而且不适合管理和保存。随着计算机的广泛应用，大多数小区开 始利用相关计算机系统来管理小区的电费财务，使得小区的电费管理更加高效，用户对 电费的查询更加便捷。 在开发本系统时采用 visual basic 和 access 2000 数据库软件作为程序主要开发工 具，运用 visual basic 完成了程序的界面设计及主要功能的具体实现,运用 access 2000 完成了数据库系统的具体设计。 该系统采用 visual basic 和 ado，实现用户用电信息的快捷录入；方便小区物业公司 根据用户的实际用电情况进行登记，然后自动计算各用户的电费总额；欠费统计，以及 现金交付情况，实现电费的批量收款，实现对用户用电情况、款项使用情况登记操作； 并且提供给小区用户查询个人用电信息、打印有关电费报表等服务。 本文简要介绍了小区电费管理系统的设计思想，并概括地说明了该系统的功能及特点。 该系统功能完善、界面友好、操作简单，具有综合查询和报表打印等功能，能充分满足 不同层次用户需求。本系统的设计可分为基本信息管理、交费管理、欠费管理、系统数 据维护、打印报表以及系统管理等 6 个模块。 本文介绍了小区电费管理系统的设计与开发的过程。从系统分析、系统总体设计、系 统详细设计以及问题和前景等几个方面详细论述了整个系统的开发过程，遵循软件工程 的方法。 关键词关键词：visual basic 6.0，access 数据库，某小区电费管理系统，电费查询。 青岛理工大学毕业设计（论文） ii abstractabstract small areas manage finance in the way of hand-written record before computers become popular. it not only waste large amount of manpower, material resources and financial resources, but also doesnt adapt to the management and storage. when computers become wide application, most of small area began to apply computers to management electricity charges finance in small areas , feasible small area electric charge is managed especially high-effect, the consumer inquiry to electric charge is especially convenient and rapid management system is use the stand-alone version electric charge management system.to develop this system, the author use visual basic and access2000 data bases software as the main development tools of this program. visual basic is used to realize the interface design and the specific realization of the main functions and access2000 is used to accomplish the detail design of database system. this system uses visual basic and ado, realizing consumer uses electricity the situation information to input quickly; the convenient plot consumer management company according to the consumer the reality to use electricity the situation to carry on the registration, and then calculating voluntarily every consumers electric charge; manages various consumer to save the gold in advance, as well as the cash turnover situation, the realization electrical bill batch collection and the single pen charge, realizes to the consumer uses electricity the situation, the fund service condition registers the operation; provides for the plot property convenience inquiry, the printing related electrical bill management report form. this article briefly introduced “small area electrical bill management information system“ design thought, and broadly showed this system function and the characteristic. this system function consummates, the contact surface friendly, the operation is simple, has the synthesis inquiry and the auxiliary decision power, can satisfy the different arrangement of ideas consumer need sufficiently. keykey wordswords: : visual basic，access database ，some plot electrical bill management system management system，electrical bill inquiry 青岛理工大学毕业设计（论文） iii 青岛理工大学毕业设计（论文） iv 目 录 前 言 .1 第 1 章 系统分析 .3 1.1 需求分析3 1.1.1 系统目标3 1.1.2 数据流图3 1.1.3 系统流程图和功能分析4 1.2 系统可行性分析4 1.2.1 社会环境可行性4 1.2.2 技术可行性5 1.3 开发平台的选择5 1.3.1 编程环境的选择5 1.3.2 数据库的选择5 第 2 章 系统总体设计 .7 2.1 系统模块设计.7 2.2 系统模块之间的关系.8 2.3 数据库设计.8 2.4 本章小结11 第 3 章 系统详细设计 12 3.1 登录模块及主界面设计12 3.2 基本信息管理模块及界面设计.13 3.2.1 业主管理窗体设计 .13 3.2.2 走表管理窗体设计 .14 3.3 交费管理模块及界面设计15 3.3.1 交费窗体设计 .15 3.3.2 费用调整窗体设计 .18 3.3.3 电费查询窗体的设计 .20 3.4 欠费管理模块及界面设置22 3.4.1 追缴电费窗体设计 .22 3.4.2 欠费统计窗体的设计 .24 3.5 系统数据维护.25 青岛理工大学毕业设计（论文） v 3.5.1 数据维护窗体的设计 .25 3.5.2 初始化数据窗体的设计 .25 3.6 系统管理模块及界面设计27 3.6.1 添加用户窗体的设计.27 3.6.2 用户密码修改窗体的设计.28 3.6.3 删除用户窗体的设计.29 3.7 本章小结29 第 4 章 问题与前景 30 4.1 所遇问题30 4.2 系统中存在的问题31 4.3 前景展望31 结 论 33 谢 辞 34 参考文献 .35 青岛理工大学毕业设计（论文） 1 前前 言言 随着市场经济的发展和人们生活水平的提高，人们的居住环境不断改善， 到处可见新建的住宅小区，人们生活在以小区为单位的建筑群中，同时大量的 管理工作也由小区物业管理者来承担。 电费管理是一个小区物业管理中不可缺少的组成部分。目前好多小区还停 留在管理人员手工记录数据的最初阶段，手工记录对于规模小的小区来说还勉 强可以接受，但对于楼群数量多，住户信息量庞大，需要记录存档的数据比较 多的小区来说，人工记录是相当麻烦的。而且当查找某条记录时，由于数据量 庞大，还只能靠人工去一条条的查找，这样不但麻烦还浪费了许多时间，效率 也比较低。 西苑小区是某市目前比较大的居住小区，工程分三期规划建设完成，居民 住户多，人员复杂，每月所产生的电表信息以及交纳的费用信息数据量庞大。 物业管理人员要对小区内住户的走表数据、电费结算以及电费缴纳情况进行统 一的管理，人工管理工作难度太大。当今社会是飞速进步的世界，原始的人工 管理方式已经被社会所淘汰了，计算机化管理正是适应时代的产物。 信息世界永远不会是一个平静的世界，当一种技术不能满足需求时，就会 有新的技术诞生并取代旧技术。21 世纪的今天，信息社会占着主流地位，计算 机在各行各业中的运用已经得到普及，自动化、信息化的管理越来越广泛应用 于各个领域。 通过调研，我针对西苑小区的实际情况，使用 microsoft 公司的 visual basic 6.0 作为开发工具，结合 access 作为后台数据库设计了一套西苑小区电 费管理系统。visual basic 6.0 提供了强大的数据管理功能，可以通过数据管理 器、数据控件和数据访问对象等多种方法对数据库进行新增、修改、删除、查 询等操作。access 具有功能灵活、易于操作等特点，是开发小型数据库应用系 统的理想工具，并且作为后台数据库可以与 visual basic 等高级语言结合使用。 西苑小区电费管理系统采用的是计算机化管理，尽量做到人性化，使用者 只要稍加学习就能熟练操作。管理人员需要做的就是将数据录入到系统的数据 库中去。由于数据库存储容量相当大，而且比较稳定，适合较长时间的保存， 也不容易丢失。这无疑是为数据更新快的小区管理人员提供了一个方便、快捷 的操作方式。 本系统具有运行速度快、安全性高、稳定性好的优点，并且具备完善的报 青岛理工大学毕业设计（论文） 2 表生成功能，使物业管理部门之间能够很好的交流，能够灵活、准确的掌握小 区居民的用电情况。能够满足当代小区物业管理的需要。 青岛理工大学毕业设计（论文） 3 第第 1 1 章章 系统分析系统分析 1.11.1 需求分析需求分析 西苑小区电费管理系统是针对西苑小区的实际情况，统计西苑小区内住户 电表的走表数据以及管理居民电费缴纳情况的管理软件。该系统是基于 mdi 窗 体以 vb 自带的 jet 引擎连接 access 数据库进行开发的系统1，力求与实际 相结合，具有管理基本信息、打印报表等功能，旨在达到使小区的电表管理和 电费缴纳趋于计算机化，从而减轻管理人员的工作难度，使之更加方便、快捷 以提高工作效率，适应现代社会对小区物业管理的需求。 目前在西苑小区的电费管理存在着如下几个问题： （1）小区居民住户多，物业管理人员采用手工抄表方式，信息查询困难。 （2） 对业主的计费和收费不能直观监控和催交，导致管理人员经常性的 不能按时出帐和结帐。 （3）大量的数据信息不能长期保存，容易丢失。 1.1.11.1.1 系统目标系统目标 手工抄表存在着诸多弊端，为了克服这些弊端，减轻工作人员的工作量， 便于小区用电管理，利用现代计算机技术，使小区的电费管理达到如下要求： （1）全方位的快速查询，减少重复劳动、提高工作效率。 （2）费用自动统计、汇总，减少人工差错与负担。 （3）灵活、准确的收费管理，提高财务工作效率。 1.1.21.1.2 数据流图数据流图 西苑小区电费管理系统的核心是每月住户的交费，通过查询住户的交费情 况，对欠费的住户追缴费用，最后汇总打印费用报表，上报小区物业管理部门。 业务流图如图 1.1 所示。 打印交费单 住户档案抄表查询统计费用 打印报表追缴费用 住户 交费 是否交费 是 否 图 1.1 业务流程图 青岛理工大学毕业设计（论文） 4 1.1.31.1.3 系统流程图和功能分析系统流程图和功能分析 西苑小区电费管理系统流程图如图 1.2 所示。 对系统的研究和开发是为了减轻管理人员的工作难度，在设计本系统时尽 量做到操作简单、方便，本系统要实现的功能如下： （1）由于业务的需要和保密性，也为了便于管理，系统用户应该具有不同 的等级，即不同的权限。按等级分为两个等级：管理员和普通用户。 （2）系统应对小区的居民住户资料进行很好的管理，能够非常方便的添加、 编辑、查询住户的信息。 （3）能够准确的记录居民电表的走表数据，为缴纳电费提供准确的数据。 （4）对住户的计费和收费准确无误，直观的监控和催交电费，汇总缴费和 欠费信息，使管理人员方便的管理住户的用电情况。 （5）具有报表打印功能，便于数据信息在物业管理部门中传递。 （6）定期维护数据库中的数据信息，减少数据信息的冗余。 本系统操作界面简单，层次关系明了、清晰，使用户一目了然，尽可能的 为用户的录入、查询等功能操作提供方便。 1.21.2 系统可行性分析系统可行性分析 1.2.11.2.1 社会环境可行性社会环境可行性 小区电费管理系统是针对当今社会住宅小区成为居住的主流，小区的物业 管理要求智能化的前提下应运而生的。电费管理是小区物业收费管理中的一个 管理模块，它在物业管理公司的收费管理中起到至关重要的作用，具体要完成 走表数据的统计、交费、欠费追缴以及打印报表等功能。西苑小区是广饶县最 大的一个居民小区，分三期工程完工，居民人口众多，费用的计算、查询、汇 系统登录 管理员 操作员 管理员设置 系统初始化 基本信息管理 费用管理 欠费管理 打印报表 住户管理 走表管理 图 1.2 系统流程图 青岛理工大学毕业设计（论文） 5 总等工作复杂，因此利用现代计算机技术，开发一套完整的小区电费管理系统 是非常有必要的。 1.2.21.2.2 技术可行性技术可行性 系统尽管在其组织关系上存在着很大的复杂性、繁琐性，但是就整个系统 的技术构成上来看，它还是属于一个数据库应用类的系统。其基本操作还是对 存在的数据库进行添加、删除、查找、编辑等。所以就单纯的数据库应用来看， 暂不存在太大的技术问题。 1.31.3 开发平台的选择开发平台的选择 1.3.11.3.1 编程环境的选择编程环境的选择 目前，解决这一课题的方法与手段非常多，所以首先应选定开发工具与环 境。本系统采用微软公司的 visual basic 6.0 作为应用程序开发工具，用 access 做后台数据库，统计相关的数据信息，生成数据表。visual basic 6.0 是目前一 种广泛的、易学易用的面向对象的开发工具。visual basic 6.0 提供了大量的控 件，这些控件可用于设计界面和实现各种功能，减少了编程人员的工作量，也 简化了界面设计过程，从而有效的提高了应用程序的运行效率和可靠性。visual basic 6.0 提供了强大的数据管理功能，可以通过数据管理器、数据控件和数据 访问对象等多种方法对数据库进行新增、修改、删除、查询等操作。本系统只 是从实际中提取出来的一个简单的信息管理系统，故而，实现本系统用 vb 完 全能够实现。 visual basic 是微软公司(microsoft corporation)推出的可视化开发工具。其 中， “visual”是指开发用户界面(gui-graphical user interface)的可视化方法5。 basic 是微软的传统产品，因此一直以来，微软给予了 visual basic 极高的重 视，使其迅速发展，功能不断强大。 visual basic 继承了 basic 简单、易用的特点，并具有可视化、面向对象、 部件技术、事件驱动等一系列特点，成为了 windows 环境下一种快捷、方便的 通用开发工具，拥有广泛的用户群。在基于 windows 的微软应用发展构架中， visual basic 被定义在客户端，扮演者帮助用户快速创建前端应用程序的角色。 1.3.21.3.2 数据库的选择数据库的选择 数据库是数据管理的最新技术，是计算机科学的重要分支。十年来，数据 库管理系统已从专用的应用程序包发展成为通用系统软件。由于数据库具有数 据结构化、最低冗余度、较高的程序与数据独立性、易于扩充、易于编制应用 程序等优点，较大的信息系统都是建立在数据库设计之上的。 青岛理工大学毕业设计（论文） 6 本系统采用 access 作为后台数据库。access 是微软公司发布的 office 软 件包中的关系型数据库软件，具有功能灵活、界面友好、易于学习和操作等特 点，拥有广泛的用户群体。access 是开发单机小型数据库应用系统的理想工具， 可以独立开发数据库应用系统，也可以作为后台数据库与 visual basic 等高级语 言结合使用20。本系统属于小型数据库应用系统，数据库的设计并不复杂，因 此采用 access 作为本系统开发的后台数据库完全能够实现。 青岛理工大学毕业设计（论文） 7 第第 2 2 章章 系统总体设计系统总体设计 西苑小区电费管理作为西苑小区物业管理的一部分，本系统的设计根据西 苑小区的实际情况，以减轻管理人员工作量，方便管理人员操作，提高小区物 业管理质量为主要目标，并通过不断完善，最终完成本系统设计的全过程。 2.12.1 系统模块设计系统模块设计 本系统的设计可分为基本信息管理、交费管理、欠费管理、系统数据维护、 打印报表以及系统管理等 6 个模块。 基本信息管理模块 基本信息管理模块分为业主管理、走表管理以及人员管理等三部分。 1、业主管理：实现了对西苑小区住户居民基本信息的添加、编辑以及查询。 2、走表管理：统计小区业主本月的电表走表情况，并对统计的数据进行维 护。 3、人员管理：设定小区内管理人员的信息，便于对抄表和收费的管理。 交费管理模块 1、交费：业主交费时，操作员通过房屋编号查找业主的信息以及本月走表 情况，系统自动计算应缴纳的费用，完成交费过程。 2、费用定价：通过调价设定电费的收费标准。 3、费用调整：费用调价后，重新计算业主的应缴纳的费用。 4、电费查询：直观的监控业主的交费情况，便于对未缴纳费用的业主催交 电费。 欠费管理模块 1、欠费追缴：完成本月的收费工作，重新抄表后，对于未交电费的业主追 缴电费。 2、欠费统计：统计汇总每月欠费的金额，便于今后的管理。 系统数据维护模块 1、数据备份：备份数据库中的数据，防止误操作丢失数据。 2、初始化数据：及时的清理数据库中的数据，防止长时间使用系统，造成 数据的冗余。 打印报表模块 1、交费报表：统计业主的交费情况，打印以形成报表。 2、欠费报表：统计每月的欠费情况并形成相应的报表。 青岛理工大学毕业设计（论文） 8 系统管理模块 1、添加用户：添加新的管理人员，并为其设置相应的密码，操作员就可以 凭借用户名和密码使用本系统。 2、删除用户：去除本系统的使用者。 3、用户密码修改：操作员可以重新设定自己登录本系统的密码。 2.22.2 系统模块之间的关系系统模块之间的关系 系统模块之间的关系如图 2.1 所示。 西苑小区电费管理系统 基本信息管理交费管理欠费管理系统数据维护系统管理 业主管理 人员管理 走表管理 交 费 费用定价 费用调整 费用查询 追缴欠费 欠费统计 数据维护 数据初始化 添加用户 删除用户 修改密码 2.32.3 数据库设计数据库设计 在设计数据库表结构之前，首先创建一个数据库。本系统使用的数据库为 “dfgl.mdb” 。 数据库中共包含 7 个基本表：走表数据表 db，电费表 df，管理人员表 glry ，住户表 liver，系统管理表 manager，欠费统计表 qftj，收费定价表 sfbz。 下面分别是对以上 7 个数据表的表结构设计： 1、走表数据表 db 走表数据表是用来存放业主本月电表的走表数据以及所应交纳的电费。db 的表结构如表 2.1 所示： 图 2.1 系统模块关系图 青岛理工大学毕业设计（论文） 9 表 2.1 走表数据表结构 编号字段名称数据类型 1房屋编号文本 2原始底数数字 3本次读数数字 4实际用量数字 5标准货币 6应交费用货币 7查表人文本 8查表日期文本 9是否交费是否 10月份文本 11操作员文本 12交费日期文本 13交费人文本 2、电费表 df 电费表是用来存放住户每月交费信息的，它为统计查询住户交费情况提供 了依据。电费表 df 的表结构如表 2.2 所示： 表 2.2 电费表结构 编号字段名称数据类型 1房屋编号文本 2目前住户文本 3原始底数数字 4本次读数数字 5实际用量数字 6标准货币 7应交费用货币 8查表人文本 9查表日期文本 10是否交费是否 11月份文本 12操作员文本 13交费日期文本 14交费人文本 3、管理人员表 glry 管理人员表用来存放小区电费管理人员的名单。管理人员表 glry 的表结构 如表 2.3 所示： 表 2.3 管理人员表结构 编号字段名称数据类型 青岛理工大学毕业设计（论文） 10 1编号文本 2查表人文本 4、住户表 liver 住户表用于存放西苑小区住户的基本信息，它是实现管理的最基本的依据。 住户表 liver 的表结构如表 2.4 所示： 表 2.4 住户表结构 编号字段名称数据类型 1房屋编号文本 2区号文本 3楼号文本 4目前住户文本 5性别文本 6入住时间文本 7状态文本 8工作单位文本 9固定电话文本 10手机文本 5、系统管理表 manager 系统管理表是用于存放所有能进入本系统的用户信息的。系统管理表 manager 的表结构如表 2.5 所示： 表 2.5 系统管理表结构 编号字段名称数据类型 1用户名文本 2密码文本 3权限文本 6、欠费统计表 qftj 欠费统计表是用来存放欠费金额的，它为查询汇总月份的欠费情况提供依 据。欠费统计表 qftj 的表结构如表 2.6 所示： 表 2.6 欠费统计表结构 编号字段名称数据类型 1月份文本 2金额货币 3统计时间文本 4操作员文本 7、收费定价表 sfbz 收费定价表中就一个字段，用来设定收费标准的。 青岛理工大学毕业设计（论文） 11 2.42.4 本章小结本章小结 本章从系统的模块设计、模块之间的关系以及数据库的设计三个方面详细 叙述了整个系统的总体设计方案，阐述了各个模块要实现的功能，为系统的详 细设计做好了必要的准备工作。 青岛理工大学毕业设计（论文） 12 第第 3 3 章章 系统详细设计系统详细设计 3.13.1 登录模块及主界面设计登录模块及主界面设计 用户要使用本系统，首先必须通过系统的身份认证。登录过程需要完成以 下任务： 1、根据用户名和密码判断是否可能进入系统 2、根据用户类型决定用户拥有的权限 2、成功登录的用户将进入系统的主界面。 登录窗体的名称为 frmlogin，它的界面布局如图 3.1 所示 图 3.1 登录窗体 主界面的名称为 mdifrmmain，它的设计如图 3.2 所示。 图 3.2 主界面 主界面设计过程： 1、主菜单的设计是在“菜单编辑器”中完成的。共设置了六个主菜单，也 青岛理工大学毕业设计（论文） 13 就是本系统的六个模块。每个主菜单下都有其对应的子菜单，分别完成系统的 不同功能。 2、工具栏为用户提供了对于应用程序中最常用的菜单命令的快捷访问方式。 它位于菜单栏下方，有许多命令组成，每个命令按钮上都设置了一个形象的小 图标，以标示命令按钮功能。工具栏主要有 toolbar 控件和 imagelist 控件共同 设计完成。 3.23.2 基本信息管理模块及界面设计基本信息管理模块及界面设计 3.2.13.2.1 业主管理窗体设计业主管理窗体设计 小区的管理主要是对住户的管理，进入小区内居住的住户首先要进行登记， 管理人员需要把住户的基本信息输入到数据库中，并能够编辑、查询住户的信 息。 业主管理窗体的名称为 frmliver，它的设计如图 3.3 所示。 图 3.3 业主管理界面 设计思想： 1、为了窗体设计的美观，业主资料界面仍然采用的是工具栏的样式。用户 添加、修改、查询住户信息时，分别打开独立的窗体，用户可以明确对系统进 行操作，从而达到系统功能的实现。 2、该窗体功能的实现，是对 liver 数据表进行操作。采用的是 ado 数据库 访问技术。在窗体中添加 ado data 控件快速地创建了一个到数据库的连接。 3、窗体中添加了 datagrid 控件，用于住户信息的显示和定位。当用户对 某个业主资料进行编辑时，只要定位到相应的住户信息上，就能对该住户的资 青岛理工大学毕业设计（论文） 14 料信息进行编辑操作。 4、在设计添加窗体时，根据西苑小区楼房分布的实际情况，当用户输入房 屋编号时，系统会自动识别房屋所在的位置，即自动生成所在的分区以及楼号。 5、为了用户能够快速的定位业主信息，设置了查询功能，用户可以根据实 际需要，选择不同的查询方式，从而快速准确的定位业主信息。 窗体设计的过程： 1、新建一个窗体，窗体命名为“frmliver” ，caption 属性设置为“业主资 料” 。 2、在窗体上添加 1 个 toolbar 控件，1 个 imagelist 控件。将所需图片添 加到 imagelist 中，设置 toolbar 控件的属性，使 toolbar 控件上按钮的索引号 与图片索引号相对应。 3、在窗体上添加 1 个 ado 控件和 1 个 datagrid 控件。属性设置如下表 3.1 所示： 表 3.1 控件 adodc1 和 datagrid 的属性设置 控件名称属性属性值 connectionstrin g provider=microsoft.jet.oledb.4.0;data source=dfgl.mdb;persist security info=false adodc1 recordsourceselect * from liver datagriddatasourceadodc1 3.2.23.2.2 走表管理窗体设计走表管理窗体设计 走表管理主要是统计居民住户每月电表的走表数据，为电费的收取提供依 据。它的窗体名称为 frmbiao，界面布局如图 3.4 所示。 青岛理工大学毕业设计（论文） 15 图 3.4 走表管理界面 设计思想： 1、在窗体中添加 ado data 控件快速地创建了一个到数据库的连接。并通 过 datagrid 控件显示走表的信息。 2、电表管理人员可以通过输入房屋编号快速定位业主的走表信息。 3、通过 datagrid 控件前端箭头指向指针的定位，点击【抄表】按钮，会 打开一个“走表数据添加”的窗体，电表管理人员输入每个住户电表的走表数 据。系统会根据输入的数据，自动计算每个用户应交纳的费用金额。 4、管理人员也可以通过四个浏览按钮来浏览信息。 窗体设计的过程： 1、新建一个窗体，设置该窗体的名称为“frmbiao” ；caption 属性为“走表 数据管理” 。 2、在窗体上添加 1 个 text 控件。 3、在窗体上添加 1 个 ado 控件，1 个 datagrid 控件，属性设置如下表 3.2 所示。 4、在窗体上添加 9 个 command 控件，用于不同的操作。 表 3.2 控件 adodc1 和 datagrid 的属性设置 控件名称属性属性值 connectionstrin g provider=microsoft.jet.oledb.4.0;data source=dfgl.mdb;persist security info=false adodc1 recordsourceselect * from db datagriddatasourceadodc1 青岛理工大学毕业设计（论文） 16 3.33.3 交费管理模块及界面设计交费管理模块及界面设计 3.3.13.3.1 交费窗体设计交费窗体设计 交费管理模块是本系统设计的一个核心，它的功能是完成住户交费的整个 过程。窗体名称为 frmjf，界面设计如图 3.5 所示： 图 3.5 交费窗体 设计思想： 1、电费管理人员通过输入住户房屋编号快速的查询业主的信息以及本月电 表的走表数据，根据系统提示的交费金额收取电费。 2、点击【交费】按钮，向系统提交交费信息。交费完成后，操作员可以打 印交费单给用户。 窗体设计的过程： 1、在窗体上添加 4 个 frame 控件和 11 个 text 控件，将 text 控件分类， 将其拖放到不同的 frame 控件上。 2、在窗体上添加 2 个 ado 控件，1 个 datagrid 控件。它们的主要属性设 置如下表 3.3 所示： 3、添加 1 个 dtpicker 控件，用于显示交费日期。 4、在窗体的最底端添加 1 个 statusbar 控件，用于提示系统的一些基本信 息。 表 3.3 控件 adodc 和 datagrid 的属性设置 青岛理工大学毕业设计（论文） 17 控件名称属性属性值 connectionstringprovider=microsoft.jet.oledb.4.0;data source=dfgl.mdb;persist security info=false adodc1 recordsourceselect * from dbgl connectionstringprovider=microsoft.jet.oledb.4.0;data source=dfgl.mdb;persist security info=false adodc2 recordsourceselect * from sfbz datagrid1datasourceadodc1 5、打开窗体的代码编辑器，为【查询】按钮添加程序代码如下： private sub cmdfind_click() on error goto errorhandler dim conn as new adodb.connection dim rs_add as new adodb.recordset dim sql_add as string if text1.text = “ then msgbox “请输入房屋编号“, vbexclamation, “提示“ else adodc1.recordset.movefirst adodc1.recordset.find (“房屋编号=“ data source=“ data source=dfgl.mdb;persist security info=false adodc1 recordsourceselect * from db connectionstringprovider=microsoft.jet.oledb.4.0;data source=dfgl.mdb;persist security info=false adodc2 recordsourceselect * from sfbz connectionstringprovider=microsoft.jet.oledb.4.0;data source=dfgl.mdb;persist security info=false adodc3 recordsourceselect * from df datagrid1datasourceadodc1 datasourceadodc1label1 datafield月份 datasourceadodc3label2 datafield房屋编号 datasourceadodc1label3 datafield房屋编号 3、打开窗体的代码编辑器，为【调整】按钮添加程序代码如下： private sub command1_click() if adodc1.recordset.recordcount 0 then adodc1.recordset.movefirst do while adodc1.recordset.eof = false set adors = adocon.execute(“update db set 标准=“ data source=dfgl.mdb;persist security info=false adodc1 recordsourceselect * from liver connectionstringprovider=microsoft.jet.oledb.4.0;data source=dfgl.mdb;persist security info=false adodc2 recordsourceselect * from df connectionstringprovider=microsoft.jet.oledb.4.0;data source=dfgl.mdb;persist security info=false adodc3 recordsourceselect distinct 月份 from df datagrid1datasourceadodc1 datagrid2datasourceadodc2 2、在第 1 个 sstab 控件上添加 1 个 text 控件和 1 个 command 控件，用 于住户信息的定位。 3、在第 2 个 sstab 控件上添加 3 个 combox 控件，分别存放月份的起、始 月份以及费用类别。 4、打开程序代码设计器，设置 combox 控件的 click 事件。代码如下： private sub combo1_click() if combo3.text = “已交“ then adodc2.recordsource = “select * from df where 房屋编号=“ data source=dfgl.mdb;persist security info=false adodc1 recordsourceselect distinct 房屋编号 from df where 是否 交费=false order by 房屋编号 connectionstringprovider=microsoft.jet.oledb.4.0;data source=dfgl.mdb;persist security info=false adodc2 recordsourceselect distinct 月份 from df connectionstringprovider=microsoft.jet.oledb.4.0;data source=dfgl.mdb;persist security info=false adodc3 recordsourceselect * from df order by 房屋编号 rowsourceadodc1datacombox1 listfield房屋编号 rowsourceadodc2datacombox2 listfield月份 2、通过 datacombox1 选择欠费住户的房屋编号时，在 datacombox2 的下 拉列表中就会出现欠费的月份，通过【查询】按钮，住户的走表信息就会显示 出来。其代码如下： private sub datacombo1_change() datacombo2.enabled = true dim strquery as string if datacombo1.text = “ then exit sub end if strquery = “select distinct 月份 from df where 房屋编号=“ & datacombo1.boundtext & “and 是否交费=false“ with adodc2 .recordsource = strquery .refresh end with end sub private sub command1_click() dim textquery as string if datacombo2.text = “ then exit sub end if 青岛理工大学毕业设计（论文） 25 textquery = “select * from df where 房屋编号=“ & datacombo1.boundtext & “and 月份=“ & datacombo2.boundtext & “ with adodc3 .recordsource = textquery .refresh view end with frame5.visible = true text11.setfocus cmdjf.enabled = true cmdcancel.enabled = false end sub 3.4.23.4.2 欠费统计窗体的设计欠费统计窗体的设计 欠费统计窗体是为了汇总最近几个月小区内住户的欠费金额而设计的。能 够反映出小区电费收取工作的基本成效。窗体名称为 frmqftj，窗体结构图如图 3.9 所示： 图 3.9 欠费统计窗体 设计思想： 系统将最近几个月的月份自动添加到 combox 的下拉列表中，用户可以直 接选择所要统计的月份，并将数据导入到欠费统计表中，打印报表输出。 设计过程： 青岛理工大学毕业设计（论文） 26 1、在窗体中添加 ado 控件，通过设置 ado 控件的属性，连接数据库。 2、添加 1 个 combox 控件，通过代码将最近几个月的月份添加到 combox 下拉列表中，触发 combox 的 click 事件时，就会统计出欠费的用户，以及欠费 的金额。 3、添加 1 个 command 控件，触发 command 的 click 事件，所选月份的欠 费金额就会导出到欠费统计表中，并通过 datagrid 显示出结果。 3.53.5 系统数据维护系统数据维护 3.5.13.5.1 数据维护窗体的设计数据维护窗体的设计 数据维护窗体的窗体名为 history,它的窗体设计界面如图 3.10 所示： 图 3.10 数据备份窗体 设计思想： 数据维护窗体的设计是为了防止由于误操作造成数据库中备份的历史数据 丢失而设计的，在必要时由系统管理员维护系统数据库中的数据，一般情况下 不能随便改动。 设计过程： 1、首先，窗体中添加 1 个 text 控件，用于查询的需要。 2、在窗体上添加一个 ado 控件，一个 datagrid 控件，分别用于数据源的 连接和数据的显示。 3.5.23.5.2 初始化数据窗体的设计初始化数据窗体的设计 设计初始化数据窗体的目的是为了清理数据库中无用的数据，避免时间过 青岛理工大学毕业设计（论文） 27 长而造成数据冗余。它的窗体名称为 frmcsh，窗体结构图如图 3.11 所示： 图 3.11 初始化数据窗体 设计思想： 1、数据库为整个系统提供数据源，初始化数据必须要格外小心，否则会造 成重要数据的丢失。因此，只有系统管理员具有初始化数据的权限。 2、当点击【开始】按钮后，用户选择要初始化的数据表，再点击【初始化】 按钮，完成数据表的清理。 设计过程： 1、在窗体上添加 4 个 checkbox 控件，用户选择要进行初始化的数据表。 2、为了显示数据初始化的进程，在窗体上添加了 1 个 progressbar 控件。 用户进行初始化操作的程序代码为： private sub cmdcreat_click() on error goto errorhandle dim answer as string answer = msgbox(“确定要初始化数据？“, vbyesno, “) if answer = vbyes then progressbar1.visible = true progressbar1.max = ubound(workarea) progressbar1.value = progressbar1.min for counter = lbound(workarea) to ubound(workarea) workarea(counter) = “initial value “ & counter progressbar1.value = counter if check1.value = 1 then set adors = adocon.execute(“delete from db“) set adors = adocon.execute(“delete from df where 月份=“ & label1.caption & “) end if 青岛理工大学毕业设计（论文） 28 if check2.value = 1 then set adors = adocon.execute(“delete from df“) end if if check3.value = 1 then set adors = adocon.execute(“delete from liver“) end if if check4.value = 1 then set adors = adocon.execute(“delete from qftj“) end if next counter progressbar1.visible = false progressbar1.value = progressbar1.min end if exit sub end if errorhandle: msgbox “数据表中存在相关联的数据，不能删除数据“ end sub 3.63.6 系统管理模块及界面设计系统管理模块及界面设计 3.6.13.6.1 添加用户窗体的设计添加用户窗体的设计 添加用户界