- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
课程设计报告
课程设计题目: 个人财务管理小帮手
学生姓名
专 业 计算机科学与技术
班 级
指导教师
2011 年 6 月11 日
实验题目:
设计一个个人财务管理小帮手本系统由五部分组成:用户管理、录入模块、查询模块、统计模块、分析模块。
实验时间、地点:
2011-6-7~2011-6-9 信工楼302
三、实验目的
1. 通过该题目的设计,使学生掌握软件开发过程的问题分析、系统设计、程序编码、测试等基本方法和技能;
2. 掌握利用VB开发数据库系统的方法;
3. 掌握文件的操作方法。
四、实验内容与要求
本系统由五部分组成:用户管理、录入模块、查询模块、统计模块、分析模块。
1. 用户管理:实现用户的添加、删除、密码修改功能。
2. 录入模块:对日常收支情况进行登记。收入和支出按类别登记,如学习、交通、通信、伙食费、娱乐、礼品等,内容包括时间、地点、金额、备注等。
3. 查询模块:可按年、月、日查看收支明细。
4. 统计模块:对收入、支出情况可按类型、时间段进行统计。
5. 分析模块:分析并显示每项支出所占总支出的百分比。显示按支出类型排序后的支出信息(最好用图表形式)。将排序后的内容保存。
要求:
1. 3人完成
2. 数据可以存放到文件中,也可以存放到access数据库中。
3. 提供登录界面。
4. 用户根据口令进入系统,不同的用户拥有不同权限:可读可写、只读、只读部分信息。
5. 界面友好,对用户可能输入的非法数据进行提示,如日期输入不正确
五、实现思路
个人财务管理小帮手理财管理系统包括基本信息管理、理财管理和数据统计等主要功能,具体功能如下:
基本信息的添加、修改、删除和查询;
理财信息的添加、修改、删除和查询;
数据统计模块包括日常收支统计、银行交易统计和个人资产统计等功能。
系统功能模块图
个人财务管理
个人财务管理
银 行 信 息 管 理
支 出 类 型 管 理
日 常 收 支 管 理
银 行 往 来 管 理
银 行 账 户 管 理
日 常 收 支 统 计
银 行 交 易 统 计
个 人 资 产 统 计
基本信息管理
系统用户管理
家庭理财管理
数据统计管理
银行信息管理
用户成员管理
用户信息管理
修改自身密码
功能模块图
本系统按照功能需求和部门使用的情况,将系统划分为多个子系统,每个子系统完成一定的功能。
数据库的设计
数据库设计设计是对于一个给定的应用环境,构造最优的数据库模式,建立数据库及其应用系统,使之能有效地存取数据,满足用户的信息要求和处理要求。
本实验的数据库内容包括收入、支出、收入项目、支出项目等表;功能齐全
六、部分代码(登陆界面)
Public UserLimit As String
Public iConcstr As String 字符串
Public db As ADODB.Connection 定义为数据库连接
Public strSql As String 数据库查询字符串
Public Rs As ADODB.Recordset 数据集
Public strYear As String
Public strMonth As String
Public strDay As String
Public Sub DB_OPEN()
On Error GoTo errp
iConcstr = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= App.Path \finance.mdb;
Set db = New ADODB.Connection
db.Open iConcstr
Exit Sub
errp:
MsgBox (Str(Err.Number) 数据库访问失败,或者数据库不存在,请选择有效的数据库文件!)
End Sub
Private Sub cmdQuit_Click()
End
End Sub
Private Sub cmdSure_Click()
strSql = select key from user_key where user= Trim(txtUser)
strSql = select 密码 from 用户表 where 用户名= Trim(txtUser)
Set Rs = New ADODB.Recordset
Rs.Open strSql, db, adOpenStatic, adLockReadOnly
If Rs.RecordCount = 0 Then
您可能关注的文档
最近下载
- GB_T 3880.2-2024一般工业用铝及铝合金板、带材 第 2 部分力学性能.docx VIP
- 地铁全面节能改造技术方案(RT轨道苏州会议).pdf VIP
- 鼻部解剖及生理(共49张课件).pptx VIP
- 原发性醛固酮增多症诊断治疗的专家共识(2024)解读.pptx
- 工程装饰装修施工方案.docx VIP
- CECS-10-89埋地给水钢管道水泥砂浆衬里技术标准.pdf VIP
- 中国如何推进智慧消防稳定发展.doc VIP
- 岭南版上册二年级美术教案.doc VIP
- 2025 年重庆市高中数学联赛初赛试题及答案解析.docx VIP
- 《HarmonyOS鸿蒙应用开发》电子教案--项目2-01.doc VIP
原创力文档


文档评论(0)