毕业设计论文个人收支管理系统设计
来源：人力资源 发布时间：2020-08-25 点击：
XX 大学
毕业设计(论文)
个人收支管理系统
学
院
XXXXXXXXXXXXX
年级专业
XXXXXXXXXXX
学生姓名
XXX
指导教师
XXX
专业负责人
完成日期
XXXX 年 XX 月
摘 要
个人收支记录就是个人日常生活与工作中一项重要的业务,个人需要利用个人收支管理系统来记录各种帐务信息,以及对其进行必要的管理。本系统就是专门针对个人日常需求而开发的一个具备几种常用功能的系统。
个人收支管理系统主要完成以下功能: 系统维护:收支类别管理,可以添加类别(包括类别名称,说明,收支选择),删除类别。收支名称管理:包括收支名称的增加与删除,通过点击不同的收支类型,可以查到相应的收支名称。银行卡管理:包括银行卡的增加,删除,通过点击不同类型的银行卡,可以查到相应的银行卡信息(卡号,开户日期等)。记账日志:分为现金记账,银行卡记账。查询与统计:包括支出情况统计,收支情况对比。
关键词:个人收支管理系统;Visual basic 6、0;数据库系统
目
录 摘
要 .................................................................................................................... 、I 目
录 ....................................................................................................................... II
第 1 章 绪论 ..............................................................................................................1
1、1 开发背景 .................................................................................................. 1
1、2 开发目的与意义 ...................................................................................... 1
第 2 章 开发工具介绍 ..............................................................................................3
2、1 Visual basic 6、0 简介 ............................................................................. 3
2、2 Visual Basic 具有以下特点 ..................................................................... 3
2、2、1 面向对象的可视化设计平台 ...................................................... 3
2、2、2 事件驱动的编程机制 .................................................................. 4
2、2、3 结构化的设计语言 ...................................................................... 4
2、2、4 充分利用 Windows 资源 ............................................................ 4
2、2、5 开放的数据库功能与网络支持 .................................................. 4
2、3 Visual basic 6、0 运行环境及配置 ......................................................... 5
2、4 Access 数据库介绍 .................................................................................. 5
第 3 章 需求分析 ......................................................................................................7
3、1 系统需求分析 ........................................................................................... 7
3、1、1 功能需求 ..................................................................................... 7
3、1、2 性能需求 ..................................................................................... 7
3、1、3 环境需求 ..................................................................................... 7
3、1、4 未来需求 ..................................................................................... 7
3、2 数据流程图 .............................................................................................. 7
第 4 章 系统总体设计 ..............................................................................................9
4、1 系统功能模块 ........................................................................................... 9
4、2 功能的实现 ............................................................................................... 9
4、3 系统功能模块图 ....................................................................................... 9
第 5 章 系统详细设计 ............................................................................................12
5、1 系统结构设计 ......................................................................................... 12
5、2 E-R 图 ..................................................................................................... 13
5、2、1 收支类型 E-R 图 ...................................................................... 13
5、2、2 银行卡表 E-R 图 ...................................................................... 13
5、2、3 银行卡记录表 E-R 图 .............................................................. 14
5、2、4 收支记录表 E-R 图 .................................................................. 14
5、2、5 关系实体 E-R 图 ...................................................................... 15
5、3 系统主要界面设计 ................................................................................. 16
5、4 数据库设计 ............................................................................................. 18
5、4、1 收支类别数据表 ....................................................................... 19
5、4、2 银行卡管理数据 ....................................................................... 19
5、4、3 银行卡管理数据表 ................................................................... 19
5、4、4 现金记账数据表 ....................................................................... 20
第 6 章 系统主要界面说明与使用说明 ................................................................21
系统使用说明 .................................................................................................. 21
结
论 ......................................................................................................................23
参考文献 ..................................................................................................................24
附录:源程序代码 ....................................................................................................25
致
谢 ......................................................................................................................33
第 1 章 绪论 1、1 开发背景 计算机应用已经渗透到日常工作的许多方面,无论就是其自身还就是其所发挥的作用。计算机都标志着一种高科技、高效率与高水平。信息作为生产力中最活跃的因素,很早就在人类经济生活中发挥着不可替代的作用,但把信息纳入企业经营管理系统中高效处理与应用就是在计算机发明以后的 50 年代末。
目前人们所提到的管理信息系统,通常就是指以计算机为工具,对管理信息进行收集、存贮、检索、加工与传递,使其应用于组织机构及企业管理领域的“人－机系统”,该系统就是 70 年代初“后工业经济”时代的产物,在企业管理信息系统在其发展的初期,就是单一的人—机系统,系统功能简单,效率低,对管理的作用有限。
为了企业创先进、争一流,为了企业的明天,许多企业的领导已经或正准备投入高额资金,建立大规模的计算机管理信息系统(MIS),所以越来越多的现代化计算机管理软件进入了社会应用的方方面面,个人收支管理领域也不例外。
个人收支管理信息系统就是针对个人的收入与支出的自身特点,适合对钱财管理中的实际情况,涉及了收入与支出的每一个环节,为个人的财务管理提供了一个先进的系统平台与一个合理分配收支的环境,加快了信息反馈,从而更好的管理自己的财务。本系统的实现使用户从繁重的手工业务中解脱出来,提高了管理钱财的效率与质量。
个人收支并不就是一个新鲜词,简单地说就就是开源节流、管理好您的钱。就是实现个人人生目标而制定、安排、实施与管理的一个各方面总体协调的财务规划的过程,或就是对家庭资产的合理安排与管理。
1、2 开发目的与意义 通过数据库技术分析数据库中个人财产的基本信息,达到收支的目的: 1.建立数据库, 个人收支的基本资料就存放在其中。
2.把个人收支的全部资料输入数据库。
3.用 VB 开发出应用程序连接数据库。
4. 在应用程序中用查询与统计等手段对数据库的资料进行处理,得到有效的数据,分析出个人的财产情况,得出结论与措施,然后个人就可以通过措施达到收支的目的。
第 2 章 开发工具介绍 2、1 Visual basic 6、0 简介 VB 就是一种可视化的编程语言,这种方法不需要编写大量的代码去描述截面外观与位置,而只需要把预先建立的控件,先使用“画图”之类的绘图程序那样“画”到屏幕上即可。它一共具有三个版本:标准版、企业版、专业版。它作为一种开发工具而言,不仅仅就是一种语言 ,从数学计算、数据库管理、客户/服务器软件,通信软件,多媒体软件带Inter/Intranet软件,都可以用VB开饭完成。使用 VB 不仅可以感受到 Windows 带来的新技术,新概念与新的开发方法,而且 VB 就是目前众多 Windows 软件开发工具中效率最高的一个 。同时我们利用 VB6、0 编制数据库操作应用程序。VB 编程操作数据库的方法可分两层:第一层就是通过数据操作对象访问数据库 ,这种方式需要将数据库操作组件库加入 VB 的工程项目的参考,然后在程序中构造这些数据库组件对象的实例连接,操作与管理数据库,如 DAO 对象编程,RDO 对象编程与 ADO 对象编程等,还包括直接调用 ODBC API 接口编程,第二层就是通过具有数据感知性的控件来访问数据库,包括 VB 自带控件与第三方开发的 Activex 控件。
这些组件就是具有数据感知性,即内置了数据库访问的对象(或者 DAO,或者 ADO 等),并提供给主程序访问的接口,供客户端程序调用。两种方法比较起来,第一种方式编程灵活,功能强大,可扩展性强;第二种方式方便易用,开发迅速,编码量小,并且不需要了解内部数据流动的细节。所以我们利用这种可视化技术进行编程,能使编程工作变得轻松快捷,摆脱了面向过程语言的许多细节,而将主要精力集中在解决实际问题与设计友好界面上。因此,VB 在国内外各个领域中应用非常广泛,许多计算机专业与非计算机专业与非计算机专业的人员常利用它来编制开发应用程序与软件。
2、2
Visual Basic 具有以下特点 2.2.1 面向对象的可视化设计平台 利用传统的程序设计语言进行程序设计时,需要花费大量的精力通过编程设计程序的界面,在设计过程中瞧不到程序的实际显示效果,必须在运行程序的时候才能观察。如果对程序的界面不满意,还要回到程序中去修改,这一过程常常需要反复多次,大大影响了编程的效率。VB 提供的可视化设计平台,把Windows 界面设计的复杂性“封装”起来。程序员不必再为界面的设计而编写大量程序代码,只需按设计的要求,用系统提供的工具在屏幕上“画出”各种对象,VB 将自动产生界面设计代码,程序员所需要编写的只就是实现程序功能的
那部分代码,从而大大提高了编程的效率。
2.2.2 事件驱动的编程机制 传统的编程方式就是面向过程的、按事先设计的程序流程来运行的。但在图形用户界面的应用程序中,用户的动作(即事件)掌握着程序的运行流向,每个事件都驱动一段程序的运行。程序员在设计应用程序时,不必建立具有明显开始与结束的程序,而就是编写如干个微小的子程序,即过程。这些过程分别面向不同的对象,由用户操作引发某个事件来驱动完成某种特定的功能,或由事件驱动程序调用通用过程来执行制定的错做。
2.2.3 结构化的设计语言 VB 就是在结构化的 BASIC 语言基础上发展起来的,具有高级程序设计语言的语句结构,接近于自然语言与人类的逻辑思维方式,其语句简单易懂。
VB 就是解释型语言,在输入代码的同时,解释系统将高级语言分解翻译成计算机可以识别的机器指令,并判断每个语句的语法错误。在设计 VB 程序过程中,随时可运行程序,而在整个应用程序设计好后,可编译生成可执行未见(、exe),脱离 VB 环境,直接这 Windows 环境下运行。
2.2.4 充分利用 Windows 资源 VB 提供的动态数据交换(DDE,Dynamic Data Exchange)编程技术,可以在应用程序中实现与其她 Windows 应用程序建立动态数据 交换、在不同的应 用程序之间进行通信的功能。
VB 提供的对象链接与嵌入(OLE, Object Link and Embed)技术则就是将每个应用程序都瞧做一个对象,将不同的对象链接起来,嵌入到某个应用程序中,从而得到具有声音、影像、图像、动画、文字等各种信息的集合式文件。
VB 还可以通过动态链接库(DLL,Dynamic Link Library)技术将 C/C++或汇编语言编写的程序加入到 VB 得应用程序中,或就是调用 Windows 应用程序接口(API,Application Programming Interface)函数,实现软件开发工具包(SDK,Software Development Kit)所具有的功能。
2.2.5 开放的数据库功能与网络支持 VB 系统具有很强的数据库管理功能。不仅可以管理 MS Access 格式的数据库,还能访问其她外部数据库,如 FoxPro,Paradox 等格式的数据库。另外,VB还提供了开放式数据连接(ODBC)功能,可以通过直接访问或建立连接的方式使用并操作后台大型网络数据库,如 SQL Server,Oracle 等。在应用程序中,可以使用结构化查询语句(SQL)直接访问 Server 上的数据库,并提供简单的面向对象的库操作命令、多用户数据库的加锁机制与网络数据库的编程技术,为单机上运行的数据库提供 SQL 网络接口,以便在分布式环境中快速而有效地实现客
户\服务器(Client/Server)方案。
2、3 Visual basic 6、0 运行环境及配置 为运行 Visual Basic,必须在计算机上安装相应的硬件与软件系。具体要求就是: 1.操作系统:Microsoft Windows NT Server 4、0 或更高的版本,或 Microsoft Windows 95 或更高的版本。
2.CPU:486DX/66 MHZ 或更高的处理器(推荐 pentium 或更高的处理器)。
3.内存:Microsoft Windows 95/98 下要求的 24MB 以上的内存,Windows T下要求 32MB 以上。
4、 磁盘空间:对于标准版,典型安装 48MB,完全安装 80MB。对于专业版,典型安装 48MB,完全安装 80MB。对于企业版,典型安装 128MB,完全安装147MB。
5.其它设备:CD-ROM 驱动器,鼠标或其她光标控制设备 2、4 Access 数据库介绍 Microsoft Access 就是目前最流行的桌面型数据库软件之一。它提供的大量的输入、分析与展示数据的工具得到了用户的广泛喜爱。
Access数据库就是微软Microsoft 公司主打办公软件Microsoft office中一个极为重要的组成部分。自从 1992 年开始销售以来,Access 已卖出了 6000 万份,现在它已经成为世界上最流行的桌面数据管理系统。后来微软公司通过大量地改进,将 Access 的新版本功能变得更加强大。不管就是处理公司的客户订单数据,管理自己的个人通讯录,还就是大量科研数据的记录与处理,人们都可以利用它来解决大量数据的管理工作。随着微软公司对 office 套件的不断升 级 ,Access 数 据 库 软 件 也 相 应 得 到 了 完 善 与 发 展 , 新 的 技 术 , 如Com,ActiveX,Xml 等网络技术不断地引入到 Access 中。Access 已经不就是单一的桌面数据库管理软件,而就是综合的数据库管理及应用集成一体化系统了。Access数据库有几个显著的特点:文件组织的单文件形式存在:一个Access数据库就就是一个以 MDB 为后缀名的文件,简单明了、容易生成、使用与管理。移植的时候只需要将一个数据库文件拷贝到新的环境中即可使用。这也就是 Access 数据库得以大量应用的原因。数目庞大的应用软件,不需要庞大的数据支持,只需要一个小小的便于管理与移植安装的数据存储区来存放数据,Access 数据库正好满足了这一要求,而且 Access 数据库也提供了数据库系统所能提供的快速检索、统计报表等功能,支持 SQL 语言,支持事务处理等;具有 VBA 的编程环境:由于 Access 数据库就是微软 office 套件中的一部分,office 套件中的共同特色——VBA 界面。用户只需要使用简单的编程语言
VB,就可以编写出丰富的Windows界面程序,而且这个程序就是内置在Access数据库中的,同样包含在了 MDB 文件中。Access 数据库还给用户提供了编写界面程序的可视化编程环境,类似 VB,Access 数据库可视化开发环境具有如Delphi,VB,Borland C++等可视化开发环境一样的快速开发功能;组件式的数据库:所谓组件式的数据库,就是指 Access 数据库具有强大的 COM 支持。在Access 数据库可以方便地使用 Windows 操作系统中已注册的 COM 组件的通用接口使用第三方开发出来的用之不尽的功能。Access 的组成部分:查询、表单、报表、宏、模块、Access 数据库窗口、子数据表、共同的报表、数据访问页、不再局限于使于 JET 数据库引擎、支持的更多的内置数据源。
第 3 章 需求分析 3、1 系统需求分析 系统分析就是开发管理信息系统的关键性阶段,就是一个从不断认识与逐步细化的过程,就是下一阶段的工作基础,就是为下一阶段进行物理方案设计、解决“怎么做”提供依据,基关键性主要体现在“理解需求”与“表达需求”两方面。
通过对现行系统的详细调研,主要就是从系统的角度理解用户的需要,确定新系统的综合要求,并提出这些需求的实现条件以及需求应达到的标准,也就就是确定新系统要做什么,做到什么程度。这些需求包括: 3.1.1 功能需求 确定新系统应做什么,这就是最主要的需求。
3.1.2 性能需求 给出所开发的新系统的技术性能指标,包括存储容量限制、运行时间限制、安全保密性等。
3.1.3 环境需求 这就是对系统运行以及所处环境的要求。例如,在硬件方面采用什么机型、有什么硬件设备等;在软件方面,采用什么支持系统运行的系统软件(指操作系统、数据库管理系统)。
3.1.4 未来需求 这类要求就是指目前不属于系统开发的范围,但将来随着外界环境的变化以及系统的发展可能会提出的要求。了解这类要求的目的就是在开发过程中,可对系统将来可能的扩展与修改做准备。一旦需要时,就比较容易进行补充与修改了。
3、2 数据流程图
根据需求分析可以得到下面数据流程图,如图 3-1 所示。
用户
图 3-1 数据功能流程图
F0P5 P7 系统维护 P1 记账日志 P2 查询与统计 P3 现金管理 收支类型 银行卡管理 收支名称 P6 银行卡记账 P8 D2 收支信息 D1 银行卡信息 P4 D3 收支对比信息 退出系统
第 4 章 系统总体设计 4、1 系统功能模块
系统结构功能:收支管理部分:分为收支类别与收支名称管理;记账管理:分为现金记账与银行记账管理;查询与统计管理:查询收入与支出金额以及收入与支出的对比情况。
4、2 功能的实现 1.“系统维护”模块。
(1) 收支类别管理:主要功能就是添加类别,删除类别。
(2) 收支名称管理:主要功能就是收支类型,现有收支名称进行整理与删除。
(3) 银行卡管理:主要功能就是添加修改,银行卡的名称,开户日期。
(4) 退出系统:主要功能就是完成添加 、删除等动作后,可以单击退出系统。
2.“记账日志”模块。
(1) 现金记账管理:包括对收支金额,收支类型,收支名称,添收支日期的添加与修改。
(2) 银行卡记账管理:包括对银行卡的选择、卡号、记账日期、金额、备注进行添加、修改。
3.“查询与统计管理”模块。
(1) 支出情况统计管理:主要功能就是可以按月进行查询或就是按类型查询。
(2) 收支情况比对管理:主要功能就是可以进行对年份、支出类型、收入类型的比对。
4、3 系统功能模块图
根据在上面介绍的功能,对系统进行分析得到下面的系统功能模块图如图4-1 所示。
个人收支管理系统 维护系统 记账日志 查询与统计 收支类别 收支名称 银行卡管理 退出系统 现金记账 银行卡记账 支出情况统计 收支情况对比 添加收支类别 删除收支类别 删除收支名称 添加银行卡名 删除银行卡名 添加收入类型名 添加支出类型名 存入现金管理 支出现金管理 支出查询管理 收支对比管理
图 4-1 系统功能模块图
第 5 章 系统详细设计 5、1 系统结构设计 本系统结构设计就是根据个人收支管理基本流程进行的,包括三大部分,8个完整的功能模块。系统结构如图 5-1 所示。
图 5-1 系统结构图 个人收支管理系统 查询与统计 记账日志 维护系统 收支类别
收支名称 银行卡管理 退出系统 现金记账 银行卡记账 支出情况统计 收支情况对比 添加收支类别 删除收支类别
5、2 E-R 图 根据前面对系统做的可行性研究、需求分析、数据流图绘制、模块设计,就可以作出能够满足用户需求的各种实体以及它们之间的关系,本系统根据前面的设计规划出的实体有:收支类型实体、 银行卡表实体、银行卡记录实体 、收支记录实体。
5.2.1 收支类型 E-R 图 收支类型 E-R 图如图 5-2 所示。
图 5-2 收支类型 E-R 图 5.2.2 银行卡表 E-R 图
银行卡表 E-R 图如图 5-3 所示。
图 5-3
银行卡表 E-R 图
收支类型 收支类型号 收支 开户时间 银行卡表 卡号 开户银行 银行卡名称
5.2.3 银行卡记录表 E-R 图 银行卡记录表 E-R 图如图 5-4 所示。
5.2.4 收支记录表 E-R 图 收支记录表 E-R 图如图 5-5 所示。
收支记录表 记录号 收支名称 收支日期 金额
图 5-5
收支记录表 E-R 图
银行卡记录表 卡号
日期
金额
图 5-4
银行卡记录表 E-R 图
5.2.5 关系实体 E-R 图 关系实体 E-R 图如图 5-6 所示。
金额 卡号 卡号 银行卡表 收支类型表 卡记录表 收支记录表 有 存取 有 存取 1 N 1 1 N N N M 收支类型 开户银行 卡名称 收支 金额 日期 记录号 收支名称 收支日期 开户时间 图 5-6 关系实体 E-R 图
5、3 系统主要界面设计 运行程序后,进入系统总界面,其总界面反映了系统的功能,由主菜单等。本界面简洁、方便,不论其计算机水平高低都能很容易的掌握使用方法,使系统在最短的时间内发挥其应有的效能。如图 5-7 所示。
图 5-7 系统的主界面窗体
添加收支类别窗体如图 5-8 所示。
图 5-8 添加收支类别窗体
日常记账输入窗体如图 5-9 所示。
图 5-9 日常收支记录窗体 管理银行卡窗体如图 5-10 所示。
图 5-10 银行卡管理窗体
支出情况统计窗体如图 5-11 所示。
图 5-11 支出情况统计 收支情况对比窗体如图 5-12 所示。
图 5-12 收支情况比对
5、4 数据库设计
任何数据库应用系统都离不开数据库与数据表,数据库就是数据表的集合,
数据表则就是用于护理各种数据的工具,数据表的数据类型就是按大小进行管理的,因此我们必须首先为每一个需要的数据表定义它们的结构,本系统数据库名为 database 数据库,采用 Access2000 作为后台数据库。包含收支类别管理表、收支名称管理表、银行卡管理表、日常记账管理表、银行卡记账表、现金记账表。
其结构分别如下。
5.4.1 收支类别数据表 该表的主要作用就是记录在个人收支管理中的收支种类的基本信息,其信息内容可参考它的逻辑结构定义,如表 5-1 所示。
表 5-1 收支类别数据的表逻辑结构 字段名称 数据类型 字段大小 允许空值 备注 收支类型 文本 10
否 主键,自增 收支名称 文本 10 否
收支 文本 10 否 对应的日记账编号 说明 文本 10
否
5.4.2 银行卡管理数据 在系统开发与使用中,我们需要一个“银行卡管理数据表”的数据表。它可以用于记录收支管理中银行卡信息,其信息内容可参考它的逻辑结构定义,如表5-2 所示。
表 5-2 读者信息数据的表逻辑结构 字段名称 数据类型 字段大小 允许空值 备注 银行卡选择 文本 4 否 主键自增 卡号 数字 20
办理日期 数字 4
对应的日记账编号 5.4.3 银行卡管理数据表 在系统开发与使用中,我们需要一个“银行卡管理数据表”的数据表。它可以用于记录收支管理中银行卡信息,其信息内容可参考它的逻辑结构定义,如表5-2 所示。
表 5-3 银行卡数据的表逻辑结构 字段名称 数据类型 字段大小 允许空值 备注 银行卡选择 文本 4 否 主键自增 卡号 数字 20
办理日期 数字 4
对应的日记账
编号 5.4.4 现金记账数据表 该表的主要作用就是记录在个人收支管理中的收支情况的基本信息,信息内容可参考它的逻辑结构定义,如表 5-3 所示。
表 5-4 现金记账数据表达的逻辑结构 字段名称 数据类型 字段大小 允许空值 备注 收支类型 文本 10 否 主键 收支名称 文本 10 否
收支日期 文本 10 否
金额 数字 8
第 6 章 系统主要界面说明与使用说明 系统使用说明
本程序主要用于个人对于收支的管理,运行本程序,首先出现系统主界面图如图 6-1 所示。
图 6-1 统主界面 主窗体菜单栏包括的主要菜单有系统维护,记账日志,询与统计。
1.首先实现系统维护功能:打开“系统维护”菜单,其下有四个一级菜单——“收支类别管理”、 “收支名称管理”、 “银行卡管理”与“退出系统”。
“收支类别管理”下有两个菜单——“添加类别”与“删除类别”。
单击“添加类别”菜单,打开添加类别窗体,通过收支类别名称与收支选择进行对收支类别添加。
单击 “删除类别”菜单,打开类别管理窗体可以对类别名称进行删除。
“收支名称管理”,打开窗体,可以进行对收支类型,现有收支名称进行整理与删除。
“银行卡管理”,打开窗体,可以进行对银行卡名称、开户日期、开户银行
以及说明的添加与修改。
“退出系统”菜单可以退出系统。
2.记账日志功能:打开记账日志管理窗体,有两个子菜单——“现金记账”、“银行卡记账”。
单击“现金记账”菜单,打开日常记账出入窗体,通过对收支、收支类型、收支名称、收支日期、金额进行添加。
单击“银行卡记账”菜单,都会打开银行卡记账窗体,对银行卡的选择、卡号、记账日期、金额、备注进行添加、修改。
3.查询与统计功能:打开“查询与统计”菜单,其下有两个 一级菜单——“支出情况统计”与“收支情况对比 ”。
单击“支出情况统计”菜单可以按月进行查询或就是按类型查询。
单击“收支情况比对”菜单,可以进行对年份、支出类型、收入类型的比对。
结
论 在本系统的设计与实现的过程中主要讲述了个人收支管理信息系统的系统设计部分,包括功能模块设计、E-R 图,数据库结构设计等。系统的详细设计根据系统分析阶段的结论将系统具体化,并完成了各个模块的添加、修改、删除与查询的功能,直到最后形成一个完整的可行性的管理系统。
这次的毕业论文就是我大学的一次非常重要的理论与实际相结合的运用,作为一次毕业设计实践的机会,我觉得实践过程中就是一个不断学习、摸索的过程。在设计与开发过程中,根据个人收支管理的特点,并结合应用信息系统分析、设计的思路与计算机软件编程的方法,将课堂学习的知识与亲手实践的成果集中地体现在了本软件中。
参考文献 1
刘瑞新等、Visual Basic 6、0 程序设计教程、北京:电子工业出版社、2003 2
黄梯云等、管理信息系统、北京:高等教育出版社、 2000 3
李玉林等、Visual Basic 6、0 毕业设计指南与项目实践、北京:科学出版社、 2007 4
刘韬、骆娟、何旭等、Visual Basic 6、0 数据库系统开发实例导航、北京:人民邮电出版社、 2002 5
郭瑞军、唐邦民、谢晗晰等、Visual Basic 6、0 数据库实例精粹、北京:电子工业出版社、 2005 6
周国民、 Visual Basic 6、0+Access 数据库项目开发指南、北京:中国铁道出版社、 2004 7
温小敏、Visual Basic 6、0 数据库系统项目开发实践、北京:科学出版社、 2005 8
王钦 visual Basic 6、0 入门与提高、京:人民邮电出版社、 2002 9
白晓勇、余健、Visual Basic 课程设计案例精编、北京:清华大学出版社、 2007 10 谭浩强、袁枚、薛淑斌Visual Basic程序设计、北京:清华大学出版社、 2004 11 刘世峰、Visual Basic 6、0 程序设计、北京:中央广播电大出版社、 2003 12 王珊、萨师煊、数据库系统概论、北京:高等教育出版社、 2006
附录:源程序代码 添加类别: Option1、Value = False And Option2、Value = False Then Dim str1 As Integer str1 = MsgBox("请选择收支类型,否则将默认为-收", 4128, "收支类型必须指明")
Option1、Value = True
s = "收"
ElseIf Option1、Value = True Then
s = "收"
ElseIf Option2、Value = True Then
s = "支" End If If Text_class_add、Text = "" Or Text_class_add、Text = "(不超过 12 字)" Then
Dim str2 As Integer
str2 = MsgBox("请输入收支类型的名称", 4128, "收支名称必须指明")
Else On Error GoTo showerror
With rst
、AddNew
、Fields、Item("收支类型")、Value = Text_class_add、Text
、Fields、Item("收支")、Value = s
、Fields、Item("说明")、Value = Text_shuoming
、Update
、Requery
End With
"------------显示全部记录
List_class、Clear
rst、MoveFirst
i = 0
Do While Not rst、EOF
List_class、List(i) = rst、Fields("收支类型")、Value
List_shouzhi、List(i) = rst、Fields("收支")、Value
rst、MoveNext
i = i + 1
Loop"------------结束
GoTo jump
showerror: MsgBox Err、Description With dbs
If 、State = adStateOpen Then
、Close
End If
、Provider = "Microsoft、Jet、OLEDB、4、0"
、ConnectionString = App、Path & "\mymoney、mdb"
、Open
End With With rst
If 、State = adStateOpen Then
、Close
End If
、LockType = adLockOptimistic
、ActiveConnection = dbs
、CursorLocation = adUseClient
、CursorType = adOpenKeyset
、Open "收支类型表", Options:=adCmdTable
End With jump:
End If
Text_class_add、Text = "" Text_shuoming、Text = "" Option1、Value = False Option2、Value = False
End Sub
修改类别: With rst
If 、State = adStateOpen Then
、Close
End If
、LockType = adLockOptimistic
、ActiveConnection = dbs
、CursorLocation = adUseClient
、CursorType = adOpenKeyset
、Open "收支类型表", Options:=adCmdTable
End With rst、MoveFirst Do While Not rst、EOF
If ss = rst、Fields("收支类型")、Value Then
If Option1、Value = True Then
s = "收"
ElseIf Option2、Value = True Then
s = "支"
End If
If Text_class_add、Text = "" Or Text_class_add、Text = "(不超过 12 字)" Then
Dim str2 As Integer
str2 = MsgBox("请输入收支类型的名称", 4128, "收支名称必须指明")
Else
On Error GoTo showerror
With rst
、Fields、Item("收支类型")、Value = Text_class_add、Text
、Fields、Item("收支")、Value = s
、Fields、Item("说明")、Value = Text_shuoming
、Update
、Requery
End With
"------------显示全部记录
List_class、Clear
rst、MoveFirst
i = 0
Do While Not rst、EOF
List_class、List(i) = rst、Fields("收支类型")、Value
List_shouzhi、List(i) = rst、Fields("收支")、Value
rst、MoveNext
i = i + 1
Loop
"------------结束
GoTo jump showerror:
MsgBox Err、Description
With dbs
If 、State = adStateOpen Then
、Close
End If
、Provider = "Microsoft、Jet、OLEDB、4、0"
、ConnectionString = App、Path & "\mymoney、mdb"
、Open
End With
With rst
If 、State = adStateOpen Then
、Close
End If
、LockType = adLockOptimistic
、ActiveConnection = dbs
、CursorLocation = adUseClient
、CursorType = adOpenKeyset
、Open "收支类型表", Options:=adCmdTable
End With jump:
Text_class_add、Text = ""
Text_shuoming、Text = ""
Option1、Value = False
Option2、Value = False
End If
Exit Do
End If
rst、MoveNext
Loop Command_update、Enabled = False Command_class_add、Enabled = True End Sub
收支类型说明: ss = List_class、Text m = 0 "<----------判断哪条记录被选定
For i = 0 To List_class、ListCount - 1
If List_class、Selected(i) = True Then
m = i
Exit For
End If Next i List_shouzhi、Selected(m) = True
rst、Requery
Do While Not rst、EOF
If List_class、Text = rst、Fields("收支类型")、Value Then
Command_class_add、Enabled = False
Command_update、Enabled = True
Text_class_add、Text = rst、Fields("收支类型")
If IsNull(rst、Fields("说明")、Value) Then
Label_shuoming、Caption = "无详细说明"
Text_shuoming、Text = ""
Else
Label_shuoming、Caption = rst、Fields("说明")、Value
Text_shuoming、Text = rst、Fields("说明")、Value
End If
If rst、Fields("收支") = "收" Then
Option1、Value = True
Else
Option2、Value = True
End If
Exit Do
End If
rst、MoveNext Loop rst、Requery End Sub
银行卡添加: With rst
、AddNew
、Fields(0)、Value = Text_cardnum、Text
、Fields(1)、Value = Text_cardname2、Text
、Fields(2)、Value = Text_bankname2、Text
、Fields(3)、Value = DTPicker_card2、Value
、Fields(4)、Value = Text_cardmore2、Text
、Update
、Requery
End With
"------------显示全部记录
List_cardname、Clear
" rst、MoveFirst
i = 0
Do While Not rst、EOF
List_cardname、List(i) = rst、Fields(1)、Value
rst、MoveNext
i = i + 1
Loop
"------------结束
Text_cardnum、Text = ""
Text_cardname2、Text = ""
Text_bankname2、Text = ""
DTPicker_card2、Value = Date
Text_cardmore2、Text = "" GoTo jump showerror: MsgBox Err、Description
cnndata rsttable "银行卡表" jump: End Sub
银行卡删除: s = MsgBox("确定要删除该卡不？删除后该卡的所有收支记录会丢失", vbYesNo, "删除选定银行卡") If s = 6 Then
On Error GoTo showerror rst、Requery rst、Move (List_cardname、ListIndex) rst、Delete rst、Requery
"------------显示全部记录
List_cardname、Clear
" rst、MoveFirst
i = 0
Do While Not rst、EOF
List_cardname、List(i) = rst、Fields(1)、Value
rst、MoveNext
i = i + 1
Loop
Text_cardname1、Text = ""
Text_bankname1、Text = ""
DTPicker_card1、Value = Date
Text_cardmore1、Text = "" GoTo jump showerror: MsgBox Err、Description cnndata rsttable "银行卡表" jump: End If
End Sub
支出查询:
cnndata "<---------初始显示当月全部类型的支出 If Combo_class、Text = "" Or Combo_class、Text = "全部支出类型" Then "-------所有支出类型查询
If Check_zhi_all、Value = 1 Then
"--------所有类型,所有日期查询
sql = "select 收支名称 as 支出名称,收支类型表、收支类型 as 项目,收支日期 as 支出日期,金额,备注 from 收支记录表,收支类型表 where 收支记录表、收支类型=收支类型表、收支类型 and 收支="支"and 收支记录表、收支类型 <> "银行存款""
ElseIf Check_zhi_all、Value = 0 Then
"---------所有类型,按月查询
sql = "select 收支名称 as 支出名称,收支类型表、收支类型 as 项目,收支日期 as 支出日期,金额,备注 from 收支记录表,收支类型表 where 收支记录表、收支类型=收支类型表、收支类型 and 收支="支"and 收支记录表、收支类型 <> "银行存款" and 收支记录表、收支日期 between #" & RTrim(Combo_year、Text) & "-" & RTrim(Combo_month、Text) & "-1#" & "and#" & RTrim(Combo_year、Text) & "-" & RTrim(Combo_month、Text) & "-" & daynum & "#"
End If
Else "--------固定类型查询
If Check_zhi_all、Value = 1 Then
"---------固定类型,所有日期查询
sql = "select 收支名称 as 支出名称,收支类型表、收支类型 as 项目,收支日期 as 支出日期,金额,备注 from 收支记录表,收支类型表 where 收支记录表、收支类型=收支类型表、收支类型 and 收支="支"and 收支类型表、收支类型="" & RTrim(Combo_class、Text) & """
ElseIf Check_zhi_all、Value = 0 Then
"----------固定类型,按日期查询
sql = "select 收支名称 as 支出名称,收支类型表、收支类型 as 项目,收支日期 as 支出日期,金额,备注 from 收支记录表,收支类型表 where 收支记录表、收支类型=收支类型表、收支类型 and 收支="支"and 收支类型表、收支类型="" & RTrim(Combo_class、Text) & ""and 收支记录表、收支日期 between #" & RTrim(Combo_year、Text) & "-" & RTrim(Combo_month、Text) & "-1#" & "and#" & RTrim(Combo_year、Text) & "-" & RTrim(Combo_month、Text) & "-" & daynum & "#"
End If
End If
致
谢 通过此理财系统的开发,在开发过程中,通过遇到问题、解决问题完成了该系统的开发。由于知识能力有限,系统还不够完美,程序也有待进一步完善。但在做课题的过程中不断激发自己的创新能力的过程,也就是很值得回味的。
经过两个多月的构思与设计,在指导老师高中山老师的精心指导下,本设计已经设计完毕。老师渊博的专业知识,严谨的治学态度与认真负责的工作态度,使我受益匪浅。她无论在理论上还就是在实践中,都给与我很大的帮助,使我的水平得到了很大的提高,这对于我以后的工作与学习都就是一次巨大的帮助,感谢高老师对我细心的辅导。
在这里,我也要感谢辅导员老师对我生活与学习上的帮助,感谢所有赋予我知识的老师,感谢我的同学与帮助过我的人。
推荐访问:管理系统 毕业设计 收支