毕业设计(论文)VB+Access某小区电费管理系统设计(附源程序)_第1页
毕业设计(论文)VB+Access某小区电费管理系统设计(附源程序)_第2页
毕业设计(论文)VB+Access某小区电费管理系统设计(附源程序)_第3页
毕业设计(论文)VB+Access某小区电费管理系统设计(附源程序)_第4页
毕业设计(论文)VB+Access某小区电费管理系统设计(附源程序)_第5页
已阅读5页,还剩32页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、2007届 某小区电费管理系统全套源程序代码,联系153893706姓 名 性 别 女 学 号 200512120235 年 级 05级 专 业 计算机科学与技术 系(院) 信 息 学 院 指导教师 2007 年 1 月 20 日诚 信 声 明本人呈交给临沂师范学院的这篇毕业论文,除了所注参考文献和世所公认的文献外,全部是本人在指导老师指导下的设计成果。 学生签名:日 期:经检查该毕业设计(论文)为独立完成,不存在抄袭现象。 指导老师签名:日 期: 摘 要在计算机普及以前,小区主要用手工记账的方法管理电费财务,这种方式不仅浪费大量的人力、物力、财力,而且不适合管理和保存。随着计算机的广泛应用,

2、大多数小区开始利用相关计算机系统来管理小区的电费财务,使得小区的电费管理更加高效,用户对电费的查询更加便捷。本管理系统是单机版电费管理系统。作者在开发本系统时采用visual basic和access 2000数据库软件作为程序主要开发工具,运用visual basic完成了程序的界面设计及主要功能的具体实现,运用access 2000完成了数据库系统的具体设计。该系统采用visual basic和ado,实现用户用电信息的快捷录入;方便小区物业公司根据用户的实际用电情况进行登记,然后自动计算各用户的电费总额;管理各用户的预存金,以及现金收付情况,实现电费的批量收款及单笔收费,实现对用户用电情

3、况、款项使用情况登记操作;并且提供给小区用户查询个人用电信息、打印有关电费报表等服务。本文简要介绍了“某小区电费管理系统”的设计思想,并概括地说明了该系统的功能及特点。该系统功能完善、界面友好、操作简单,具有综合查询和报表打印等功能,能充分满足不同层次用户需求。 关键词:visual basic;某小区电费管理系统;电费查询。abstractsmall areas manage finance in the way of hand-written record before computers become popular. it not only waste large amount of

4、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 esp

5、ecially high-effect, the consumer inquiry to electric charge is especially convenient and rapidmanagement 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 th

6、is 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

7、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 tu

8、rnover 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 manageme

9、nt 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

10、 and the auxiliary decision power, can satisfy the different arrangement of ideas consumer need sufficiently.key word: visual basic; some plot electrical bill management system management system; electrical bill inquiry目录摘要-iabstract-ii前言-1第一章 系统开发概述-21.1 visual basic简介-21.2 access简介-31.3 系统目标-31.4

11、研究思路和工作计划-4第二章 总体需求调查及功能分析-52.1系统开发背景和可行性分析-52.1.1系统的开发背景-52.1.2系统的可行性分析-52.2系统的功能需求简介-62.3系统需求描述-7第三章 数据库设计-93.1数据库的选择-93.2数据字典-93.3数据流分析-10第四章 系统总体设计-124.1系统实现-124.2各个功能模块的详细设计-12结论-27参考文献-28谢辞-29前 言在现今世界,伴随着计算机的日益普及以及计算机技术飞速发展,信息技术正深入到人们生活的每一个部分,人们从中获取信息、享受服务、交流情感,社会的信息化迅速改变着人们的生活方式, 人们对生活的便捷化的需求

12、日益提高。对于传统的电费记录方式而言,虽然在电费管理的业务处理方面已相当完善,但已经不能满足当今社会人们的要求,一方面不利于财务人员的管理,另一方面不便于用户对电费信息的查询。为了克服上述不足之处,设计和开发了此电费管理系统。系统的开发过程严格的按照软件的开发流程进行,经过需求分析、概要设计、具体实现、软件测试后,最终顺利完成了该电费管理系统的开发工作。并在系统完成后,在老师的指导下结合自己的亲身体会以及开发系统所积累的经验完成了论文。本论文系统的介绍了该系统的完整开发过程,共分为四大章。第一章主要对开发工具visual basic和access数据库作了简单的介绍。第二章是系统分析,包括系统

13、的开发背景和可行性的分析以及系统的功能需求简介和描述。第三章介绍了数据库设计包括数据库的选择,数据字典和数据流分析。第四章介绍了系统的总体设计,包括系统实现和各个功能模块的详细设计,详细介绍系统的最后合成运行及测试。 该系统采用visual basic技术和ado数据库访问技术,打破电费系统只有手工记录的局面,实现相关数据的快捷录入,自动计算,信息查询等功能。本软件电费管理系统的开发使小区电费管理人员摆脱手工记录的限制,操作人员可以快速实现用户用电信息的录入;方便小区物业公司根据用户的实际用电情况进行登记,然后自动计算各用户的电费总额;管理各用户的预存金,以及现金收付情况,实现电费的批量收款及

14、单笔收费,实现对用户用电情况、款项使用情况登记操作;提供给小区用户查询个人用电信息、打印有关电费报表。使工作更加方便、快捷,节约了大量的人力和物力,符合小区电费管理的透明化要求。第一章 开发工具简介1.1 visual basic简介visual basic是一种面向对象、可视化的和调用事件驱动方式的结构化高级程序设计,可用于开发windows环境下的各种应用程序。它简单易学、效率高,且功能强大,而且程序开发人员不必具有c/c+编程基础。在visual basic环境下,利用新颖易用的可视化设计工具、事件驱动的编程机制,使用windows内部的应用程序接口(api)函数,以及动态链接库(dll

15、)、动态数据交换(dde)、开放式数据访问(odbc)等技术,可以高效、快速地开发出windows环境下功能强大、图形界面丰富的应用软件系统。总体来说,visual basic具有以下特点:(1)可视化编程:在用传统程序设计语言设计程序时,都是通过编写程序代码来设计用户界面的,在设计过程中看不到界面的实际显示效果,必须编译并运行程序才能观察。如果功能出错或对界面的效果不满意,还要回到程序中修改。有时候,这种编程-编译-修改的反复操作可能要多次,极大得影响了软件开发效率。visual basic提供了可视化设计工具,它能实现代码和界面的共存,开发人员不必为界面设计而编写大量程序代码。只需要按设计

16、要求的屏幕布局,用visual basic系统提供的工具,在屏幕上添加各种“部件”,即图形对象,并设置这些图形对象的属性。visual basic自动产生界面设计代码,程序设计人员只需要编写实现程序功能的那部分代码,从而可以大大提高程序设计的效率。(2)面向对象的程序设计visual basic支持面向对象的程序设计,但它与一般的面向对象的程序设计语言(如c+)不完全相同。在一般的面向对象程序设计语言中,对象由程序代码和数据组成,是抽象的概念;而visual basic则是应用面向对象的程序设计方法(oop),把程序和数据封装起来作为一个对象,并为每个对象赋予应有的属性,使对象成为实在的东西。

17、在设计对象时,不必编写描述和建立每个对象的程序代码,而是用工具直接拖到在界面上。每个对象以图形方式显示在界面上,都是可视的。(3)结构化程序设计语言visual basic是以basic语言为基础上发展起来的,属于高级程序设计语言,接近于自然语言和人类的逻辑思维方式。visual basic语句简单易懂,其编辑器支持彩色代码,可自动进行语法错误检查,同时具有功能强大且使用灵活的调试器和编译器。在用visual basic设计大型应用软件时,不必编写具有明显开始和结束的程序,而是编写若干个微小的子程序,即过程。这些过程分别面向不同的对象,由用户操作引发某个事件来驱动完成某种特定的功能,或者由事件

18、驱动程序调用通用过程来执行指定的操作,这样可以方便编程人员,提高效率。其他功能如下:1 时间驱动的编程机制2 提供了易学易用的应用程序集成开发环境3 强大的数据库操作功能4 active技术5 网络功能6 多个应用程序向导7 完备的help联机帮助功能1.2 access2000简介microsoft access 2000是一个非常有用的桌面数据库开发软件,具有极其友好的用户界面,是一个可视化良好的中小型数据库管理系统,它能够与visual basic程序相连接,并提供了两种创建数据库的方法:一、可以使用“数据库向导”仅一次操作即可为所选数据库类型创建必要的表、窗体及报表,这是开始创建数据库

19、的最简单的方法;二、也可以先创建一个空数据库,然后再添加表、窗体、报表及其他对象,这是最灵活的方法,但需要分别定义每一个数据库要素。无论哪一种方法,在数据库创建之后,都可以随时修改或扩展数据库。visual basic 最引人注目的特点之一就是它访问数据库的强大功能.其中通过数据库控件、数据访问对象可以实现对数据库的访问。其引入了功能强大的ado作为存储数据的新标准,并提供了新的数据环境设计器,使数据访问更为灵活和简便。access可以作为个人计算机终端和大型主机系统之间的桥梁。通过如sql、odbc等特定技术,方便地存储、检索和处理服务器平台上的关键信息,提供了灵活、可靠、安全的客户/服务器

20、解决方案。access可以接受多种格式的数据,从而方便了用户在不同系统之间进行数据转换。1.3系统目标采用电费管理现有的软硬件及科学的管理系统开发方案,建立小区电费管理系统,实现小区电费管理的计算机自动化。系统应能顺利的实现电费的用户交费,数据查询,信息录入,系统数据维护及基本数据维护等功能,并达到操作直观、方便、实用、安全等要求。目标系统应该达到以下要求: 1、效率性。优化逻辑设计与物理设计,使系统运行效率高,反映速度快。2、可靠性。能连续准确的处理各项事务。3、可理解性。用户容易理解和使用该系统。4、可维护性和适应性。系统应易于修改、易于扩充、易于维护,能够适应电费业务不断发展变化的需要。

21、5、可用性。目标系统功能齐全,能够完全满足业务需求。6、安全保密性。保证系统的物理安全、数据存储和存取的安全与保密、数据传输的安全与保密,做好使用人员的授权管理。1.4研究思路和工作计划正如任何其它软件项目的研究开发过程一样,我做的毕业设计也经历了从选题,调研,熟悉开发环境,实验关键技术,查找类似的相关系统的资料,系统概要设计,数据库结构设计,功能模块设计和开发,功能模块测试,系统调试和系统试运行和修改。 一开始,在指导老师的指导和帮助下,我选择了某小区电费管理系统这个题目,然后就是进行社会调查,通过对多个小区电费管理的日常事务流程的调查以及朋友和老师的提醒和帮助下,我对电费管理的基本功能和数

22、据流程有了大体的了解,心里有了大体的框架后,我就开始熟悉开发环境,我用的是vb作为开发工具,access作为数据库技术,到图书馆借了相关的资料后,就开始学习,对vb和access有了系统的了解后,然后根据调研的结果对系统功能和数据库作了详细的分析与设计,在对系统功能模块划分后,对各个功能模块进行了程序设计与调试,其间进行了大量、反复的修改,以期待这个设计更加完善,最终完成了这个设计。第二章 需求调查及功能分析2.1系统的开发背景和可行性分析2.1.1系统的开发背景随着社会主义市场经济的不断发展和电力体制改革的不断深入,供电部门面临着开拓电力市场、增加售电量的严峻形势,同时电力用户对供电部门的服

23、务质量也提出了更高的要求。传统的电费管理都是由工作人员手工查表,抄表完成的,其中要完成用户电费的收取,每月抄表,用户购电情况查询,以及列出欠费用户的信息名单之类的信息。其工作强度大,工作流程繁琐,由于工作人员的不细心,将会造成电费收支的出错也是经常发生的。鉴于以上原因我们有必要开发一种帮助电费管理人员的软件系统,可以完成检查用户用电情况,每月抄表,信息录入以及基本数据维护的各项功能。本系统采用visual basic 6.0与微软access数据库方式,界面尽量做到人性化,数据维护方面做到可靠安全。2.1.2系统的可行性分析对于任何系统的开发,都应该首先分析它的可行性。如果项目的设计和实施根本

24、不具备可行性,那么花费在这项工程上的人力、物力、财力都是无谓的浪费。可行性分析的目的,就是用最小的代价在尽可能短的时间内确定问题是否能够解决。下面将从技术可行性、经济可行性和操作可行性三方面来说明。(一)技术可行性分析:visual basic具有很强的用户界面设计功能,不需要编写大量的程序代码就能够开发出良好的交互式界面,能够实现对数据库的基本操作。access具有强大的数据库支持功能,能够支持现今大多流行的数据库,可以方便的实现与各种数据库的连接。access具有良好的用户操作界面,用户可以通过菜单和对话框操作;可靠的数据管理方式,完成数据管理任务;面向对象的操作理念以及强大的网络支持功能

25、,来实现网上交互式功能。access可以通过如sql、odbc等特定技术,方便地存储、检索和处理服务器平台上的关键信息,可以接受多种格式的数据,从而方便了用户在不同系统之间进行数据转换。因此从技术层面讲,某小区电费管理系统的开发是可行的。(二)经济可行性分析:采用该电费管理系统,在管理节省了时间,为部门节省了大量的人力和物力;并且方便业主对自己相关信息的了解,真正做到电费管理的透明化、高效性、方便性。适应了当今社会高效、便捷的要求。因此从经济层面上讲,开发这样一个为电费管理系统是十分可行的。 (三)操作可行性分析:该系统主要是面向操作员和管理员。操作员注册登陆后可以查询电费及相关的信息,管理员

26、注册登陆后可以直接对该电费管理系统的所有功能进行操作,对系统进行管理。操作员和管理员一般都有一定的计算机基本操作能力,不需要进行另外的学习。因此在操作上是完全可行的。总之,电费管理系统的开发从技术上、经济上、操作上分析都具有可行性,应用前景十分广阔。2.2系统功能需求简介某小区电费管理系统对小区的电费管理起到重要的作用,就一般的小区来说,它的设计内容不是很复杂,基本实现的功能也不需要太多,比如用户交费,本月抄表,数据查询,信息录入,系统数据维护,基本数据维护是最基本的功能,同时也是最重要的功能,需要分成六个基本模块分别进行分析、设计和测试,在用户交费功能模块中,主要实现交纳电费管理;本月抄表模

27、块中,主要实现单户抄表,多户抄表功能;数据查询模块是重要的模块,在此模块中,主要实现是电费查询与统计、用户欠费查询;在信息录入模块中,主要实现资料录入、资料修改、资料删除;在系统数据维护模块中,主要实现数据备份、数据恢复;在基本数据维护中,主要实现用户类型维护、操作员维护。在小区管理中,总体人员比较少,因此在进行电费查询及交费时,其工作量也比较小。因为是专门针对小区电费而进行系统开发的,所以其功能相对比较简单,但对小区电费是比较实用的。因此,针对小区电费而言,经过了反复地论证,最终确定了某小区电费管理系统的设计方案。该小区电费管理系统的主要功能流程图如图2-1。 登录窗体主窗体用户交费交纳电费

28、数据查询电费查询与统计用户欠费查询信息录入资料录入资料修改资料删除系统数据维护数据备份数据恢复基本数据维护用户类型维护操作员维护退出本月抄表单户抄表多户抄表 图2-1:功能流程图2.3 功能需求描述本系统包含如下功能:1 用户交费管理有电费交费功能,电费交费时包括应收电费,实收现金,滞纳金,实现电费的收取。2本月抄表管理 有录入抄表信息功能,抄表信息包括用户编号,用户姓名,上次至码,抄表日期,当前至码,抄录日期。3 数据查询管理有电费查询的功能,电费查询时包括用户电费查询以及用户欠费查询,电费查询与统计包括用户编号,用户名称,应交金额,实交金额,本月电量(度),交费日期,用户欠费查询包括用户编

29、号,用户名称,欠费。4 信息录入管理实现用户信息的管理,用户的信息包括用户编号,用户姓名,用户类型,当前至码,抄表日期,上次欠费,电价(元/度),抄表人员,备注,电表倍数,可以实现用户信息录入,信息修改,信息删除等功能。5 系统数据维护管理实现系统数据的管理,可以实现数据备份以及数据恢复的功能。6基本数据维护管理 实现用户数据维护的功能,数据维护包括用户类型维护以及操作员维护。用户类型维护包括电表类型,单价,有对电表类型进行添加,删除的功能,操作员维护包括姓名,权限,添加用户,删除用户,实现用户数据维护的功能。第三章 数据库设计3.1 数据库的选择数据库的建立使用的是microsoft acc

30、ess ,当然这只是一种选择方式,实际应用中可结合自身设计系统的特点选择系统架构。如果数据量不是很大,使用access 数据库是一种最好的选择,如果数据量大,可使用microsoft sql sever 数据库,前提是使用windows2000 操作系统。本系统因适用于某小区电费,数据量不是很大,因此使用access 数据库即可。access作为关系数据库开发工具,能将各种信息汇集以供查询、存储和检索。另外,access 能创建自定义报表用于打印或输出数据库中的信息。access也提供了数据存储库,可以使用桌面数据库文件把数据库文件置于网络文件服务器,与其他网络用户共享数据库。如上所述,acc

31、ess 作为关系数据库开发具备了许多优点,可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。3.2 数据字典对系统中数据的详尽描述就是数据字典,它提供对数据库数据描述的集中管理。它的处理功能是存储和检索元数据,并且为数据库管理员提供有关的报告。对数据库设计来说,数据字典是进行详细的数据收集和数据分析所获得的主要成果。它的界面布局如图3-1所示: 图3-1:数据库设计界面1 电表信息表 该表用于存放所有交费记录,每一用户都有唯一的交费编号。管理人员可随时登记新的用户记录,删除已无效用户记录,也可以随时查找用户需求的交费信息包括字段:编号,用户编号,用户,上次电表值,抄表时间,照明

32、比例,最后应该缴费,电价,商业电价,经办人,单据内容, 当前至码,当前欠费,当前电量,交费时间,delflag,本期电费,用电累计,商业用电,电表初值,操作员编号,电表倍数,电费类型编号。2 交费表 该表用于存放交费记录,用于记录交费信息。包括字段:编号,交费时间,本次实收,欠费,滞纳金,用户编号,用户,经办人,单据内容,本次购买电量。3 密码表表 该表为操作权限表,用于验证操作人员的身份。包括字段:姓名,操作权限,密码。4记住密码表 该表用于是否记住密码的信息。方便在登陆人员下次登陆时可以不用记住密码,并且可以直接进入系统。包括字段:标记,姓名,权限,密码。5 用户类型表 该表用于存放用户使

33、用电表的类型。包括字段:电费类型编号,电费类型,unitprice,电费设置日期。6 用户表 该表用于存放用户的信息。包括字段: 用户编号, 住户名称, 性别, 身份证号码, 银行帐号, 电话, 用户密码, 工作单位。3.3数据流分析本次所设计的某小区电费管理系统,其中,操作员可以对用户的电费交费信息进行登记,把交费信息添加于电表信息表中,在信息录入时录入的信息先记录到电表信息表中,然后记录到用户类型表, 如图3-2 数据流分析图用户登录修改密码密码表用户交费电表信息数据查询交费信息录入用户类型基本数据维护交纳电费交费,欠费查询资料录入,修改,删除用户类型维护操作员维护 图3-2:数据流分析图

34、 第四章 系统总体设计4.1系统实现本工程中引用了一些控件,在设计时选择“工程”菜单中的“部件”选项,从控件列表中选中如下选项:microsoft ado data control 6.0(oledb)microsoft datagrid control 6.0(oledb)microsoft data control 6.0(oledb)microsoft datalist control 6.0(oledb)添加到vb界面的工具栏中,为界面设计做准备。4.2各个功能模块的详细设计1 登陆对话框 frmlogin用户登录系统时需要根据其身份输入正确的用户名和密码,如果用户是管理员需要选择管理

35、员类型,如果用户是操作员则选操作员类型,经过系统验证后才能够进入系统,这样以来就防止了非法用户的非法进入,起到了一定的保护作用。如果想修改密码启动修改密码窗体frmmmxg;否则进入主窗体mdime。它的界面布局如图4-1所示 图4-1 登录界面窗体 当点击“确定”按钮时,代码如下:private sub command1_click()if check1.value = 1 thenset rec = new adodb.recordsetrec.open select * from 记住密码, gcnn, 3, 3rec(标记) = 1if combo2.text thenrec(姓名)

36、= combo2.textelserec(姓名) = end ifif combo1.text thenrec(权限) = combo1.textelserec(权限) = end ifif text2.text thenrec(密码) = text2.textelserec(密码) = end ifrec.updaterec.closeelseset rec = new adodb.recordsetrec.open select * from 记住密码, gcnn, 3, 3rec(标记) = 0rec.updaterec.closeend ifdim rec1 as adodb.reco

37、rdsetset rec1 = new adodb.recordsetrec1.open select * from 登录人员, gcnn, 3, 3set rec = new adodb.recordsetrec.open select * from 密码表 where 姓名= & combo2.text & and 操作权限= & combo1.text & and 密码= & text2.text & , gcnn, 3, 3if rec.eof = false then if rec(操作权限) 管理员 then frmmain.xzck.enabled = false mdime.m

38、czy.enabled = false mdime.xtwh.enabled = false mdime.del.enabled = false frmmain.djgl.enabled = false frmmain.delte.enabled = false else me.xzck.enabled = true mdime.mczy.enabled = true mdime.xtwh.enabled = true createnewkey hkey_current_user, zhiyuantechnologe setkeyvalue hkey_current_user, zhiyuan

39、technologe, username, dlj, reg_sz setkeyvalue hkey_current_user, zhiyuantechnologe, password, dlj, reg_sz frmmain.djgl.enabled = true frmmain.delte.enabled = true end if rec1(姓名) = combo2.text rec1.update rec1.close me.hide guser = combo2.text mdime.showelse msgbox 权限或密码不正确,请重试!, vbinformationend if

40、rec.closeend sub2修改密码窗体frmmmxg 用户先输入操作员的资料,然后输入要修改的新密码。它的界面布局如图4-1所示图4-2 修改密码窗体 当点击“修改“按钮时,代码如下:private sub command2_click()if text3.text = or text4.text = thenmsgbox 密码不能为空text3.text = text4.text = exit subend ifif text3.text text4.text thenmsgbox 两次输入密码不相同,请重试text3.text = text4.text = exit subelse

41、dim rec1 as adodb.recordsetset rec1 = new adodb.recordsetrec1.open select * from 密码表 where 姓名= & text1.text & and 操作权限= & combo1.text & and 密码= & text2.text & , gcnn, 3, 3rec1(密码) = text3.textrec1.updaterec1.closemsgbox 密码已经成功修改end ifend sub3主窗体mdime主窗体是一个下拉菜单,控件中包含的主要选项卡对象有: (1) 用户交费管理,对象有: 交纳电费菜单。

42、 (2) 本月抄表管理,对象有:单户抄表,多户抄表菜单。 (3) 数据查询管理,对象有:用户电费查询,用户欠费查询菜单。 (4) 信息录入管理,对象有:资料录入,资料修改,资料删除菜单。(5) 系统数据维护管理,对象有:数据备份,数据恢复菜单。 (6) 基本数据维护管理,对象有:用户类型维护,操作员维护菜单。 (7) 退出管理 它的界面布局如图4-3所示图4-3 主窗体4交纳电费窗体frmfee 点击主窗体中的交纳电费下拉菜单进入该窗体,该窗体用于实现电费的交纳记录。交费信息填写完毕后,点击确定按扭所输入的交费信息加入到电表信息表中。代码如下:private sub command1_clic

43、k()dim rstfeeend as new adodb.recordsetdim cmdexe as new adodb.command dim remoney as string dim sqlstring as string if trim(txtfee) = or trim(txtm) = then msgbox 请先输入数据!, vbinformation exit sub end if remoney = convertme(trim(txtfee) dim change as string change = val(txtm) - val(txtfee) if change =

44、 0 then me.lblmoneyofcard = ¥ & format(change, #0.00) else me.lblmoneyofcard = 0 end if rstfeeend.open select * from 电表信息 where 用户编号= & mdime.txtusername(0) & and delflagtrue , gcnn, adopenstatic, adlockbatchoptimistic dim rusrtype as new adodb.recordset if rstfeeend.recordcount 0 then rusrtype.open

45、 select * from 用户类型 where 电费类型编号 = & rstfeeend.fields!电费类型编号, gcnn, adopenstatic, adlockbatchoptimistic if rusrtype.recordcount 0 then me.lblusryype = rusrtype.fields!电费类型 rusrtype.close else msgbox 用户类型不能为空! , vbcritical rusrtype.close unload me end if end if me.label11 = rstfeeend.fields!电表倍数 me.label11 = me.label11 & / & format(rstfeeend.fields!电价, #0.00) rstfeeend.fields!当前电量 = 0 me.starta = rstfeeend.fields!上次电表值 & 度 rstfeeend.fields!用电累计 = rstfeeend.fields!用电累计 + rstfeeend.fields!当前电量 msgbox mdime.txtusername(7) rs

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论