基于VB的财务管理系统docx.docx
- 文档编号:10358463
- 上传时间:2023-02-10
- 格式:DOCX
- 页数:32
- 大小:261.86KB
基于VB的财务管理系统docx.docx
《基于VB的财务管理系统docx.docx》由会员分享,可在线阅读,更多相关《基于VB的财务管理系统docx.docx(32页珍藏版)》请在冰豆网上搜索。
基于VB的财务管理系统docx
基于VB会计管理系统
前言
1.1工程介绍
作为每一个企业和团体,财务管理系统是其管理财务收入和支出的不可缺少的组成部分,无论是企业的财务计划,财务控制还是财务监督和财务运用,每一个涉及到财务的方方面面,财务管理系统都起着至关重要的作用。
更好的运用财务系统和发挥财务管理的作用是一个企业成败的关键。
而作为财务管理工作的核心就是最简单的资金流通,如果想要在资金的流通与使用过程中更好的应用并且合理的调配是离不开一个好的财务管理系统的。
作为企业。
在生产经营活动无外乎供、产、销三个环节,这个过程始终贯穿着资金运动,只是在各个环节上资金的表现形态不同罢了。
在供应阶段资金由货币形态转变为材料形态,生产阶段由材料形态变为产品形态,在销售阶段由产品形态又回到货币形态。
从这里可以看出,财务管理贯穿于企业的各项工作之中,财务工作与其它管理工作是密不可分的。
从企业目前的实际工作来看,普遍存在两个误区:
一种认为财务管理就是管钱,只要管住钱就可万事大吉,重资金,轻核算。
上面谈到,资金在生产经营过程中分别有着不同的表现形式,“钱”只是这个过程的起点和终点,大量的管理工作都蕴含在过程之中。
因此,只有加强内部核算,才能真正做到节支降耗,否则,“钱”是管不住的。
另一种认为财务管理就是管财务部门,把财务部门与其他管理部门割裂开来,财务管理的触角不能延伸到各项管理工作之中。
财务管理就成为无本之木,其作用得不到发挥,形成经营和生产“两张皮”。
因此,开发这样一套管理软件成为很有必要的事情,对于我们即将计算机专业毕业的学员来说,也是一次将计算机应用于现实管理的一次很有意义的实践活动。
1.2开发的意义
今天,作为任何产业的附庸与必须,计算机已经成为我们学习和工作的得力助手,在每一个企业和团体使用计算机是节省时间和提高效率的最佳途径,而为了更好的管理公司的财务信息和,使用方便快捷的财务管理系统也就成为了帮助我们在财务管理方面必备的工作了。
作为一个时代发展的必然需求,财务管理已经成为了一种模式,而如何将这种模式具体化并且实现,就是本次毕业设计的思路与要求,正宇公司财务管理系统的设计与实现将是本次设计的主题。
二开发环境及技术实现
2.1开发环境
软件环境
操作系统MicrosoftWindowsXP简体中文专业版+SP3
软件系统:
Visualbasic6.0中文版、Access数据库。
2.2VisualBasic6.0简介
VisualBasic6.0中文版是一种应用程序开发工具,它的功能就是用来编程——Windows下的应用程序。
”Visual”一词在计算机程序设计领域中意为:
”可视化的”,Microsoft公司的其冠以Visual的产品都含有这个意思。
VB就是可视化程序设计语言。
可视化程序设计指的是一种开发图形用户界面的方法,使用这种方法,程序员不须编写大量代码去描述界面元素的外观和位置,只要把预先建立的界面元素用鼠标拖放到屏幕上适当的位置即可。
在众多的开发工具中,我们为什么要选择VisualBasic6.0呢?
因为VB具有众多其它开发工具所没有的优点!
具体介绍如下:
1)VisualBasic提供可视化的编程工具
用传统的高级语言编程时,程序的各种功能、用户界面和显示的结果全要由程序语句来实现,这就增加了编程难度。
而用VisualBasic开发应用程序,包括两部分工作:
一是设计用户界面,二是编写程序代码。
VisualBasic向程序设计人员提供图形对象(窗体、控件、菜单等)来进行应用程序的界面设计,例如程序人员可以根据用户的需要轻而易举地在屏幕上画出下图的用户界面。
VisualBASIC提供的“工具箱”内存放若干个“控件”,程序设计者可以自由地从工具箱中取出所需控件,放到窗体中的指定位置,而不必为此编写程序。
也就是说,屏幕上的用户界面是用VisualBasic提供的可视化设计工具直接“画”出来的,而不是用程序“写出来的”。
2)程序采用“事件驱动“方式
在设计好用户界面后,第二件事是编写程序。
VisualBasic改变了程序的机制,它没有传统意义上的主程序,而由“事件”来驱动子程序的运行。
一般来说,每个子程序要实现的功能是单一的,子程序的规模一般不会太大,也就是说,把原来一个统一控制的、包罗万象的大程序分解为许多个独立的、小规模的子程序,分别由各种“事件”来驱动执行,于是编程难度大大降低了。
3)VisualBasic融入了最新的计算机技术
VisualBASIC的设计者在VisualBasic中融入了最新的计算机技术,使得用VisualBasic编程能充分利用了这些最新的技术,例如在多媒体方面的应用、在Internet方面的应用等。
总之,VisualBasic是面向对象的、结构化的计算机语言。
VisualBasic的界面由一些对象组成,每个对象有若干个属性、方法和事件,程序人员的任务是设计这些对象的事件处理过程。
VisualBasic是一种很容易学习并很快就可以熟练掌握的功能强大的编程语言。
第三章需求分析
3.1用户需求分析
3.1.1系统需求
随着互联网的爆炸性发展,人们越来越习惯于利用网络来实现所需的服务,网络已深深影响到人们生活的各个方面。
另外,传统的财务管理模式已经无法满足一部分现代人的需要,而财务管理系统,除去在我们计算与管理过程中出现的误差与错失,并且能够满足各类公司和团体的常规与特殊需求,而且其方便快捷,实现技术又比较成熟,因此受到当代人的喜爱。
该系统主要分为两部分:
资金输入部分和资金输出部分,其中资金输入部分主要包括公司创造的价值与在投资过程中所获得的利润,而资金输出部分则重点体现在员工的工资以及公司投资和在日常工作中所涉及到的需求。
这两部分通归为结账以及报表两类,除此之外,本系统还可对用户的账号和队系统的管理权限进行管理。
管理员需要给财务处的人员分配用户名和密码,及设定使用者的级别。
同时,还需要给财务资源进行分级,以确定哪些级别的用户可以浏览。
当然除了这些,我们对于系统中应有的查询功能也进行了构建,能够在系统中合理并有效的查询出所需的账目及财务咨询将会是提高工作效率的一个重要组成部分。
3.1.2功能需求
财务管理系统主要是为,管理人员可以通过该系统处理关于公司的财政情况,对于本系统,我们需要实现以下一些基本功能:
1.系统登录模块的实现
2.主窗体模块的实现
3.修改密码模块的实现
4.增加工资记录模块的实现
5.导出报销记录的实现
6.添加固定资产的实现
3.2可行性分析
3.2.1经济方面可行性分析
制作这样一款软件所能获得的好处是显而易见的,而且在成本上的投入上和所获得的利润相比已经基本算不上什么了。
首先,在投入上,我们只需要准备一台电脑和一个工作人员,也就是我,然后付给我相对应的报酬,从而获得系统本身,当然投入并不只是初期的第一步,在后期系统的维护与运行中,也需要进行一小部分的投入。
那么我们在来说说收益,如果在没有财务管理系统的情况下,公司需要大量的人力以及资源来满足公司财务方面的管理以及保障,同时我们不能保证在管理的过程中出现这样那样的问题,当然并不是指拥有了财务管理系统就没有了这方面的问题,但是由于财务管理系统是一个非常容易就能读懂并且使用的软件,在公司里财务方面,对于总经理和总裁而言,就不会像管理财务报告那么复杂和繁琐了。
同时,在使用财务系统的时候,可以简单并且直接的将财务信息进行汇总和处理,方便快捷。
从长远角度来看,随着科技化的日益普及和应用,计算机在我们公司的使用已经成为了必然,而如何合理的利用计算机,并且通过计算机在很多方面实现价值和利润就成为了关键中的关键,财务管理系统抛却古老的‘人’的管理模式,改为机器的控制模式,可以更加切合社会的发展需求,并且可以大大提高公司员工的效率。
拥有这样一个方便且简单的财务系统,并且不需要付出太多的代价,绝对是一个非常好的方案。
3.2.2技术方面可行性分析
1.VisualBasic6.0是一个易学易用的集成开发环境:
VisualBasic6.0为用户设计界面、编写代码、调试程序、编译程序、制作应用程序安装盘等提供了友好的集成开发环境。
前文我已经介绍了VB6.0的特点,通过这样一个简单,高效且易用的软件,可以成功且迅速的编写出程序。
2.Access数据库的方便与实用,与其友好的界面以及方便操作的平台都是我选择它做数据库的主要原因,当然其与WIN系列系统的兼容于可用性也是我选择它的重要依据。
3.VisualBasic6.0和Access的兼容性是不容置疑的,虽然是第一次将两种软件进行实际的结合使用,但是在技术上并没有太多的问题,所以使用这两个软件进行程序的编写以及数据库的应用都没有问题。
分析
依据国家《计算机软件产品开发文件编制指南》和《现代软件工程》的理论与原则编制标准的软件技术文档,本系统完全符合其相关规定。
第四章财务管理系统的概要设计
4.1系统结构流程图
财务管理系统的系统结构大致可分为两个组成部分,一个就是系统的用户管理部分,另外一个就是财务管理系统的主要构成部分。
本系统的整体结构如图4.1:
图4-1系统结构图
作为财务管理系统中的用户管理子系统,因为并不是其中关键的结构,所需要的功能并不是很多,大概分为用户登陆和密码修改两方面。
具体结构如图4.2:
图4-2用户管理子系统图
作为系统的核心部分,财务管理子系统所需要的功能就相对过多,主要分为凭证管理、账簿查询以及结账和报表等方面,具体结构如图4.3:
图4.3财务管理子系统
4.1.2系统流程图
图4.4是本系统的整体流程图:
图4-4系统流程图
4.1.3E-R图
本系统主要有以下的实体。
1.科目
图4-5科目E-R图
2.账簿
图4-6账簿E-R图
3.凭证及凭证历史
图4-7凭证E-R图
图4-8凭证历史E-R图
4.分录和分录历史
图4-9分录E-R图
图4-10分录历史E-R图
5.科目余额表
图4-11科目E-R图
6.本期明细账簿
图4-12明细账簿E-R图
7.本期汇总账簿
图4-13汇总账簿E-R图
8.资产负债
图4-14资产负债E-R图
实体联系图
图4-15实体联系图
4.2数据库设计
“科目表”是系统的关键表,其他各表均与“科目表”通过“科目代码”字段进行多对一的关联。
系统共需要11张表,用途如下表
数据表名称
数据表用途
科目表
保存企业财务的科目设置信息
账簿初始化表
正式使用系统前初始化科目的期初余额
凭证表
输入会计凭证,记录表的主表
分录表
输入会计分录,记录表的从表
科目余额表
保存各个会计期间的科目借、贷、余额情况
凭证表历史
保存过账后的凭证历史
分录表历史
保存过账后的分录历史
本期明细帐簿
保存当前会计期间的明细帐簿数据
本期汇总帐簿
保存当前会计期间的明细帐簿数据,期末结账后期末变成新会计期间的期初
资产负债表
统计用表,用于计算资产负债表
系统参数表
系统运行所需的参数信息
4.3创建数据库
打开ACCESS,名称为caiwubook。
然后创建数据库对象,完成数据库的设计。
图4-16数据库截图
创建“科目表”数据表
CREATETABLE[dbo].[科目表](
[科目代码][char](20)NOTNULL,
[科目名称][char](20)NULL,
[科目类别][char](20)NULL,
[是否存货科目][char](10)NULL,
[余额方向][char](4)NULL
[数量单位][char](10)NULL
)ON[PRIMARY]
GO
创建“帐簿初始化表”数据表
CREATETABLE[dbo].[帐簿初始化表](
[科目代码][char](20)NOTNULL,
[科目名称][char](20)NULL,
[累计借方][money]NULL,
[累计贷方][money]NULL,
[期初余额][money]NULL,
[余额方向][char](4)NULL
)ON[PRIMARY]
GO
创建“凭证表”和“凭证表历史”数据表
CREATETABLE[dbo].[凭证表](
[凭证编号][char](10)NOTNULL,
[凭证字号][char]
(2)NULL,
[附单据][int]NULL,
[制单][char](20)NULL,
[借方合计][money]NULL,
[贷方合计][money]NULL,
[凭证状态][char](10)NULL
)ON[PRIMARY]
GO
CREATETABLE[dbo].[凭证表历史](
[凭证编号][char](10)NOTNULL,
[凭证字号][char]
(2)NULL,
[附单据][int]NULL,
[制单][char](20)NULL,
[借方合计][money]NULL,
[贷方合计][money]NULL,
[凭证状态][char](10)NULL
)ON[PRIMARY]
GO
创建“分录表”和“分录表历史”数据表
CREATETABLE[dbo].[分录表](
[编号][int]IDENTITY(1,1)NOTNULL,
[凭证编号][char](10)NOTNULL,
[科目代码][char](20)NULL,
[借方][money]NULL,
[贷方][money]NULL,
[单价][money]NULL,
[结算方式][char](10)NULL,
)ON[PRIMARY]
GO
CREATETABLE[dbo].[分录表历史](
[编号][int]NOTNULL,
[凭证编号][char](10)NOTNULL,
[科目代码][char](20)NULL,
[借方][money]NULL,
[贷方][money]NULL,
[单价][money]NULL,
[结算方式][char](10)NULL,
)ON[PRIMARY]
GO
创建“科目余额表”数据表
CREATETABLE[dbo].[科目余额表](
[科目代码][char](20)NULL,
[期初借方余额][money]NULL,
[期初贷方余额][money]NULL,
[本期借方发生额][money]NULL,
[本期贷方发生额][money]NULL,ben
[本期借方余额][money]NULL,
[本期贷方余额][money]NULL,
[最后结算分录][int]NULL,
[余额方向][char](4)NULL,
)ON[PRIMARY]
GO
创建“本期明细帐簿”数据表
CREATETABLE[dbo].[本期明细帐簿](
[内部编号][int]IDENTITY(1,1)NOTNULL,
[分录编号][int]NULL,
[凭证字号][char](4)NULL,
[凭证编号][char](10)NULL,
[科目代码][char](20)NULL,
[借方][money]NULL,
[贷方][money]NULL,
[余额方向][char](4)NULL,
[单价][money]NULL,
[结算方式][char](10)NULL,
)ON[PRIMARY]
GO
创建“本期汇总帐簿”数据表
CREATETABLE[dbo].[本期汇总帐簿](
[科目代码][char](20)NOTNULL,
[会计期间][int]NULL,
[期初余额][money]NULL,
[本期借方合计][money]NULL,
[本期贷方合计][money]NULL,
[本年借方累计][money]NULL,
[本年贷方累计][money]NULL,
[余额][money]NULL,
[余额方向][char](4)NULL
)ON[PRIMARY]GO
创建“资产负债表”数据表
CREATETABLE[dbo].[资产负债表](
流动资产总计][money]NULL,
[固定资产总计][money]NULL,
[其他资产][money]NULL,
[资产总计][money]NULL,
[应付帐款][money]NULL,
[其他负债][money]NULL,
[负债总计][money]NULL,
[实收资本总计][money]NULL,
[负债及所有者权益总计][money]NULL
)ON[PRIMARY]GO
创建“系统参数表”数据表
CREATETABLE[dbo].[系统参数表](
[编号][int]IDENTITY(1,1)NOTNULL,
[参数名称][char](20)NULL,
[取值][int]NULL
)ON[PRIMARY]GO
4.4界面设计
本模块主要就是一个简单的界面视图,如图4.17:
图4-17财务管理系统主界面
图4-18管理员登陆界面
员工管理的权限属于经理。
以“admin”帐号登陆系统。
选择“员工管理”,可以进行“创建员工帐号”、“修改员工密码”、“修改员工资料”等操作。
也可以点取“员工帐号管理”启动如图4-17所示界面进行员工帐号的集中统一管理。
图4-19财务管理系统子界面
本模块的功能是对基础财务的设定、使工作人员易于工作,做到数据不易丢失,根据各种基本情况设定界面。
图4-20填写凭证界面
本模块的功能主要用于查询财务相关账目及信息,分别有总分类查询和各账目的明细查询,如图4.21和图4.22
图4-21总分类账目查询设计界面
图4.22明细账查询界面
第五章财务管理系统详细设计及编码
5.1用户登录子系统的实现
5.1.1分配用户管理实现
图5-1管理员登陆界面
员工管理的权限属于经理。
以“admin”帐号登陆系统。
选择“员工管理”,可以进行“创建员工帐号”、“修改员工密码”、“修改员工资料”等操作。
也可以点取“员工帐号管理”启动如下图所示界面进行员工帐号的集中统一管理。
主要代码如下:
PrivateSubCommand1_Click()
DimUnameAsString
DimPdAsString
DimSqlAsString
Uname=Combo1.Text'存放用户名
Pd=Text2.Text'存放密码
Sql="select*frompwdwhere用户名='"'存放一SQL字符串
IfRs_log.State=1ThenRs_log.Close'判断记录集对象的状态
Rs_log.OpenSql&Uname&"'and密码='"&Pd&"'",Con,1,3'判断返回的记录条数是否为0如果不为0则表示在表中存在这样一个用户名和密码,否则则不存在
IfRs_log.RecordCount<>0Then
Qx=Rs_log.Fields("权限")
MDIForm1.Show
UnloadForm1
Else
MsgBox"用户名或者密码错误"
EndIf
EndSub
PrivateSubForm_Load()
'设置数据库连接对象,使其连接到数据库
Con.Open"driver=sqlserver;server=;database=student"
Con.CursorLocation=adUseClient
Rs_log.Open"pwd",Con,1,3
Fori=0ToRs_log.RecordCount-1
Combo1.AddItemRs_log.Fields("用户名")
Rs_log.MoveNext
Nexti
EndSub
图5-2员工管理界面
主要代码如下:
DimFlagAsBoolean'记录点击确定前所进行的是“添加”还是“修改”按钮
'保存添加或修改后的信息
PrivateSubsaveinfo()
Rs_info.Fields("学号")=Text1.Text
Rs_info.Fields("姓名")=Text2.Text
Rs_info.Fields("性别")=Combo1.Text
Rs_info.Fields("年龄")=Val(Text3.Text)
Rs_info.Update
EndSub
PrivateSubShowinfo()'把当前记录显示在文本框当中
IfIsNull(Rs_info.Fields("学号"))=TrueThen
Text1.Text=""
Else
Text1.Text=Rs_info.Fields("学号")
EndIf
IfIsNull(Rs_info("姓名"))=TrueThen
Text2.Text=""
Else
Text2.Text=Rs_info.Fields("姓名")
EndIf
IfIsNull(Rs_info.Fields("性别"))=TrueThen
Combo1.Text=""
Else
Combo1.Text=Rs_info.Fields("性别")
EndIf
IfIsNull(Rs_info.Fields("年龄"))=TrueThen
Text3.Text=""
Else
Text3.Text=Rs_info.Fields("年龄")
EndIf
EndSub
PrivateSubCommand1_Click()'移到第一条
Rs_info.MoveFirst
CallShowinfo
EndSub
PrivateSubCommand2_Click()'移到第上一条
Rs_info.MovePrevious
IfRs_info.BOF=TrueThen
Rs_info.MoveFirst
EndIf
CallShowinfo
EndSub
PrivateSubCommand3_Click()'移到下一条
Rs_info.MoveNext
IfRs_info.EOF=TrueThen
Rs_info.MoveLast
EndIf
CallShowinfo
EndSub
PrivateSubCommand4_Clic
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 基于 VB 财务管理 系统 docx
![提示](https://static.bdocx.com/images/bang_tan.gif)