基于cs的家庭財務(wù)管理系統(tǒng)的設(shè)計與實現(xiàn)畢業(yè)設(shè)計-畢業(yè)設(shè)計-資料下載頁
2025-01-19 08:41本頁面
【導(dǎo)讀】做出合理的財務(wù)決策，其界面友好，操作簡單，除具備基本的財務(wù)信息管理外，還提供了數(shù)據(jù)統(tǒng)計，數(shù)據(jù)查詢，圖表自動統(tǒng)計等功能。以餅圖形式說明收入、支出、節(jié)余三者之間的相互關(guān)系，為。家庭的財產(chǎn)的有效管理和合理分配提供幫助。本文著重論述了該系統(tǒng)的功能與實?，F(xiàn),如：數(shù)據(jù)流程與存儲、管理等功能，并對關(guān)鍵的技術(shù)作了較詳細的介紹。
【正文】 Unload Me End If 財務(wù)管理主要是由家庭收入、家庭支出、家庭收入支出統(tǒng)計圖表所組成的。但最關(guān)鍵 是統(tǒng)計圖表 的視覺效果。更給用戶一目了然的統(tǒng)計，顯示 家庭的收入和支出的比例關(guān)系 ,最后節(jié)余的 也是 通過控件以圖 顯示 如下： 圖 44餅圖分析家庭節(jié)余 由于圖片分析比較直觀所以典型代碼如下所示： Dim sql As String sql = select sum (收入金 額 ) as 家庭總收入金額 from 家庭收入 sql, conn, adOpenKeyset, adLockPessimistic If 0 And Len(Trim((0))) 0 Then = (0) End If sql = select sum (支出金 額 ) as 家庭總支出金額 from 家庭支出 第 14 頁 共 23 頁 sql, conn, adOpenKeyset, adLockPessimistic If 0 And Len(Trim((0))) 0 Then = (0) End If Set rs_famshouru = Nothing = Val(Text1) Val(Text2) Dim A(0, 2) As Single A(0, 0) = Val(Text1) A(0, 1) = Val(Text2) A(0, 2) = Val(Text3) With MSChart1//根據(jù)控件設(shè)置相應(yīng)的坐標 .ChartData = A End With End Sub 根據(jù)財產(chǎn)情況添加用戶所有資產(chǎn)價格名稱等 統(tǒng)計 每天的情況。而編號是系統(tǒng)自動生成的，采用 DataGrid 控添加表格，使用戶的真實情況全部都反映出來，而且這個表和數(shù)據(jù)庫的表是相互關(guān)聯(lián)的 ， 所以建立表應(yīng)該按照數(shù)據(jù)庫的設(shè)計和SQL 語句嚴格來控制。如下圖所示： 圖 45資產(chǎn)管理 數(shù) 據(jù) 庫管理是根據(jù)編號查詢，而且是分編號查詢（收入，支出）相比之下 簡單明白。而按日期查詢也是同樣的 ， 但選擇日期也是根據(jù)本軟件自己定的，也是由 COMBOY 控 件所帶的功能。然后寫入 相關(guān)的載如信息，所以選擇相應(yīng)的日期也便 于管理和系統(tǒng)的查詢。顯示用戶查詢頁面，通過 輸入查詢條件，如查詢條 件 不符合 不顯示用戶信息 ， 根據(jù)控件 DataGrid 的添加 。 第 15 頁 共 23 頁 圖 46 日期查詢 由于數(shù)據(jù)庫的日期查詢需要添加控件 boy 但是加載的時候就應(yīng)該控制用戶只能選擇年份，月份和日期而不讓用戶自己控制。這樣在系統(tǒng)得數(shù)據(jù)庫中存儲數(shù)據(jù)也比較方便，最后還是根據(jù) DataGrid 控件套出數(shù)據(jù)庫德數(shù)據(jù)和添加進數(shù)據(jù)庫表的數(shù)據(jù)一樣，從而保證了數(shù)據(jù)的安全性。其典型代碼如下： Dim find1 As String Dim find2 As String If = Then MsgBox 請選擇年份！ , vbOKOnly + vbExclamation, ，如不選擇則顯示相應(yīng)得信息 Exit Sub End If If = Then MsgBox 請選擇月份！ , vbOKOnly + vbExclamation, ，如不選擇則顯示相應(yīng)得信息 Exit Sub End If If = Then MsgBox 請選擇日期 , vbOKOnly + vbExclamation, ，如不選擇則顯示相應(yīng)得信息 Exit Sub End If If = Then MsgBox 請選擇年份！ , vbOKOnly + vbExclamation, Exit Sub End If If = Then MsgBox 請選擇月份！ , vbOKOnly + vbExclamation, Exit Sub End If If = Then MsgBox 請選擇日期 , vbOKOnly + vbExclamation, 第 16 頁 共 23 頁 Exit Sub End If find1 = Format(CDate( amp。 amp。 amp。 amp。 )) find2 = Format(CDate( amp。 amp。 amp。 amp。 )) Private Sub Form_Load()//下面是加載控件信息 ， For i = 2021 To 2021 i Next i For i = 1 To 12 i Next i For i = 1 To 31 i Next i For i = 2021 To 2021 i Next i For i = 1 To 12 i Next i For i = 1 To 31 i Next i End Sub 5 系統(tǒng)測試 測試環(huán)境 本系統(tǒng)測試環(huán)境 ， CPU Intel(R)CeLeron(R)M,內(nèi)存 SDRAM 512M,ACCESS2021，WIN2021/XP,2021 下均測試通過 .建議用戶 CPU PIII，內(nèi)存 256M 及以上，數(shù)據(jù)庫版本 ACCESS 2021， WIN2021PRO/XP， 2021， WIN2021 SERVER 及以上軟硬件平臺使用 . 測試內(nèi)容 對本系統(tǒng)進行了系統(tǒng)登陸驗證，驗證用戶身份，進行權(quán)限控制，主要分成兩個部分進行驗證：用戶身份和管理員身份。 用戶進入系統(tǒng)主頁面后，輸入用戶名和密碼，同時選擇登錄身份，點擊提交后，系統(tǒng)將根據(jù)用戶輸入的用戶名和密碼判斷該用戶是否為合法用戶；如果用戶輸入的用戶名和密碼出錯，系統(tǒng)將提示出錯，并返回到登錄界面；如果用戶輸入的用戶名和密碼正確，系統(tǒng)將根據(jù)用戶的身份選擇相應(yīng)的主頁以及功能；所有合法用戶在處理完業(yè)務(wù)后，都需要進行退出工作，以免被他人竊取信息。 在管理員 進入系統(tǒng)后，模擬了一個用戶進行財務(wù)管理的一個基本流程：添加用戶、修改密碼 ,家庭理財，家庭資產(chǎn)管理，數(shù)據(jù)庫管理。 第 17 頁 共 23 頁 (1)如圖下圖所示，如果沒有這個用戶是進入不了系統(tǒng)的，它限制了登陸的權(quán)限和安全的問題。 。 圖 51進入界面登陸 (2)如果進入后者整個系統(tǒng)的界面就出現(xiàn)在下面，展現(xiàn)整個界面的窗體。 圖 52總體界面圖 (3)進入后增加新用戶，添加用戶的基本信息，選擇用戶的權(quán)限，如果所注冊的用戶名不是已經(jīng)有的，則顯示下面的信息。 圖 53增加新用戶 第 18 頁 共 23 頁 (4)如果添加用戶已經(jīng)有時 ，則系統(tǒng)會自動提示已有這個用 戶。然后添加的鼠標定位會在用戶名顯示 圖 54添加同名用戶 (5)進入 家庭支出后進行 統(tǒng)計 ，根據(jù)各個欄目填寫基本的名稱，然后可以根據(jù)權(quán)限刪除相應(yīng)得記錄信息，如下圖所示。 圖 55家庭支出統(tǒng)計 (6)家庭收入統(tǒng)計圖如下 和家庭支出統(tǒng)計圖的功能基本一樣，在此不再敘述。 圖 56家庭收入統(tǒng)計 (7)資產(chǎn)管理的分析方法和思路和家庭收入和支出的設(shè)計方式一樣，在此不必進行多的說明。 第 19 頁 共 23 頁 圖 57錄入家庭資產(chǎn)情況 (8)按物品查詢 這是根據(jù)數(shù)據(jù)庫中的表的編號進行統(tǒng)計，只有上面的錄入每出入則相信統(tǒng)計的基本信息就不會 出錯。 圖 58 物品查詢信息 (9)按日期查詢信息 的基本功能和控件的設(shè)置基本同資財管理一樣。 圖 59 日期查詢信息 (10)按編號查詢信息，這和家庭收入和家庭支出一樣，都是按照編號查詢。 圖 510編號查詢圖
畢業(yè)設(shè)計相關(guān)推薦
鄂ICP備17016276號-1