《家庭理财系统.doc》由会员分享，可在线阅读，更多相关《家庭理财系统.doc（38页珍藏版）》请在三一办公上搜索。
1、摘要随着人们生活水平的提高，个人家庭财富的不断增长，人们迫切地需要进行合理的家庭理财。因而各式的家庭理财管理系统软件应时而生，它们帮助客户有效地解决了具体的家庭财务问题。为适应这种趋势，家庭财务管理软件向着国际互联网发展，向着多媒体方向发展，向着大型数据库、多平台发展。家庭理财系统可以有效地记录和管理家庭的收支情况,合理规划和支配家庭资金,是家庭理财的好帮手每一个家庭好比一个小型企业,都有着收入支出及净利,大部分家庭会用脑用手记录这些烦琐的数据,但也只是局限于记住收入的多少和支出的去向,不能在每月甚至于每年都有一个规划和对比,调节家庭财政状况然而,家庭理财系统可以有效地记录和管理家庭收支情况,
2、合理规划和支配家庭资金,是家家户户的好管家,完全替代了手记脑记的烦琐,利于调节家庭财政状况。本系统后台数据库使用access,前台开发工具使用visual basic为单机版数据库管理信息系统的开发组合,通过系统开发,了解信息管理系统的需求分析设计和实现的完整过程,从而实现本系统的特色和优势关键词:理财 家庭 信息管理 Microoft Offic Access目录摘要1目录2第一章 可行性分析41.1 系统设计目标41.2 系统数据间关系分析41.3 系统可行性分析5第二章 需求分析72.1 家庭理财系统的需求分析7第三章 系统设计93.1 概要设计93.2 系统详细设计103.3 数据库设
3、计11第四章 系统登录154.1 系统登录窗口164.2 主窗体17第五章 系统设置模块195.1 项目管理195.2 添加家庭成员215.3 修改密码235.4 数据备份/还原24第六章 日常管理模块256.1 日常收入管理256.2 日常支出管理276.3 银行存款管理286.4 借入款管理306.5 借出款管理31第七章 家庭理财查询功能347.1 查询功能实现34第八章 家庭理财报告368.1 每月明细368.2 收支统计37参考文献38致 谢39第一章 可行性分析1.1 系统设计目标现代社会家庭的理财观念进一步提高，理财手段变得更加丰富。随着生活水平和文化水平的提高，家庭购买电脑的能
4、力和应用电脑的能力开始提高。电脑及其应用的普及化，人们应用电脑进行家庭财务管理的观念增强，因此，开发一个通用性家庭理财软件已经成为社会需求。本系统是一个家庭通用型理财软件，系统目标是把适合家庭化管理的各种理财手段及家庭日常收支管理实现计算机化管理，使对家庭及家庭成员的收支活动更好地进行记录并加以统计分析成为可能，也使家庭理财变得方便，快捷，全面。1.2 系统数据间关系分析家庭财务的中心内容账务管理。人们几乎每一天都会经过许多次货币活动。其中包括了买入卖出实物，娱乐消费，起居饮食消费，还有发放工资，收缴保费等。如果能把各类不同的活动进行分类，建立不同的账户，分别对活动进行管理，那么无论现在还是将
5、来，你的账务就会清楚明白了。每天，我们对自己账务的操作有如下几类：添加新的数据项，比如今天我卖出了多少钱，生活中，我们就要对自己还有多少钱，今天所得的利润进行统计。现在我们把这些工作放到程序里去实现，就是这样的操作。归结后，账户的操作一般如下：新添，删除，增加，减少，查找，转账，统计。对重要的数据表记录还可以打印，和生成图表，报表。因而有了账户和相应的操作来管理的账务，依据需要一个统计分析的过程。我定义这样一个过程，分析数据，生成报表和图表。比如日常收支统计。建立日常收支图表，圆饼图的方式对日常收支状况加以统计，统计可按家庭成员，账户名称，收支类型，时间段分类统计也可综合统计。时间上可按年收支
6、，月收支，及两段时间段统计。报表则以报表的形式统计并可打印输出，用以备档。1.3 系统可行性分析1.3.1 经济和市场可行性分析现在，人们的生活水平和文化素质普遍提高，并且开始注重生活质量。随着市场经济的快速发展，观念的不断更新，个人理财意识普遍增强，特别是家庭理财意识得到很大发展，在意识上，一方面，人们对家庭和个人的各方面消费有想进行统计和分析的愿望，以便更好地做好家庭收支计划，和家庭财务管理。另一方面，各种理财手段不断丰富，如何把各种理财手段统一起来，并且能更加方便的操作成为要求。在物质基础上，计算机的应用开始普及，人们购置计算机和使用计算机的能力增强，人均计算机拥有量将快速提高。这些条件
7、说明，人们有购买一个家庭化财务软件的要求。在一个可接受的价格范围内，将购买这种软件，因此具有市场潜力。开发一个小型财务软件，用快速开发工具可在几个也内由几个人的开发小组完成。经过以上分析，开发一个通用型家庭理财软件具有在经济和市场可行性。1.3.2 技术可行性分析开发一个通用型家庭理财软件，项目规模可以在中等偏下。技术上主要涉及界面设计和数据库设计。再开发工具方面，可采用应用软件开发工具Visual Basic，它是一个高度集成化开发环境，具有丰富的组件，尤其在数据库开发方面具有很大优势。Visual Basic能够支持大多数数据库的连接，通过数据库连接组件可方便快捷的实现数据库连接，并进行高
8、效访问。家庭财务管理主要由日常记账管理和应用各种理财手段进行理财实现家庭资金的最大增值。记账按范围和使用方式可分为现金记账，定期存款记账，活期记账，外汇交易记账，实物资产记账，债权债务记账，保险记账。它们分别对应于现金账户，定期存款账户，活期账户，外汇交易账户，实物资产账户，债权债务账户，保险账户。现金账户可为不同家庭成员建立自己的账户，也可一人建立几个账户，以便把自己的现金按类归划，按用途有效的进行消费计划和统计。活期账户对应于各家庭成员的银行活期账户。外汇交易账户对应所开的外汇交易账户，外汇记账可以对近期的外汇活动详细信息进行查询，浏览，并对盈利情况统计。外汇账户和一资金转账账户相连，可以
9、进入日常收支统计数据中。实物账户主要为各家庭成员对家庭财产的增加和减少活动进行跟踪和记录，这样随时可以对家庭的财产拥有状况进行浏览，查询，方便家庭财产的添置和管理。第二章 需求分析2.1 家庭理财系统的需求分析 家庭财务管理主要由日常记账管理和应用各种理财手段进行理财实现家庭资金的最大增值。记账按范围和使用方式可分为现金记账，定期存款记账，活期记账，外汇交易记账，实物资产记账，债权债务记账。现金账户可为不同家庭成员建立自己的账户，也可一人建立几个账户，以便把自己的现金按类归划，按用途有效的进行消费计划和统计。活期账户对应于各家庭成员的银行活期账户。外汇交易账户对应所开的外汇交易账户，外汇记账可
10、以对近期的外汇活动详细信息进行查询，浏览，并对盈利情况统计。外汇账户和一资金转账账户相连，可以进入日常收支统计数据中。实物账户主要为各家庭成员对家庭财产的增加和减少活动进行跟踪和记录，这样随时可以对家庭的财产拥有状况进行浏览，查询，方便家庭财产的添置和管理。2.1.1 账本管理功能整个系统相当于一个账本，按用途和目的可在账本上建立不同的账户。便于各种账单的分类和管理。建立新账户功能：建立新账户可为不同的家庭成员建立不同类型的账户，账户按类型和用途分为现金账户，定期存款账户，活期账户。现金账户为不同成员或一成员的不同现金用途分别建立，记录日常收支，方便掌握现金的使用状况和流向。活期账户用于记录在
11、不同银行建立的活期账户。定期存款账户用于记录在不同银行建立的定期账户。账户浏览选择功能：对系统的所有账户进行浏览，或按不同类别浏览，查看账户余额，货币类型。可添加账户，删除账户，和查看账户详细信息。并在记账时选择进行记账的账户名称。数据备份功能：把系统以前的和当前的记账数据进行备份，可将其保存到其它的目录下。增大数据的安全性。安全性功能：用户可为系统设置密码，防止非法用户进入系统，破坏数据或查看信息。系统退出功能：关闭整个系统，保存数据，安全退出。2.1.2 记账管理功能收支记账：对现金账户，活期账户，信用卡账户的日常收支活动进行记录。对每天的消费及时入账。便于以后对家庭收支或个人收支的查询和
12、统计。它记录了收支活动的日期，收支类型，活动说明，收入金额，支出金额，余额，及家庭成员名称。定期存款记账：可在定期存款账户上，添加定期存单，删除存单，及对已改变的存单进行修改。它记录了存入日期，存单名称，存单类型，存入金额，到期金额，是否销户，币种，余额，说明信息。债权债务记账：对一特定债权债务账户的借入借出进行跟踪记账。它记录了每次借入借出活动的日期，借入金额，借出金额，及说明信息。债权债务活动将作为一项收入支出活动自动转入对应资金账户的收支记录上。收支分类：收支分类主要为各种收支活动按一种统一的标准进行分类，便于对各类收支进行分类统计整理。用户可以用收支分类表自行添加新的收支类型，删除不需
13、要的或模糊的类目，并可查询和浏览系统中所有类目信息。收支类型信息作为系统信息为各种记账活动提供选择。2.1.3 收支记账管理功能共享收支记账功能中的收支记账功能，分出这一块主要是为了更好地对日常收支进行记账管理，其中收支计划日历，用来对未来的收入支出提前制定计划。2.1.4 报表和图表功能日常收支统计：日常收支统计图表，以柱形图和圆饼图的方式统计对日常收支状况加以统计，统计可按家庭成员，账户名称，收支类型，时间段进行分类统计也可综合统计。时间上可选择按年收支，月收支，及两段时间段之间收支进行统计。报表则以报表的形式输出统计结果，并能打印输出，用以文件备档。家庭理财统计：总资产统计图对家庭现有各
14、类财产的折合人民币价值进行统计，以圆饼图描述。家庭实物一览表，可对家庭拥有各类实物财产迅速浏览，查看，便于充分利用家庭现有实物财产。能按类查看，并对种类和物品名称添加。这里的物品种类和实物名称作为系统信息，在实物资产记账是供用户选择。债权债务表，显示所有债权债务账户的借入借出状况，以便总体上浏览家庭的债权债务。第三章 系统设计3.1 概要设计 根据以上的分析和理财系统应该具备的功能。采用Visual Basic 6.0 作为开发工具，采用Microsoft Office Access 作为后台数据库，可满足一般家庭理财管理的需求。3.1.1 系统模块图（如图3.1）图3.13.1.2 系统E-
15、R图（如图3.2）图3.23.2 系统详细设计该系统是以VB连接Access数据库进行开发的家庭理财系统，力求与实际相结合具有家庭财政管理和统计等功能，旨在达到使家庭财产管理和人事数字化使之更加方便快捷以提高工作效率。3.2.1系统模块设计（1）系统设置模块主要包括：项目管理模块 包括：家庭支入支出的项目记录。添加家庭成员模块 包括：为系统添加新的家庭成员。修改密码模块 包括：用于操作员更改自己的系统口令。数据备份/恢复模块 包括：备份和恢复记录的数据。（2）日常模块管理主要包括：日常收入模块 包括：显示 添加 修改 删除。日常支出模块 包括：显示 添加 修改 删除。银行存款模块 包括：显示
16、添加 修改 删除借入款模块 包括：显示 添加 修改 删除借出款模块 包括：显示 添加 修改 删除3.3 数据库设计图3.33.3.1 数据库表结构（1）表名：urser1表（见表3.1）成员类型长度是否允许为空User文本型50否Pass文本型50否表3.1（2）表名：成员表（见表3.2）成员类型长度是否允许为空称呼文本50是姓名文本50是生日文本50是格言文本50是Key自动编号长整型否表3.2（3）表明：定期存款表（见表3.3）成员类型长度是否允许为空开户日期文本50是银行名称文本50是银行地址文本50是银行账号文本50是款额货币无是开户人文本50是得款人文本50是已取文本50是Key自动
17、编号长整型否表3.3（4）表名：活期存款表（见表3.4）成员类型长度是否允许为空账号文本50是存取文本50是数目货币无是日期文本50是姓名文本50是余额货币无是Key自动编号长整型否表3.4（5）表名：借出表（见表3.5）成员类型长度是否允许为空得款人文本50是金额货币无是出借人文本50是日期文本50是借款原因文本50是已还文本50是表3.5（6）表名：借入表（见表3.6）成员类型长度是否允许为空得款人文本50是金额货币无是出借人文本50是日期文本50是出借原因文本50是已还文本50是表3.6（7）表名：收入表（见表3.7）成员类型长度是否允许为空日期文本50是方式文本50是金额文本50是项目
18、文本50是来源文本50是人员文本50是备注备注无是Key自动编号长整型是表3.7（8）表名：收入项目表（见表3.8）成员类型长度是否允许为空Value文本50是表3.8（9）表名：支出表（见表3.9）成员类型长度是否允许为空日期文本50是方式文本50是金额文本50是项目文本50是去向文本50是人员文本50是备注备注无是Key自动编号长整型否表3.9（10）表名：支出项目表（见表3.10）成员类型长度是否允许为空Value文本50是表 3.10第四章 系统登录打开系统时会弹出欢迎窗口（如图4.1），点击一下将自动进入到家庭理财系统登录界面。系统登录界面如图4.2所示。图4.14.1 系统登录窗口
19、图4.24.1.1 系统登录功能实现部分代码：If Mydb.EOF Then MsgBox 你输入的用户名不存在，请重新输入！, vbOKOnly + 32, 注意 L = L + 1 txt_name.SetFocus If L = 5 Then MsgBox 你已经多次输入错误的用户名,请查证后重新登陆！, vbOKOnly + 48, 注意EndEnd IfExit Sub Else Set Mydb1 = ExeCutesql(select user,pass from user1 where user= & Str_name & , Str_text) Str_username =
20、 Trim(Mydb1.Fields(0) Str_userpassword = Trim(Mydb1.Fields(1) If Trim(Str_password) = Str_userpassword Thenfrm_main.ShowElse MsgBox 你输入的密码错误，请重新输入！, vbOKOnly + 32, 注意 I = I + 1 txt_password.SetFocusIf I = 3 Then MsgBox 你输入的密码三次都不正确，本系统将关闭！, vbOKOnly + 48, 注意EndEnd If4.2 主窗体在主窗体可以进行多种操作图4.34.2.1 主窗体设
21、计对主窗体实行菜单编辑，建立多级菜单。如图4.4所示。图4.44.2.2 常用功能显示设计实现在主窗体上方用toolbar添加常用功能快捷方式，可以提高系统的方便程度。如图4.5所示。图4.5第五章 系统设置模块系统设置主要用来完成理财系统内一些基本信息的编辑操作，其主要包括【项目管理】、【添加用户】、【修改密码】、【数据备份】等。5.1 项目管理用户单击【系统设置】/【项目管理】项即可进入【项目管理】模块。在项目管理模块中可实现家庭收入支出项目的添加、修改、删除操作。项目管理模块的运行结果如图5.1所示。图5.15.1.1 收入、支出项目的添加在框内写入想要添加的项目和金额，点击添加即可完成
22、添加过程。部分代码：A = MsgBox(是否添加前记录?, vbYesNo + 32, 添加记录)If A = True ThenExeCutesql insert into 收入项目 values( & Text1.Text & ), Str_textMydb1.MoveLastCall Db1MsgBox 收入项目添加成功！, vbOKOnly + 64, Text1.Text = End IfElseA = MsgBox(是否添加前记录?, vbYesNo + 32, 添加记录)If A = True ThenExeCutesql insert into 支出项目 values( &
23、Text1.Text & ), Str_textMydb2.MoveLastCall Db2MsgBox 支出项目添加成功！, vbOKOnly + 64, Text1.Text = End If5.1.2 收入、支出项目的删除实现在框内选择想要删除的项目，点击删除即可删除记录。部分代码：A = MsgBox(是否删除当前记录, vbYesNo + 32 + 256, 删除记录)If A = True Then Mydb3.Delete Mydb3.MoveNextIf Mydb3.EOF Then Mydb.MoveLast Mydb3.Requery Call Db1End If Else
24、 Set Mydb4 = ExeCutesql(select * from 支出项目 where value= & Text1.Text & , Str_text) A = MsgBox(是否删除当前记录, vbYesNo + 32 + 256, 删除记录)If A = True Then Mydb4.Delete Mydb4.MoveNextIf Mydb4.EOF Then Mydb2.MoveLast Mydb4.Requery Call Db2End IfEnd If5.2 添加家庭成员用户单击【系统设置】/【添加家庭成员】项即可进入【添加家庭成员】模块。在添加家庭成员模块中可实现家庭
25、成员的添加、修改、删除操作。项目管理模块的运行结果如图5.2所示。图5.25.2.1 家庭成员的添加填写家庭成员的基本信息后，点击添加就完成了添加过程。部分代码：Dim A, B B = 1 Set Count1 = ExeCutesql(select * from 成员 , Str_text) Count1.MoveLast B = Count1.Fields(4) + 1 A = MsgBox(是否添加前记录?, vbYesNo + 32, 修改记录)If A = vbYes Then ExeCutesql insert into 成员 values( & Text1.Text & , &
26、 Text2.Text & , & Format(DTPicker1.Value, yyyy-mm-dd) & , & Text3.Text & , & B & ) , Str_text Call Db Mydb.MoveLast MsgBox 数据已经保存！, vbOKOnly + 64, 成功End If5.2.2 家庭成员的删除在上框内选择想要删除的成员，点击删除就完成了删除过程。部分代码：Dim A A = MsgBox(是否删除当前记录, vbYesNo + 32 + 256, 删除记录)If A = vbYes ThenExeCutesql DELETE from 成员 where
27、 key= & txt_key.Text & , Str_textSet Mydb = ExeCutesql(select * from 成员, Str_text)Set MSHFlexGrid1.DataSource = MydbEnd If5.3 修改密码图5.3填写旧密码以及新密码后点击确定，修改成功会填出成功修改密码的对话框。（如图5.4所示）图5.45.4 数据备份/还原用户单击【系统设置】/【数据备份/还原】项即可进行数据库的备份以及还原工作。系统向自动将数据库储存为.mdb格式。在备份和还原完成后会弹出成功导入/还原成功的对话框。5.5 更换使用者用户单击后会自动返回登录界面。第
28、六章 日常管理模块家庭理财系统的日常管理主要用来对每日的收入、支出金额的详细记录还有活期和定期银行账户进行有效管理。6.1 日常收入管理在主界面中单击【日常管理】/【日常收入】项。日常收入管理主要实现对家庭收入记录的添加、删除功能。日常收入功能模块的运行结果如图6.1所示。图6.16.1.1添加收入信息部分代码：Dim A, B B = 1Set Count1 = ExeCutesql(select * from 收入, Str_text)Count1.MoveLastB = Count1.Fields(7) + 1A = MsgBox(是否添加前记录？, vbYesNo + 32, 添加记录
29、)If A = vbYes ThenIf txt_intake.Text = ThenMsgBox 请填写来源！, vbOKOnly + 32, 注意txt_intake.SetFocusElseExeCutesql INSERT INTO 收入 VALUES( & Format(DTPicker1.Value, yyyy-mm-dd) & , _& Combo1.Text & , & txt_money.Text & , & Combo2.Text & , & txt_intake.Text _ & , & Combo3.Text & , & txt_mome.Text & , & B &
30、), Str_text MsgBox 数据已经保存！, vbOKOnly + 64, 成功Call XiangmuCall DbEnd IfEnd If6.1.2 删除收入信息部分代码：Dim AA = MsgBox(是否删除当前记录？, vbYesNo + 32 + 256, 添加记录)If A = vbYes ThenExeCutesql DELETE from 收入 where key= & txt_note.Text & , Str_textCall DbSet Mydb = ExeCutesql(select * from 收入 , Str_text)Set MSHFlexGrid1
31、.DataSource = MydbEnd If6.2 日常支出管理在主界面中单击【日常管理】/【日常支出】项。日常支出管理主要实现对日常支出记录的添加、修改、删除功能。日常支出功能模块的运行结果如图6.2所示。图6.26.2.1 添加支出记录部分代码：Dim A, BB = 1Set Count1 = ExeCutesql(select * from 支出, Str_text)Count1.MoveLastB = Count1.Fields(7) + 1A = MsgBox(是否添加前记录？, vbYesNo + 32, 添加记录)If A = vbYes ThenIf txt_intake
32、.Text = Then MsgBox 请填写去向！, vbOKOnly + 32, 注意！ElseExeCutesql insert into 支出 values( & Format(DTPicker1.Value, yyyy-mm-dd) & , _& Combo1.Text & , & txt_money.Text & , & Combo2.Text & , & txt_intake.Text _ & , & Combo3.Text & , & txt_mome.Text & , & B & ), Str_textMsgBox 数据已经保存！, vbOKOnly + 64, 成功Call
33、 XiangmuCall DbEnd IfEnd If6.2.2 删除支出记录部分代码Dim AA = MsgBox(是否删除当前记录？, vbYesNo + 32 + 256, 添加记录)If A = vbYes ThenExeCutesql DELETE from 支出 where key= & txt_note.Text & , Str_textCall DbSet Mydb = ExeCutesql(select * from 支出 , Str_text)Set MSHFlexGrid1.DataSource = MydbEnd If6.3 银行存款管理在主界面中单击【日常管理】/【银
34、行存款】项。银行存款管理主要实现对用户的银行开户记录的添加、查找、删除功能。银行存款功能模块的运行结果如图6.3所示。图6.36.3.1 添加银行存款部分代码：Dim A, BB = 1Set Count1 = ExeCutesql(select key from 定期存款 , Str_text)Count1.MoveLastB = Count1.Fields(0) + 1A = MsgBox(是否添加前记录?, vbYesNo + 32, 修改记录)If A = vbYes ThenExeCutesql insert into 定期存款 values( & Format(DTPicker1.
35、Value, yyyy-mm-dd) & , & txt_name.Text _& , & txt_address.Text & , & txt_size.Text & , & txt_money.Text & , & txt_time.Text & , & Combo1.Text & , & Check1.Value & , & B & ), Str_textCall BangdingEnd If6.3.2 删除银行存款部分代码：Dim AA = MsgBox(是否删除当前记录？, vbYesNo + 32 + 256, 添加记录)If A = vbYes ThenExeCutesql DE
36、LETE from 定期存款 where key= & txt_key.Text & , Str_textCall BangdingEnd If6.4 借入款管理在主界面中单击【日常管理】/【借入款】项。借入款管理主要实现对家庭借款记录的添加、查找、删除功能。借入款功能模块的运行结果如图6.4所示。图6.46.4.1添加借入款记录部分代码：Dim A As Boolean A = MsgBox(是否添加前记录？, vbYesNo + 32, 添加记录)If A = True ThenExeCutesql insert into 借入 values( & txt_man.Text & , & t
37、xt_money.Text & , & Combo1.Text & , & Format(DTPicker1.Value, yyyy-mm-dd) & , & txt_way.Text & , & Check1.Value & ), Str_textMsgBox 数据已经保存！, vbOKOnly + 64, 成功Call DbLabel7.Caption = Mydb.RecordCountEnd If6.4.2 删除借入款记录部分代码： A = MsgBox(是否真的要删除这条记录？, vbOKCancel + 32 + 256, 删除)If A = True ThenExeCutesql
38、 delete from 借入 where 得款人= & txt_man.Text & , Str_textMsgBox 记录已删除！, , 删除If Mydb.RecordCount 0 ThenMydb.MoveNextIf Mydb.EOF Then Mydb.MoveLastCall DbCall BangdingLabel7.Caption = Mydb.RecordCountEnd IfEnd If6.5 借出款管理在主界面中单击【日常管理】/【借出款】项。借出款管理主要实现对家庭出借款记录的添加、查找、删除功能。借出款功能模块的运行结果如图6.5所示。6.5.1 添加借出款记录部
39、分代码：Dim A As BooleanA = MsgBox(是否添加前记录？, vbYesNo + 32, 添加记录)If A = True ThenExeCutesql insert into 借出 values( & txt_man.Text & , & txt_money.Text & , & Combo1.Text & , & DTPicker1.Value & , & txt_way.Text & , & Check1.Value & ), Str_textMsgBox 数据已经保存！, vbOKOnly + 64, 成功Call DbLabel7.Caption = Mydb.R
40、ecordCountEnd If6.5.2 删除借出款记录部分代码：A = MsgBox(是否真的要删除这条记录？, vbOKCancel + 32 + 256, 删除)If A = True ThenExeCutesql delete from 借出 where 得款人= & txt_man.Text & , Str_textMsgBox 记录已删除！, , 删除If Mydb.RecordCount 0 ThenMydb.MoveNextIf Mydb.EOF Then Mydb.MoveLastCall DbCall BangdingLabel7.Caption = Mydb.Recor
41、dCountEnd IfEnd If第七章 家庭理财查询功能家庭理财查询用来查询一段时间内家庭理财中的各种数据进行查询。7.1 查询功能实现图7.17.1.1 日常收入查询功能部分代码：If Chk_date.Value = 1 ThenCall CriqiEnd IfIf Chk_mode.Value = 1 ThenCall ModeEnd IfIf Chk_money = 1 ThenCall MoneyEnd IfIf Chk_project.Value = 1 ThenCall ProjectEnd If7.1.2 日常支出查询功能部分代码：If Chk_date1.Value =
42、1 ThenCall Criqi1End IfIf Chk_mode1.Value = 1 ThenCall Mode1End IfIf Chk_money1 = 1 ThenCall Money1End IfIf Chk_project1.Value = 1 ThenCall Project1End If第八章 家庭理财报告家庭理财报告主要是对本月或者其他月份的收入支出情况进行查看。家庭理财报告主要包括【每月明细】、【收支统计】。8.1 每月明细显示本月或者其他月份的收入支出详细信息。如图8.1所示。图8.18.1.1 查看饼图功能通过点击查看饼图，可以查看本月的收入饼图。（如图8.2）图 8.28.2 收支统计通过收支统计模块可以查看当月的收入报表。如图8.3所示。图8.3参考
