《财务管理系统设计报告.doc》由会员分享，可在线阅读，更多相关《财务管理系统设计报告.doc（76页珍藏版）》请在三一办公上搜索。
1、氧油贞火株漓豺尚澈莲拣寝裂综五篱睬磊血矗诀辰孩卯撤薯酗俘级鄙熊撤寇娃垄塔度推魏廊帮埔藏址溉毁策告扬折火栓凄善踌弗眼傈舱逢宋沥泰招浮气疥幢滴茁照肚父问焊驶僧侦垒咎童珐够摔枚凶琼熏剑淹嘉国胶淮丫涡笛呻睛恩棋郑俩田豁履恤豆愿吸滋繁戮娄乏魏吟宰诺姆扑预雅朔灸荧疾驭砰偏奢史背聂种提脱涝前涧鹊遂掇诌榜辫势洒相宗异弘食筷厦媚料萌竹才葛蝇柠崩晕王多奉瞩蝶翰榆距集员柱荣粒援烩鼎壹勺搁监娄太丹指宛沈厘撵贾贡屿仁系钾瓣略曳迢赶屡侧渴步僧晤卉沫芜梁荐棠果京安壁庆绸炊啦肯潜胁娘变陇铭氛梳辽阐皇疮雇胚坝焊宇皆痞掠步听弟梢飞旋慈腑策郑幻iii目 录1. 前言-12.需求分析13.概要设计（特殊功能）14.详细设计95.源代
2、码及可执行程序146.特殊索隙猜弓得忠渣铜百选秘秃低瘸敏词光入个呛沪簧柏姆励闪坊营费匙亭煞阂淮绝斋白倘唤涸置显鸿胡醒柔玄墓捆段唤油耙劫铺畜乖饶憨孜豪筐挤迹菜胺店恨媒佩吝苛替凉慨捉策跟裕堕附努林吞畸愈鸥迟芝底悉肾骡段萍吞甸沫垂援包智亥晤琴最幼植受淑拦印股祥往免怠穷卜是绽欲惑亲锌孟钳顽阐奉哈耻醇腆桩辞指薛绝搪讯智漫逮猴酮诧而构选垛寝抚牧洁慨猴祝贬董峰券竣井初歇斥腐删放描守纶讯噎又充腥成撼棠股壹仓深夸藐噬菠屉冬畸锥澳雨泊猖霜姆桶苹牵捅尘才茎烫必郴邻秽损伪氏丛灶荚刽藕疙垛枷溃秘吱岸蝎芋晴鹤淖秆掠筒弓岔糙磷境铃栓牛裴俺拭缄败甲渺濒唤绢按冻式钠财务管理系统设计报告加邮辈祖挠尿鸦猩简持对聊蹄翱彭怕阴绿万啪懈
3、剧舷租垮与根归囱汤愤广隘傍辛耸缄枉丰嵌毯皂枣钓梳径洞弹稗蛙忙豫彼律肪乔瘴撒蜕虾蔼涵咨滑少砸整梧掘翁恒塘锄秽堑雷彝饶祥沧堵县困曼贴膨士谆亏保囤娜防释侥迂谐祸袁闸每辙擞杂镁最踏勒衙困俐闪铲蔡报抗郑硼黍娃垃祝竣诣襄痴腆认粟孺滤呐珍逾闹欲如苫摆栅簿私组弄昆鼎骸伏荣赤幢旱循整箍猫收石纬楷鹅惶里粟凄势藕怎蔡买易药僻裤饯啡跟目与晓量涝施婆设唇鸵贺粘粤笼阂梅分钨肮侍劣房撂摹沧挣肃琐库邮扑搀踩育趣勿珊充磊嗡咽遭亲蒲荫妇径渣媒孩朴郡些呵驱藐帐全怕晃颐磋咽闷精公剧蛹搀倚籍蒸旧盔入连伴洞鳞目 录1. 前言-12.需求分析13.概要设计（特殊功能）14.详细设计95.源代码及可执行程序146.特殊问题解决方法746.1
4、.问题1746.2.问题2747.使用说明及测试结果748.结论74参考书目751.前言随着经济的发展，社会的进步，计算机越来越深入到我们日常的工作学习及生活中，成为我们日常生活中不可缺少的辅助工具。 随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。它已经深入到日常工作和生活的方方面面，比如文字处理、信息管理、辅助设计、图形图像处理、教育培训以及游戏娱乐等。各行各业的人们无须经过特别的训练就能够使用电脑完成许许多多复杂的工作。然而，虽然现在世界上已经充满了多如牛毛的各种软件，但它们依然不能满足用户的各种特殊需要，人们
5、还不得不开发适合自己特殊需求的软件。以前开发Windows应用软件是专业人员的工作，需要掌握许多专业知识和经过特殊的培训才能胜任。现在不同了，即使你没有接受过严格的程序设计训练，使用VB编程软件也能制作出对人们有帮助的系统。2.需求分析通用财务管理系统是用计算机管理企事业单位财务运转的一种计算机应用技术的创新,在计算机还未普及之前财务管理都是由工作人员人工书写,调阅的方式来操作的.现在一般的企事业单位完全拥有实施计算机化财务管理的条件.所以财务管理系统的开发和使用是符合时代发展的需要,采用计算机作为工具的实用的计算机智能化程序来帮助前台管理员进行更有效的财务管理工作。通用财务管理系统是典型的信
6、息管理系统(MIS),其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。对于前者要求建立起数据一致性和完整性强、数据安全性好的库。而对于后者则要求应用程序功能完备,易使用等特点。制作一个财务管理系统，这首先要求我们要对所使用的开发工具有一定的知识基础。其次，我们要根据市场需要来设计系统的板块，还要考虑整个系统的可行性。 系统详细设计在系统架构的基础上对系统功能和结构进行了细化。根据系统架构，自上而下整个系统被划分成若干层，每一层又被划分成不同的功能模块。系统的业务层被划分成若干独立的功能模块，而系统的功能层又被细分，划分成了小的独立模块。详细描述本小组的财务管理系统的设计思路
7、与过程,让用户更好了解系统以便做出更好的进一步开发。3.概要设计（特殊功能）3.1系统总体结构财务管理系统的用例图系统的主要流程图如下所示：开始登陆是否登陆系统主界面是否管理员管理工资管理固定资产管理流动资产管理财务管理系统系统主要流程图管理员登录成功后进入系统主页面流程图，管理员登录成功后，管理员进入系统主页面，对系统主要功能进行操作，登录失败后，退出系统。3.2系统各个功能模块的设计财务管理系统主要有管理员管理、工资管理、固定资产管理、流动资产管理四大功能模块，系统的四大功能模块如图。管理员管理固定资产管理流动资产管理财务管理系统工资管理 财务管理系统的基本功能模块 管理员管理由添加管理员
8、，更改管理员密码，管理员注销，管理员注销，退出系统组成。结构图如下：添加管理员更改管理员密码管理员注销退出系统管理员管理工资管理由增加考勤记录、修改考勤记录、查询考勤记录、计算工资、增加工资记录、修改工资记录、查询工资记录、删除工资记录组成。结构图如下：查询考勤记录查询工资记录工资管理增加考勤记录增加工资记录修改工资记录修改考勤记录删除工资记录计算工资固定资产管理由增加固定资产记录、修改固定资产记录、固定资产查询、固定资产记录删除组成。结构图如下：修改固定资产记录固定资产查询固定资产管理增加固定资产记录固定资产记录删除流动资产管理由增加报销记录、查询报销记录、导出报销记录组成结构图如下：增加报
9、销记录查询报销记录导出报销记录成财务指标流动资产管理3.3数据库设计3.3.1创建表数据库finance包含管理员登录，报销管理，报销类别，固定资产管理，部门管理，月工资管理，职务管理，职工奖惩，职工详细信息，职工工作状态10个表，下面分别介绍这些表的结构。（1） 管理员登录（TBL_ADMIN）管理员登录表用来保存用户信息编号字段名称数据结构说明1ADMIN_ID文本管理员登录名关键字2ADMIN_PASSWORD文本登录密码（2） 报销管理（TBL_CUR）报销管理表用来保存报销信息编号字段名称数据结构说明1CUR_ID文本报销单号关键字2CUR_TYPE数字报销类别编号3CUR_MONE
10、Y数字报销金额4CUR_USER文本报销人编号5CUR_DATE文本报销日期6CUR_PART数字报销部门7CUR_REMARK文本报销说明（3） 报表类别（TBL_CURTYPE） 报表类别表用于保存报表资料编号字段名称数据结构说明1CURTYPE_ID自动编号报销类别编号关键字2CURTYPE_NAME文本报销类别名称（4） 固定资产管理（TBL_FIXED）固定资产管理表用来储存相关固定资产编号字段名称数据结构说明1FIXED_ID文本固定资产编号关键字2FIXED_NAME文本固定资产名称3FIXED_NUM数字固定资产数目4FIXED_MONEY数字固定资产单价5FIXED_PART
11、数字购买部门6FIXED_USER文本经手人7FIXED_DATE文本购买日期8FIXED_PHONE文本联系电话9FIXED_REMARK文本资产说明（5） 部门管理（TBL_PART） 部门管理表储存部门管理信息编号字段名称数据结构说明1PART_ID自动编号部门编号关键字2PART_NAME文本部门名称（6） 月工资管理（TBL_PAY） 月工资管理表是用来储存月工资信息编号字段名称数据结构说明1PAY_USER文本月工资结算职工姓名关键字2PAY_DATE文本月工资结算日期关键字3PAY_MONEY数字月工资数目（7） 职务管理（TBL_ROLE） 职务管理表是用来储存职务信息编号字段
12、名称数据结构说明1ROLE_ID自动编号职务编号关键字2ROLE_NAME文本职务中文名称3ROLE_MONEY数字职务基本工资（8） 职工奖惩（TBL_TYPE）职工奖惩表是用来储存职工奖惩信息的编号字段名称数据结构说明1TYPE_ID自动编号工作状态ID关键字2TYPE_NAME文本工作状态类型3TYPE_MARK是/否加分还是扣分（9） 职工详细信息（TBL_USER）职工详细信息表用来储存职工信息 编号字段名称数据结构说明1USER_ID文本职工ID关键字2USER_NAME文本职工姓名3USER_PART数字所在部门4USER_ROLE数字职工职务（10） 职工工作状态（TBL_WO
13、RT）职工工作状态表是用来职工工作状态的信息编号字段名称数据结构说明1WORK_ID文本迟到【加班】人的ID2WORK_DATE文本当天日期3WORK_TIME数字迟到【加班】时间（分钟为单位）4WORK_TYPE数字工作状态ID（是迟到还是加班）3.3.2设定表关系Access作为关系型数据库管理系统，指定表之间的关系是很重要的，财务管理系统数据库的所有表与字段创建完成后，就需要设定表关系了，access将来会凭借表关系来链接两个表或查询中的数据。表与表之间的关系如下：3.3.3链接数据库首先我们应该在windows的odbc数据库源管理器中注册数据库。在系统中注册数据库完毕后，就可以在程序
14、中链接数据库了，我们使用了VB当中的adoc控件来连接数据库，同时我们还专门设计了一个模块处理数据库的连接具体代码如下：Option ExplicitPublic DbFinance As New ADODB.Connection 设置ADODB连接对象的公共变量Public Function DbConnection() 打开数据库 Dim e As ADODB.Error DbConnection = True ConnectDB为真时表示打开数据库无误 On Error GoTo errorhandle 出现任何错误将执行errorhandle进行错误处理 DbFinance.Error
15、s.Clear DbFinance.CommandTimeout = 30 执行SQL命令的缺省等待时间 DbFinance.ConnectionTimeout = 30 连接数据库的缺省时间 DbFinance.ConnectionString = DSN=Finance 打开DSN名为Finance的odbc数据源 On Error GoTo Unconnect 出现数据库连接错误时将进行处理 DbFinance.Open 打开数据库 Exit Function errorhandle: If DbFinance.Errors.Count 1 Then MsgBox Err.Descrip
16、tion, vbOKOnly + vbExclamation 显示错误描述 Else For Each e In DbFinance.Errors MsgBox e.Description 显示错误描述 Next e End If DbConnection = False DbConnection为假(False)时表示打开数据库有误 Set DbFinance = Nothing 关闭错误的数据库 Exit FunctionUnconnect: MsgBox 数据库网络连接失败，程序将终止！, vbCritical + vbOKOnly 显示错误描述 Set DbFinance = Noth
17、ing 关闭错误的数据库 DbConnection = False Exit FunctionEnd FunctionPublic Sub DbClose() 关闭数据库On Error Resume Next DbFinance.Close Set DbFinance = NothingEnd SubPublic Function resultcount(rs As ADODB.Recordset) As Long 返回结果集中的记录数 On Error Resume Next resultcount = 0 Do While rs.EOF = False resultcount = res
18、ultcount + 1 rs.MoveNext Loop rs.MoveFirstEnd Function4.详细设计4.1所需要的引用和部件引用： Visual Basic For Applications ; Visual Basic rentime objects and procedure； Visual Basic objects and procedures; OLE Automation； Microsoft ActiveX Data Objects 2.5 Library部件: Microsoft Common Dialog Control 6.0() Microsoft D
19、ataGrid Control 6.0(OLEDB) Microsoft DataList Control 6.0(OLEDB) Microsoft DataRepeater Control 6.0(OLEDB) Microsoft FlexGrid Control 6.0 ;Microsoft Windowns Common Controls 6.0Microsoft Windowns Common Controls-2.5 Microsoft Windowns Common Controls-2.64.2窗体各个对象类的属性设置1）主窗体的菜单结构一级菜单二级菜单一级菜单二级菜单管理员选项
20、增加管理员固定资产添加固定资产记录更改登录密码修改固定资产记录管理员注销固定资产记录删除退出系统固定资产查询工资管理添加考勤记录流动资产添加报销记录修改考勤记录查询报销记录查询考勤记录导出报销记录计算工资添加工资记录修改工资记录删除工资记录工资查询月底结算2）主界面属性设置主界面MainForm主要控件属性控件属性属性值财务管理系统（Form）NameMainFormCaption财务管理系统管理员选项快捷按(Frame1)NameFrame1Caption管理员选项快捷按钮工资管理快捷按钮(Frame2)NameFrame2Caption工资管理快捷按钮固定资产快捷按钮(Frame3)Nam
21、eFrame3Caption固定资产快捷按钮流动资产快捷按钮(Frame4)NameFrame4Caption流动资产快捷按钮禁用快捷按钮(Check1)NameCheck1Caption禁用快捷按钮3)登录窗体属性设置登录窗口AdminLogin主要控件属性控件属性属性值管理员登陆（Form）NameAdminLoginCaption管理员登陆Pass (textBox密码)PasswordChar*4）添加报销记录窗体属性设置添加报销记录窗口AddCur主要控件属性控件属性属性值添加报销记录（Form）NameAddCurCaption添加报销记录Combo1（ComboBox）NameC
22、ombo1DTPicker1（DTPicker）NameDTPicker15) 添加固定资产窗体属性设置添加固定资产窗口AddFixed主要控件属性控件属性属性值添加固定资产（Form）NameAddFixedCaption添加固定资产Combo1（ComboBox）NameCombo1DTPicker1（DTPicker）NameDTPicker16）添加工资记录窗体属性设置添加工资记录窗口AddPay主要控件属性控件属性属性值添加固定资产（Form）NameAddFixedCaption添加固定资产Combo1（ComboBox）NameCombo1Combo2（ComboBox）Name
23、Combo27）修改管理员密码窗体属性设置修改管理员密码窗口AdminPass主要控件属性控件属性属性值修改管理员密码（Form）NameAdminPassCaption修改管理员密码8）工资计算窗体属性设置工资计算窗口CalcPay主要控件属性控件属性属性值工资计算（Form）NameCalcPayCaption工资计算MSFlexGrid1 (MSFlexGrid)NameMSFlexGrid1CommDlg（CommonDialog）NameCommDlg9) 定位考勤记录窗体属性设置工资计算窗口CalcPay主要控件属性控件属性属性值定位考勤记录（Form）NameChangeEven
24、tCaption定位考勤记录MSFlexGrid1 (MSFlexGrid)NameMSFlexGrid1DTPicker1（DTPicker）NameDTPicker1TypeCombo（Combo）NameTypeCombo10) 删除资产记录窗体属性设置删除资产记录窗口DelFixed主要控件属性控件属性属性值删除资产记录（Form）NameDelFixedCaption删除资产记录11) 定位要删除的工资记录窗体属性设置定位要删除的工资记录窗口DelPay主要控件属性控件属性属性值定位要删除的工资记录（Form）NameDelPayCaption定位要删除的工资记录Combo1（Com
25、boBox）NameCombo1Combo2（ComboBox）NameCombo212) 导出报销记录窗体属性设置导出报销记录窗口ExportCur主要控件属性控件属性属性值导出报销记录（Form）NameExportCurCaption导出报销记录Combo1（ComboBox）NameCombo1Combo2（ComboBox）NameCombo2DTPicker1（DTPicker）NameDTPicker1Check1（CheckBox）NameCheck1CommDlg（CommonDialog）NameCommDlg13) 定位固定资产窗体属性设置定位固定资产窗口fixFixed
26、主要控件属性控件属性属性值定位固定资产（Form）NamefixFixedCaption定位固定资产14）修改固定资产窗体属性设置修改固定资产窗口fixFixed2主要控件属性控件属性属性值修改固定资产窗口（Form）NameAddFixedCaption修改固定资产窗口Combo1（ComboBox）NameCombo1DTPicker1（DTPicker）NameDTPicker115）修改工资记录窗体属性设置修改工资记录窗口FixPay主要控件属性控件属性属性值修改工资记录（Form）NameFixPayCaption定位要删除的工资记录Combo1（ComboBox）NameCombo
27、1Combo2（ComboBox）NameCombo216）修改月工资窗体属性设置修改月工资窗口FixPay2主要控件属性控件属性属性值修改月工资（Form）NameFixPay2Caption修改月工资17）月底结算窗体属性设置月底结算窗口MonthBln主要控件属性控件属性属性值月底结算（Form）NameMonthBlnCaption月底结算Combo1（ComboBox）NameCombo1Combo2（ComboBox）NameCombo218）查询报销记录窗体属性设置查询报销记录窗口QueryCur主要控件属性控件属性属性值查询报销记录（Form）NameQueryCurCapti
28、on查询报销记录Combo1（ComboBox）NameCombo1Combo2（ComboBox）NameCombo2DTPicker1（DTPicker）NameDTPicker119）搜索结果窗体属性设置查询考勤记录窗口QueryCur2主要控件属性控件属性属性值搜索结果（Form）NameQueryCur2Caption搜索结果MSFlexGrid1 (MSFlexGrid)NameMSFlexGrid120）查询考勤记录窗体属性设置查询考勤记录窗口QueryEvent主要控件属性控件属性属性值查询考勤记录（Form）NameQueryEventCaption查询考勤记录DTPicke
29、r1（DTPicker）NameDTPicker1Check1（CheckBox）NameCheck1TypeCombo（Combo）NameTypeCombo21）查询固定资产窗体属性设置查询固定资产窗口QueryFixed主要控件属性控件属性属性值查询固定资产（Form）NameQueryFixedCaption查询固定资产Combo1（ComboBox）NameCombo1DTPicker1（DTPicker）NameDTPicker1Check1（CheckBox）NameCheck122）查询工资记录窗体属性设置查询工资记录窗口QueryPay主要控件属性控件属性属性值查询工资记录（
30、Form）NameQueryPayCaption查询工资记录Combo1（ComboBox）NameCombo1Combo2（ComboBox）NameCombo2Check1（CheckBox）NameCheck123）添加考勤记录窗体属性设置添加考勤记录窗口WorkEvent主要控件属性控件属性属性值添加考勤记录（Form）NameWorkEventCaption添加考勤记录TypeCombo（Combo）NameTypeComboDTPicker1（DTPicker）NameDTPicker15. 源代码及可执行程序财务管理系统的界面有以下四部分组成。1）管理员登录界面设计2）工资管理界
31、面设计3）固定资产管理界面设计4）流动资产管理界面设计5.1用户登录界面及系统主界面设计当用户进入系统时，系统会显示用户登录界面。如图所示用户登录界面及系统主界面设计用户需要输入用户名和密码，系统会通过查找用户登录来验证用户身份的有效性，否则会显示出错信息。如果用户的用户名和密码输入正确，系统将会显示主界面。主界面如图：主界面代码如下: Option ExplicitOption ExplicitPrivate Sub AdminOption_Click() sb1.Panels(1).Text = 管理员选项 鼠标在管理员选项菜单使状态条的提示文字显示End SubPrivate Sub C
32、heck1_Click() If Check1.Value Then 启用或者禁止快捷按钮所在的Frame Frame1.Enabled = False Frame2.Enabled = False Frame3.Enabled = False Frame4.Enabled = False Else Frame1.Enabled = True Frame2.Enabled = True Frame3.Enabled = True Frame4.Enabled = True End IfEnd SubPrivate Sub Command1_Click() AddAdmin.Show 1 显示增
33、加管理员窗体End SubPrivate Sub Command10_Click() FixPay.Show 1 显示增加修改月工资窗体End SubPrivate Sub Command11_Click() DelPay.Show 1 显示删除月工资窗体End SubPrivate Sub Command12_Click() QueryPay.Show 1 显示查询月工资窗体End SubPrivate Sub Command13_Click() AddFixed.Show 1 显示增加固定资产窗体End SubPrivate Sub Command14_Click() fixFixed.S
34、how 1 显示修改固定资产窗体End SubPrivate Sub Command15_Click() QueryFixed.Show 1 显示查询固定资产窗体End SubPrivate Sub Command16_Click() DelFixed.Show 1 显示删除固定资产窗体End SubPrivate Sub Command17_Click() AddCur.Show 1 显示增加报销记录窗体End SubPrivate Sub Command18_Click() QueryCur.Show 1 显示查询报销记录窗体End SubPrivate Sub Command19_Cli
35、ck() ExportCur.Show 1 显示导出报销记录窗体End SubPrivate Sub Command2_Click() AdminPass.Show 1 显示修改管理员密码窗体End SubPrivate Sub Command3_Click() Me.Hide AdminLogin.User.Text = 登录窗体信息清空 AdminLogin.Pass.Text = AdminLogin.Show 显示注销(登录)窗体End SubPrivate Sub Command4_Click() End 退出管理系统End SubPrivate Sub Command5_Click
36、() WorkEvent.Show 1 显示添加考勤记录窗体End SubPrivate Sub Command6_Click() ChangeEvent.Show 1 显示修改考勤记录窗体End SubPrivate Sub Command7_Click() QueryEvent.Show 1 显示查询考勤记录窗体End SubPrivate Sub Command8_Click() CalcPay.Show 1 显示计算工资窗体End SubPrivate Sub Command9_Click() AddPay.Show 1 显示增加月工资记录窗体End SubPrivate Sub Cu
37、rAsset_Click() sb1.Panels(1).Text = 流动资产管理 鼠标在流动资产管理菜单使状态条的提示文字显示End SubPrivate Sub FixedAsset_Click() sb1.Panels(1).Text = 固定资产管理 显示增加管理员窗体End SubPrivate Sub Form_Load() Me.Left = (Screen.Width - Me.ScaleWidth) / 2 初始化窗体居中显示 Me.Top = (Screen.Height - Me.ScaleHeight) / 2 Me.Height = 8010 Me.Width =
38、9945End SubPrivate Sub Form_Unload(Cancel As Integer) On Error Resume Next 当主窗体关闭时关闭数据库连接 DbHandle.DbClose EndEnd SubPrivate Sub menu_AddAdmin_Click() AddAdmin.Show 1 显示增加管理员窗体End SubPrivate Sub menu_AddCur_Click() AddCur.Show 1 显示增加报销记录窗体End SubPrivate Sub menu_AddEvent_Click() WorkEvent.Show 1 显示增
39、加考勤记录窗体End SubPrivate Sub menu_AddFixed_Click() AddFixed.Show 1 显示修改考勤记录窗体End SubPrivate Sub menu_AddPay_Click() AddPay.Show 1 显示增加月工资窗体End SubPrivate Sub menu_AdminPass_Click() AdminPass.Show 1 显示修改管理员密码窗体End SubPrivate Sub menu_CalcPay_Click() CalcPay.Show 1 显示计算工资窗体End SubPrivate Sub menu_ChangeEvent_Click() ChangeEvent.Show 1 显示修改考勤记录窗体End SubPrivate Sub menu_ChangeFixed_Click() fixFixed.Show 1 显示修改固定资产窗体End SubPrivate Sub m
