网学网为需要VB类作品的朋友们搜集整理了VB个人家庭理财系统相关资料，希望对各位网友有所帮助!
第四章 系统实现 4.1 系统功能实现 4.1.1 用户登陆实现 正确输入用户名和密码，才能成功登陆用户理财管理系统主界面，登陆成功将显示登陆信息。（见图3-1） 图3-1 用户登陆成功界面 在工程引用ADO2.0。 在命令按钮单击写下连接数据库USER表的判断语句： Private Sub Command1_Click() denlu_name = Text1.Text denlu_pass = Text2.Text Dim mycn As New ADODB.Connection Dim myrs As New ADODB.Recordset Set myrs = New ADODB.Recordset mycn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=rsgl.mdb;" myrs.Open "SELECT * FROM [user] where (user.user)=''" + denlu_name + "'';", mycn, adOpenKeyset, adLockOptimistic If myrs.BOF = True And myrs.EOF = True Then MsgBox "查无此人", , "登陆信息" Else If myrs("pass") = denlu_pass Then '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' MsgBox "ok", , "登陆信息" Form2.Show Unload Me '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' Else MsgBox "密码不正确", , "登陆信息" End If 目的是USER表没有该用户，将无法使用本程序。（见图3-2） 图3-2 用户登陆失败界面 4.1.2 主界面的实现 用户成功登陆，随即进入主界面。（见图3-3） 图3-3 主界面的实现 主界面包含几方面的内容,以下将做一一介绍。 4.1.3 各个模块的实现 每人消费收入：作用是将每日家庭消费收入信息单列出来进行记录。当点击主界面上“家庭成员工资系统”按扭时，随即出“每人消费收入”栏 通过ADO控件连接到数据库的RS表，通过SQL语句 SELECT [rs].[编号], [rs].[姓名], [rs].[日期], [rs].[星期], [rs].[收入金额], [rs].[预计收入], [rs].[收入来源], [rs].[收入类型], [rs].[收入来源单位], [rs].[收入联系电话], 筛选出全部记录，用DATA GRID控件，将它的数据源设为ADO控件，将它的各列显示出数据库的各列，属性设为可写。ADO控件，将它的各列显示出数据库的各列，属性设为可写。 每人消费支出：作用是将每日家庭消费支出信息单列出来进行记录。当点击主界面上“家庭成员工资系统”按扭时，随即谈出“每人消费支出”栏 通过ADO控件连接到数据库的RS表，通过SQL语句 SELECT [支出类型], [rs].[支出用图], [rs].[支出单位], [rs].[支出联系电话], [rs].[备注] FROM rs 筛选出全部记录，用DATA GRID控件，将它的数据源设为ADO控件，将它的各列显示出数据库的各列，属性设为可写。ADO控件，将它的各列显示出数据库的各列，属性设为可写。 |
| 本站发布的计算机毕业设计均是完整无错的全套作品，包含开题报告+程序+论文+源代码+翻译+答辩稿PPT |
本文选自计算机毕业设计http://myeducs.cn
|
