畢業(yè)設(shè)計(jì)論文(論文)個(gè)人收支管理系統(tǒng)設(shè)計(jì)

1、XX大學(xué)畢業(yè)設(shè)計(jì)論文個(gè)人收支管理系統(tǒng)學(xué) 院 XXXXXXXXXXXXX年級(jí)專業(yè) XXXXXXXXXXX學(xué)生XXX指導(dǎo)教師XXX專業(yè)負(fù)責(zé)人完成日期XXXX年XX月個(gè)人收支記錄是個(gè)人日常生活與工作中一項(xiàng)重要的業(yè)務(wù)， 個(gè)人需要利用個(gè) 人收支管理系統(tǒng)來(lái)記錄各種帳務(wù)信息，以及對(duì)其進(jìn)展必要的管理。本系統(tǒng)是專 門針對(duì)個(gè)人日常需求而開發(fā)的一個(gè)具備幾種常用功能的系統(tǒng)。個(gè)人收支管理系統(tǒng)主要完成以下功能：系統(tǒng)維護(hù)：收支類別管理，可以添加類別 （包括類別名稱，說(shuō)明，收支選 擇），刪除類別。收支名稱管理：包括收支名稱的增加與刪除，通過(guò)點(diǎn)擊不同 的收支類型，可以查到相應(yīng)的收支名稱。銀行卡管理：包括銀行卡的增加，刪 除，通

2、過(guò)點(diǎn)擊不同類型的銀行卡，可以查到相應(yīng)的銀行卡信息（卡號(hào)，開戶日期等）。記賬日志：分為現(xiàn)金記賬，銀行卡記賬。查詢和統(tǒng)計(jì)：包括支出情況 統(tǒng)計(jì)，收支情況比照。關(guān)鍵詞：個(gè)人收支管理系統(tǒng)；Visual basic 6.0數(shù)據(jù)庫(kù)系統(tǒng)III / 48III / 48摘要目錄II第1章緒論11.1開發(fā)背景11.2開發(fā)目的和意義1第2章開發(fā)工具介紹22.1 Visual basic 6.簡(jiǎn)介 22.2 Visual Basi具有以下特點(diǎn)2面向?qū)ο蟮目梢暬O(shè)計(jì)平臺(tái)2事件驅(qū)動(dòng)的編程機(jī)制3構(gòu)造化的設(shè)計(jì)語(yǔ)言3充分利用Windows資源3開放的數(shù)據(jù)庫(kù)功能與網(wǎng)絡(luò)支持32.3 Visual basic 6.運(yùn)行環(huán)境及配置42

3、.4 Access數(shù)據(jù)庫(kù)介紹4第3章需求分析63.1系統(tǒng)需求分析6功能需求6性能需求6環(huán)境需求6未來(lái)需求63.2數(shù)據(jù)流程圖6第4章系統(tǒng)總體設(shè)計(jì)84.1系統(tǒng)功能模塊84.2功能的實(shí)現(xiàn)84.3系統(tǒng)功能模塊圖8第5章系統(tǒng)詳細(xì)設(shè)計(jì)105.1系統(tǒng)構(gòu)造設(shè)計(jì)105.2 E-R 圖 11收支類型E-R圖11銀行卡表E-R圖11銀行卡記錄表E-R圖12收支記錄表E-R圖12關(guān)系實(shí)體E-R圖125.3系統(tǒng)主要界面設(shè)計(jì)145.4數(shù)據(jù)庫(kù)設(shè)計(jì)16541收支類別數(shù)據(jù)表17542銀行卡管理數(shù)據(jù)17543銀行卡管理數(shù)據(jù)表17544現(xiàn)金記賬數(shù)據(jù)表1819第6章 系統(tǒng)主要界面說(shuō)明和使用說(shuō)明系統(tǒng)使用說(shuō)明19結(jié)論21參考文獻(xiàn)22附錄

4、：源程序代碼23致31III / 48第1章緒論1.1開發(fā)背景計(jì)算機(jī)應(yīng)用已經(jīng)滲透到日常工作的許多方面， 無(wú)論是其自身還是其所發(fā)揮 的作用。計(jì)算機(jī)都標(biāo)志著一種高科技、高效率和高水平。信息作為生產(chǎn)力中最 活潑的因素，很早就在人類經(jīng)濟(jì)生活中發(fā)揮著不可替代的作用，但把信息納入企 業(yè)經(jīng)營(yíng)管理系統(tǒng)中高效處理和應(yīng)用是在計(jì)算機(jī)創(chuàng)造以后的 50年代末。目前人們所提到的管理信息系統(tǒng)，通常是指以計(jì)算機(jī)為工具，對(duì)管理信息進(jìn) 展收集、存貯、檢索、加工和傳遞，使其應(yīng)用于組織機(jī)構(gòu)及企業(yè)管理領(lǐng)域的“人 機(jī)系統(tǒng)，該系統(tǒng)是70年代初“后工業(yè)經(jīng)濟(jì)時(shí)代的產(chǎn)物，在企業(yè)管理信息 系統(tǒng)在其開展的初期，是單一的人一機(jī)系統(tǒng)，系統(tǒng)功能簡(jiǎn)單，效率

5、低，對(duì)管理的作 用有限。為了企業(yè)創(chuàng)先進(jìn)、爭(zhēng)一流，為了企業(yè)的明天，許多企業(yè)的領(lǐng)導(dǎo)已經(jīng)或正準(zhǔn) 備投入高額資金，建立大規(guī)模的計(jì)算機(jī)管理信息系統(tǒng) （MIS），所以越來(lái)越多的 現(xiàn)代化計(jì)算機(jī)管理軟件進(jìn)入了社會(huì)應(yīng)用的方方面面， 個(gè)人收支管理領(lǐng)域也不例 外。個(gè)人收支管理信息系統(tǒng)是針對(duì)個(gè)人的收入和支出的自身特點(diǎn)，適合對(duì)錢財(cái)管理中的實(shí)際情況，涉及了收入和支出的每一個(gè)環(huán)節(jié)，為個(gè)人的財(cái)務(wù)管理提供 了一個(gè)先進(jìn)的系統(tǒng)平臺(tái)和一個(gè)合理分配收支的環(huán)境，加快了信息反應(yīng)，從而更好的管理自己的財(cái)務(wù)。本系統(tǒng)的實(shí)現(xiàn)使用戶從繁重的手工業(yè)務(wù)中解脫出來(lái)，提 高了管理錢財(cái)?shù)男屎唾|(zhì)量。個(gè)人收支并不是一個(gè)新鮮詞，簡(jiǎn)單地說(shuō)就是開源節(jié)流、管理好您的錢

6、。是 實(shí)現(xiàn)個(gè)人人生目標(biāo)而制定、安排、實(shí)施和管理的一個(gè)各方面總體協(xié)調(diào)的財(cái)務(wù)規(guī) 劃的過(guò)程，或是對(duì)家庭資產(chǎn)的合理安排與管理。1.2開發(fā)目的和意義通過(guò)數(shù)據(jù)庫(kù)技術(shù)分析數(shù)據(jù)庫(kù)中個(gè)人財(cái)產(chǎn)的根本信息 ，到達(dá)收支的目的：1 建立數(shù)據(jù)庫(kù)，個(gè)人收支的根本資料就存放在其中。2 把個(gè)人收支的全部資料輸入數(shù)據(jù)庫(kù)。3 用VB開發(fā)出應(yīng)用程序連接數(shù)據(jù)庫(kù)。4.在應(yīng)用程序中用查詢和統(tǒng)計(jì)等手段對(duì)數(shù)據(jù)庫(kù)的資料進(jìn)展處理，得到有效 的數(shù)據(jù)，分析出個(gè)人的財(cái)產(chǎn)情況，得出結(jié)論和措施，然后個(gè)人就可以通過(guò)措施到 達(dá)收支的目的。2 / 48第2章開發(fā)工具介紹2.1 Visual basic 6.（簡(jiǎn)介vb是一種可視化的編程語(yǔ)言，這種方法不需要編寫大量

7、的代碼去描述截面外觀和位置，而只需要把預(yù)先建立的控件，先使用“畫圖之類的繪圖程序 那樣“畫到屏幕上即可。它一共具有三個(gè)版本：標(biāo)準(zhǔn)版、企業(yè)版、專業(yè)版。 它作為一種開發(fā)工具而言，不僅僅是一種語(yǔ)言，從數(shù)學(xué)計(jì)算、數(shù)據(jù)庫(kù)管理、客戶/效勞器軟件，通信軟件，多媒體軟件帶Inter/lntranet軟件，都可以用VB 開飯完成。使用VB不僅可以感受到 Windows帶來(lái)的新技術(shù)，新概念和新的 開發(fā)方法，而且VB是目前眾多 Windows軟件開發(fā)工具中效率最高的一個(gè) 。 同時(shí)我們利用VB6.0編制數(shù)據(jù)庫(kù)操作應(yīng)用程序。VB編程操作數(shù)據(jù)庫(kù)的方法可 分兩層：第一層是通過(guò)數(shù)據(jù)操作對(duì)象訪問(wèn)數(shù)據(jù)庫(kù)，這種方式需要將數(shù)據(jù)庫(kù)操作

8、組件庫(kù)參加VB的工程工程的參考，然后在程序中構(gòu)造這些數(shù)據(jù)庫(kù)組件對(duì)象 的實(shí)例連接，操作和管理數(shù)據(jù)庫(kù)，如 DAO對(duì)象編程，RDO對(duì)象編程和ADO 對(duì)象編程等，還包括直接調(diào)用 ODBC API接口編程，第二層是通過(guò)具有數(shù)據(jù) 感知性的控件來(lái)訪問(wèn)數(shù)據(jù)庫(kù)，包括VB自帶控件和第三方開發(fā)的 ActiveX控件。這些組件是具有數(shù)據(jù)感知性，即置了數(shù)據(jù)庫(kù)訪問(wèn)的對(duì)象（或者DAO，或者ADO等），并提供應(yīng)主程序訪問(wèn)的接口，供客戶端程序調(diào)用。兩種方法比擬起 來(lái)，第一種方式編程靈活，功能強(qiáng)大，可擴(kuò)展性強(qiáng)；第二種方式方便易用，開 發(fā)迅速，編碼量小，并且不需要了解部數(shù)據(jù)流動(dòng)的細(xì)節(jié)。 所以我們利用這種可3 / 48視化技術(shù)進(jìn)展編

9、程，能使編程工作變得輕松快捷，擺脫了面向過(guò)程語(yǔ)言的許多 細(xì)節(jié)，而將主要精力集中在解決實(shí)際問(wèn)題和設(shè)計(jì)友好界面上。因此，VB在國(guó)外各個(gè)領(lǐng)域中應(yīng)用非常廣泛，許多計(jì)算機(jī)專業(yè)和非計(jì)算機(jī)專業(yè)和非計(jì)算機(jī)專業(yè) 的人員常利用它來(lái)編制開發(fā)應(yīng)用程序和軟件。2.2Visual Basic具有以下特點(diǎn)221面向?qū)ο蟮目梢暬O(shè)計(jì)平臺(tái)利用傳統(tǒng)的程序設(shè)計(jì)語(yǔ)言進(jìn)展程序設(shè)計(jì)時(shí)，需要花費(fèi)大量的精力通過(guò)編程 設(shè)計(jì)程序的界面，在設(shè)計(jì)過(guò)程中看不到程序的實(shí)際顯示效果， 必須在運(yùn)行程序 的時(shí)候才能觀察。如果對(duì)程序的界面不滿意，還要回到程序中去修改，這一過(guò) 程常常需要反復(fù)屢次，大大影響了編程的效率。VB提供的可視化設(shè)計(jì)平臺(tái)，把Windows界

10、面設(shè)計(jì)的復(fù)雜性“封裝起來(lái)。程序員不必再為界面的設(shè)計(jì)而 編寫大量程序代碼，只需按設(shè)計(jì)的要求，用系統(tǒng)提供的工具在屏幕上“畫出 各種對(duì)象，VB將自動(dòng)產(chǎn)生界面設(shè)計(jì)代碼，程序員所需要編寫的只是實(shí)現(xiàn)程序 功能的那局部代碼，從而大大提高了編程的效率。事件驅(qū)動(dòng)的編程機(jī)制傳統(tǒng)的編程方式是面向過(guò)程的、按事先設(shè)計(jì)的程序流程來(lái)運(yùn)行的。 但在圖 形用戶界面的應(yīng)用程序中，用戶的動(dòng)作（即事件）掌握著程序的運(yùn)行流向，每個(gè) 事件都驅(qū)動(dòng)一段程序的運(yùn)行。程序員在設(shè)計(jì)應(yīng)用程序時(shí)，不必建立具有明顯開 場(chǎng)和完畢的程序，而是編寫如干個(gè)微小的子程序，即過(guò)程。這些過(guò)程分別面向不同的對(duì)象，由用戶操作引發(fā)某個(gè)事件來(lái)驅(qū)動(dòng)完成某種特定的功能，或由事件

11、驅(qū)動(dòng)程序調(diào)用通用過(guò)程來(lái)執(zhí)行制定的錯(cuò)做。223構(gòu)造化的設(shè)計(jì)語(yǔ)言VB是在構(gòu)造化的BASIC語(yǔ)言根底上開展起來(lái)的，具有高級(jí)程序設(shè)計(jì)語(yǔ)言 的語(yǔ)句構(gòu)造，接近于自然語(yǔ)言和人類的邏輯思維方式，其語(yǔ)句簡(jiǎn)單易懂。VB是解釋型語(yǔ)言，在輸入代碼的同時(shí)，解釋系統(tǒng)將高級(jí)語(yǔ)言分解翻譯成計(jì)算機(jī)可以識(shí)別的機(jī)器指令，并判斷每個(gè)語(yǔ)句的語(yǔ)法錯(cuò)誤。在設(shè)計(jì)VB程序過(guò)程中，隨時(shí)可運(yùn)行程序，而在整個(gè)應(yīng)用程序設(shè)計(jì)好后，可編譯生成可執(zhí)行未見 (.exe)脫離VB環(huán)境，直接這 Windows環(huán)境下運(yùn)行。充分利用 Windows資源VB提供的動(dòng)態(tài)數(shù)據(jù)交換(DDE， Dynamic Data Exchange編程技術(shù),可以在 應(yīng)用程序中實(shí)現(xiàn)與其他W

12、indows應(yīng)用程序建立動(dòng)態(tài)數(shù)據(jù)交換、在不同的應(yīng) 用程序之間進(jìn)展通信的功能。VB提供的對(duì)象與嵌入(OLE， Object Link and Embed)技術(shù)那么是將每個(gè) 應(yīng)用程序都看做一個(gè)對(duì)象，將不同的對(duì)象起來(lái)，嵌入到某個(gè)應(yīng)用程序中，從而 得到具有聲音、影像、圖像、動(dòng)畫、文字等各種信息的集合式文件。VB還可以通過(guò)動(dòng)態(tài)庫(kù)(DLL , Dynamic Link Library)技術(shù)將C/C+或匯編語(yǔ) 言編寫的程序參加到VB得應(yīng)用程序中，或是調(diào)用Windows應(yīng)用程序接口(API， Applicatio n Programmi ng In terface)函數(shù)，實(shí)現(xiàn)軟件開發(fā)工具包(SDK，Softw

13、areDevelopme nt Kit ）所具有的功能。225開放的數(shù)據(jù)庫(kù)功能與網(wǎng)絡(luò)支持VB系統(tǒng)具有很強(qiáng)的數(shù)據(jù)庫(kù)管理功能。不僅可以管理MS Access格式的數(shù)據(jù)庫(kù)，還能訪問(wèn)其他外部數(shù)據(jù)庫(kù)，如FoxPro, Paradox等格式的數(shù)據(jù)庫(kù)。另外， VB還提供了開放式數(shù)據(jù)連接（ODBC）功能，可以通過(guò)直接訪問(wèn)或建立連接的方 式使用并操作后臺(tái)大型網(wǎng)絡(luò)數(shù)據(jù)庫(kù)，如SQL Serve，Oracle等。在應(yīng)用程序中，可以使用構(gòu)造化查詢語(yǔ)句（SQL）直接訪問(wèn)Server上的數(shù)據(jù)庫(kù)，并提供簡(jiǎn)單的面 向?qū)ο蟮膸?kù)操作命令、多用戶數(shù)據(jù)庫(kù)的加鎖機(jī)制和網(wǎng)絡(luò)數(shù)據(jù)庫(kù)的編程技術(shù)，為單機(jī)上運(yùn)行的數(shù)據(jù)庫(kù)提供 SQL網(wǎng)絡(luò)接口，以便在

14、分布式環(huán)境中快速而有效地 實(shí)現(xiàn)客戶效勞器（Client/Server）方案。2.3 Visual basic 6.0運(yùn)行環(huán)境及配置為運(yùn)行Visual Basic必須在計(jì)算機(jī)上安裝相應(yīng)的硬件和軟件系。具體要：1. 操作系統(tǒng)：Microsoft Windows NT Server 4.0或更高的版本，或 Microsoft Win dows 95或更高的版本。2. CPU: 486DX/66 MHZ或更高的處理器（推薦pentium或更高的處理器）。3. 存：Microsoft Windows 95/98 下要求的 24MB 以上的存，Windows T下 要求32MB以上。4. 磁盤空間：對(duì)于標(biāo)

15、準(zhǔn)版，典型安裝 48MB,完全安裝80MB。對(duì)于專業(yè) 版，典型安裝48MB，完全安裝80MB。對(duì)于企業(yè)版，典型安裝128MB,完全 安裝147MB。5 其它設(shè)備：CD-ROM驅(qū)動(dòng)器，鼠標(biāo)或其他光標(biāo)控制設(shè)備2.4 Access數(shù)據(jù)庫(kù)介紹Microsoft Access是目前最流行的桌面型數(shù)據(jù)庫(kù)軟件之一。 它提供的大量的 輸入、分析和展示數(shù)據(jù)的工具得到了用戶的廣泛喜愛。Access數(shù)據(jù)庫(kù)是微軟 Microsoft公司主打辦公軟件 Microsoft office中一個(gè) 極為重要的組成局部。自從1992年開場(chǎng)銷售以來(lái)，Access已賣出了 6000 萬(wàn)份，現(xiàn)在它已經(jīng)成為世界上最流行的桌面數(shù)據(jù)管理系統(tǒng)

16、。后來(lái)微軟公司通過(guò)大量地改良，將 Access的新版本功能變得更加強(qiáng)大。不管是處理公司的客戶 訂單數(shù)據(jù)，管理自己的個(gè)人通訊錄，還是大量科研數(shù)據(jù)的記錄和處理，人們都可以利用它來(lái)解決大量數(shù)據(jù)的管理工作。隨著微軟公司對(duì)office套件的不斷升級(jí)，Access數(shù)據(jù)庫(kù)軟件也相應(yīng)得到了完善和開展，新的技術(shù)，如，ActiveX，Xml等網(wǎng)絡(luò)技術(shù)不斷地引入到Access中。Access已經(jīng)不是單一的桌面數(shù)據(jù)庫(kù)管 理軟件，而是綜合的數(shù)據(jù)庫(kù)管理及應(yīng)用集成一體化系統(tǒng)了。Access數(shù)據(jù)庫(kù)有幾個(gè)顯著的特點(diǎn)：文件組織的單文件形式存在：一個(gè)Access數(shù)據(jù)庫(kù)就是一個(gè)以MDB為后綴名的文件，簡(jiǎn)單明了、容易生成、使用和管理。

17、移植的時(shí)候只需 要將一個(gè)數(shù)據(jù)庫(kù)文件拷貝到新的環(huán)境中即可使用。這也是Access數(shù)據(jù)庫(kù)得以大量應(yīng)用的原因。數(shù)目龐大的應(yīng)用軟件，不需要龐大的數(shù)據(jù)支持，只需要一個(gè) 小小的便于管理和移植安裝的數(shù)據(jù)存儲(chǔ)區(qū)來(lái)存放數(shù)據(jù)，Access數(shù)據(jù)庫(kù)正好滿足了這一要求，而且 Access數(shù)據(jù)庫(kù)也提供了數(shù)據(jù)庫(kù)系統(tǒng)所能提供的快速檢索、 統(tǒng)計(jì)報(bào)表等功能，支持SQL語(yǔ)言，支持事務(wù)處理等；具有 VBA的編程環(huán)境： 由于Access數(shù)據(jù)庫(kù)是微軟office套件中的一局部，office套件中的共同特色 VBA界面。用戶只需要使用簡(jiǎn)單的編程語(yǔ)言VB，就可以編寫出豐富的Windows界面程序，而且這個(gè)程序是置在 Access數(shù)據(jù)庫(kù)中的，

18、同樣包含在了 MDB文件中。Access數(shù)據(jù)庫(kù)還給用戶提供了編寫界面程序的可視化編程環(huán)境， 類似VB，Access數(shù)據(jù)庫(kù)可視化開發(fā)環(huán)境具有如 Delphi，VB，Borland C+等可 視化開發(fā)環(huán)境一樣的快速開發(fā)功能；組件式的數(shù)據(jù)庫(kù)：所謂組件式的數(shù)據(jù)庫(kù)， 是指Access數(shù)據(jù)庫(kù)具有強(qiáng)大的支持。在Access數(shù)據(jù)庫(kù)可以方便地使用 Windows 操作系統(tǒng)中已注冊(cè)的組件的通用接口使用第三方開發(fā)出來(lái)的用之不盡的功能。 Access的組成局部：查詢、表單、報(bào)表、宏、模塊、Access數(shù)據(jù)庫(kù)窗口、子數(shù)據(jù)表、共同的報(bào)表、數(shù)據(jù)訪問(wèn)頁(yè)、不再局限于使于JET數(shù)據(jù)庫(kù)引擎、支持的更多的置數(shù)據(jù)源。8 / 48第3章

19、需求分析3.1系統(tǒng)需求分析系統(tǒng)分析是開發(fā)管理信息系統(tǒng)的關(guān)鍵性階段，是一個(gè)從不斷認(rèn)識(shí)和逐步細(xì) 化的過(guò)程，是下一階段的工作根底，是為下一階段進(jìn)展物理方案設(shè)計(jì)、解決“怎 么做提供依據(jù)，基關(guān)鍵性主要表達(dá)在“理解需求和“表達(dá)需求兩方面。通過(guò)對(duì)現(xiàn)行系統(tǒng)的詳細(xì)調(diào)研，主要是從系統(tǒng)的角度理解用戶的需要， 確定 新系統(tǒng)的綜合要求，并提出這些需求的實(shí)現(xiàn)條件以及需求應(yīng)到達(dá)的標(biāo)準(zhǔn)， 也就 是確定新系統(tǒng)要做什么，做到什么程度。這些需求包括：功能需求確定新系統(tǒng)應(yīng)做什么，這是最主要的需求。性能需求給出所開發(fā)的新系統(tǒng)的技術(shù)性能指標(biāo)，包括存儲(chǔ)容量限制、運(yùn)行時(shí)間限制、環(huán)境需求這是對(duì)系統(tǒng)運(yùn)行以及所處環(huán)境的要求。例如，在硬件方面采用什

20、么機(jī)型、 有什么硬件設(shè)備等；在軟件方面，采用什么支持系統(tǒng)運(yùn)行的系統(tǒng)軟件（指操作系統(tǒng)、數(shù)據(jù)庫(kù)管理系統(tǒng)）。未來(lái)需求這類要指目前不屬于系統(tǒng)開發(fā)的圍，但將來(lái)隨著外界環(huán)境的變化以及系統(tǒng)9 / 48的開展可能會(huì)提出的要求。了解這類要求的目的是在開發(fā)過(guò)程中， 可對(duì)系統(tǒng)將 來(lái)可能的擴(kuò)展與修改做準(zhǔn)備。一旦需要時(shí)，就比擬容易進(jìn)展補(bǔ)充和修改了。3.2數(shù)據(jù)流程圖根據(jù)需求分析可以得到下面數(shù)據(jù)流程圖，如圖3-1所示12 / 48圖3-1數(shù)據(jù)功能流程圖第4章系統(tǒng)總體設(shè)計(jì)4.1系統(tǒng)功能模塊系統(tǒng)構(gòu)造功能：收支管理局部：分為收支類別和收支名稱管理；記賬管理: 分為現(xiàn)金記賬和銀行記賬管理；查詢和統(tǒng)計(jì)管理：查詢收入和支出金額以及收入

21、和 支出的比照情況。4.2功能的實(shí)現(xiàn)1“系統(tǒng)維護(hù)模塊。(1) 收支類別管理：主要功能是添加類別，刪除類別。(2) 收支名稱管理：主要功能是收支類型，現(xiàn)有收支名稱進(jìn)展整理和刪除。(3) 銀行卡管理：主要功能是添加修改，銀行卡的名稱，開戶日期。(4) 退出系統(tǒng)：主要功能是完成添加 、刪除等動(dòng)作后，可以單擊退出系統(tǒng)。2. “記賬日志"模塊。(1) 現(xiàn)金記賬管理：包括對(duì)收支金額，收支類型，收支名稱，添收支日期的添 加和修改。(2) 銀行卡記賬管理：包括對(duì)銀行卡的選擇、卡號(hào)、記賬日期、金額、備注進(jìn) 展添加、修改。3. “查詢和統(tǒng)計(jì)管理模塊(1)支出情況統(tǒng)計(jì)管理：主要功能是可以按月進(jìn)展查詢或是按

22、類型查詢(2)收支情況比對(duì)管理：主要功能是可以進(jìn)展對(duì)年份、支出類型、收入類型的 比對(duì)。4.3系統(tǒng)功能模塊圖根據(jù)在上面介紹的功能，對(duì)系統(tǒng)進(jìn)展分析得到下面的系統(tǒng)功能模塊圖如圖4-1所示。14 / 48圖4-1系統(tǒng)功能模塊圖16 / 48第5章系統(tǒng)詳細(xì)設(shè)計(jì)5.1系統(tǒng)構(gòu)造設(shè)計(jì)本系統(tǒng)構(gòu)造設(shè)計(jì)是根據(jù)個(gè)人收支管理根本流程進(jìn)展的，包括三大局部，8個(gè)完整的功能模塊。系統(tǒng)構(gòu)造如圖 5-1所示。個(gè)人收支管理系統(tǒng)查詢和統(tǒng)計(jì)圖5-1系統(tǒng)構(gòu)造圖5.2E-R 圖根據(jù)前面對(duì)系統(tǒng)做的可行性研究、 需求分析、數(shù)據(jù)流圖繪制、模塊設(shè)計(jì)，就 可以作出能夠滿足用戶需求的各種實(shí)體以及它們之間的關(guān)系，本系統(tǒng)根據(jù)前面的設(shè)計(jì)規(guī)劃出的實(shí)體有：收支

23、類型實(shí)體、銀行卡表實(shí)體、銀行卡記錄實(shí)體、收支記錄實(shí)體。收支類型E-R圖收支類型E-R圖如圖5-2所示。圖5-2收支類型E-R圖銀行卡表E-R圖銀行卡表E-R圖如圖5-3所示。18 / 48圖5-3銀行卡表E-R圖銀行卡記錄表E-R圖銀行卡記錄表E-R圖如圖5-4所示銀行卡記錄表圖5-4銀行卡記錄表E-R圖收支記錄表E-R圖收支記錄表E-R圖如圖5-5所示圖5-5 收支記錄表E-R圖525關(guān)系實(shí)體E-R圖關(guān)系實(shí)體E-R圖如圖5-6所示22 / 48卡名稱收支類型開戶銀行收支開戶時(shí)間11有存取NMN存取金額日期金額收支名稱收支日期銀行卡表卡記錄表記錄號(hào)號(hào)口 號(hào)收支類型表1二N收支記錄:表N圖5-6

24、關(guān)系實(shí)體E-R圖5.3系統(tǒng)主要界面設(shè)計(jì)運(yùn)行程序后，進(jìn)入系統(tǒng)總界面，其總界面反映了系統(tǒng)的功能，由主菜單等。本界面簡(jiǎn)潔、方便，不管其計(jì)算機(jī)水平上下都能很容易的掌握使用方法，使系統(tǒng)在最短的時(shí)間發(fā)揮其應(yīng)有的效能。如圖5-7所示。圖5-7系統(tǒng)的主界面窗體 添加收支類別窗體如圖5-8所示。黃于當(dāng)前美別的說(shuō)明 我的家教收入AAAAIn-±圖5-8添加收支類別窗體日常記賬輸入窗體如圖5-9所示圖5-9日常收支記錄窗體管理銀行卡窗體如圖5-10所示。32 / 48圖5-10銀行卡管理窗體支出情況統(tǒng)計(jì)窗體如圖5-11所示圖5-11支出情況統(tǒng)計(jì)收支情況比照窗體如圖5-12所示注收支帝祝比對(duì)圖5-12收支情

25、況比對(duì)5.4數(shù)據(jù)庫(kù)設(shè)計(jì)任何數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)都離不開數(shù)據(jù)庫(kù)和數(shù)據(jù)表，數(shù)據(jù)庫(kù)是數(shù)據(jù)表的集合，數(shù)據(jù)表那么是用于護(hù)理各種數(shù)據(jù)的工具，數(shù)據(jù)表的數(shù)據(jù)類型是按大小進(jìn)展管理的， 因此我們必須首先為每一個(gè)需要的數(shù)據(jù)表定義它們的構(gòu)造，本系統(tǒng)數(shù)據(jù)庫(kù)名為 databas擻據(jù)庫(kù)，采用Access2OO0乍為后臺(tái)數(shù)據(jù)庫(kù)。包含收支類別管理表、收支 名稱管理表、銀行卡管理表、日常記賬管理表、銀行卡記賬表、現(xiàn)金記賬表。其構(gòu)造分別如下。收支類別數(shù)據(jù)表該表的主要作用是記錄在個(gè)人收支管理中的收支種類的根本信息，其信息容可參考它的邏輯構(gòu)造定義，如表 5-1所示。表5-1收支類別數(shù)據(jù)的表邏輯構(gòu)造字段名稱數(shù)據(jù)類型字段大小允許空值備注收支類型

26、文本10否主鍵，自增收支名稱文本10否收支文本10否對(duì)應(yīng)的日記賬編號(hào)說(shuō)明文本10否542銀行卡管理數(shù)據(jù)在系統(tǒng)開發(fā)和使用中，我們需要一個(gè)“銀行卡管理數(shù)據(jù)表的數(shù)據(jù)表。它可以用于記錄收支管理中銀行卡信息，其信息容可參考它的邏輯構(gòu)造定義，如表5-2所示。表5-2讀者信息數(shù)據(jù)的表邏輯構(gòu)造字段名稱數(shù)據(jù)類型字段大小允許空值備注銀行卡選擇文本4否主鍵自增卡號(hào)數(shù)字20辦理日期數(shù)字4對(duì)應(yīng)的日記賬編號(hào)543銀行卡管理數(shù)據(jù)表在系統(tǒng)開發(fā)和使用中，我們需要一個(gè)“銀行卡管理數(shù)據(jù)表的數(shù)據(jù)表。它可 以用于記錄收支管理中銀行卡信息，其信息容可參考它的邏輯構(gòu)造定義，如表5-2所示。表5-3銀行卡數(shù)據(jù)的表邏輯構(gòu)造字段名稱數(shù)據(jù)類型字段

27、大小允許空值備注銀行卡選擇文本4否主鍵自增卡號(hào)數(shù)字20辦理日期數(shù)字4對(duì)應(yīng)的日記賬編號(hào)544現(xiàn)金記賬數(shù)據(jù)表該表的主要作用是記錄在個(gè)人收支管理中的收支情況的根本信息，信息容可參考它的邏輯構(gòu)造定義，如表5-3所示表5-4現(xiàn)金記賬數(shù)據(jù)表達(dá)的邏輯構(gòu)造字段名稱數(shù)據(jù)類型字段大小允許空值備注收支類型文本10否主鍵收支名稱文本10否收支日期文本10否金額數(shù)字8第6章 系統(tǒng)主要界面說(shuō)明和使用說(shuō)明系統(tǒng)使用說(shuō)明本程序主要用于個(gè)人對(duì)于收支的管理， 運(yùn)行本程序，首先出現(xiàn)系統(tǒng)主界面 圖如圖6-1所示。圖6-1統(tǒng)主界面主窗體菜單欄包括的主要菜單有系統(tǒng)維護(hù)，記賬日志，詢和統(tǒng)計(jì)。1 首先實(shí)現(xiàn)系統(tǒng)維護(hù)功能：翻開“系統(tǒng)維護(hù)菜單，其下

28、有四個(gè)一級(jí)菜單一一“收支類別管理、“收支名稱管理、“銀行卡管理和“退出系統(tǒng)“收支類別管理下有兩個(gè)菜單一一“添加類別和“刪除類別。單擊“添加類別菜單，翻開添加類別窗體，通過(guò)收支類別名稱和收支選 擇進(jìn)展對(duì)收支類別添加。單擊“刪除類別菜單，翻開類別管理窗體可以對(duì)類別名稱進(jìn)展刪除?！笆罩Q管理，翻開窗體，可以進(jìn)展對(duì)收支類型，現(xiàn)有收支名稱進(jìn)展 整理和刪除。“銀行卡管理，翻開窗體，可以進(jìn)展對(duì)銀行卡名稱、開戶日期、開戶銀 行以及說(shuō)明的添加和修改?！巴顺鱿到y(tǒng)菜單可以退出系統(tǒng)。2 記賬日志功能：翻開記賬日志管理窗體，有兩個(gè)子菜單一一“現(xiàn)金記 賬、“銀行卡記賬。單擊“現(xiàn)金記賬菜單，翻開日常記賬出入窗體，通過(guò)對(duì)收

29、支、收支類型、 收支名稱、收支日期、金額進(jìn)展添加。單擊“銀行卡記賬菜單，都會(huì)翻開銀行卡記賬窗體，對(duì)銀行卡的選擇、 卡號(hào)、記賬日期、金額、備注進(jìn)展添加、修改。3 查詢和統(tǒng)計(jì)功能：翻開“查詢和統(tǒng)計(jì)菜單，其下有兩個(gè)一級(jí)菜單“支出情況統(tǒng)計(jì)和“收支情況比照。單擊“支出情況統(tǒng)計(jì)菜單可以按月進(jìn)展查詢或是按類型查詢。收入類型的比單擊“收支情況比對(duì)菜單，可以進(jìn)展對(duì)年份、支出類型、 對(duì)。31 / 48在本系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)的過(guò)程中主要講述了個(gè)人收支管理信息系統(tǒng)的系 統(tǒng)設(shè)計(jì)局部，包括功能模塊設(shè)計(jì)、E-R圖，數(shù)據(jù)庫(kù)構(gòu)造設(shè)計(jì)等。系統(tǒng)的詳細(xì)設(shè) 計(jì)根據(jù)系統(tǒng)分析階段的結(jié)論將系統(tǒng)具體化，并完成了各個(gè)模塊的添加、修改、 刪除與查詢

30、的功能，直到最后形成一個(gè)完整的可行性的管理系統(tǒng)。這次的畢業(yè)論文是我大學(xué)的一次非常重要的理論與實(shí)際相結(jié)合的運(yùn)用，作為一次畢業(yè)設(shè)計(jì)實(shí)踐的時(shí)機(jī)，我覺得實(shí)踐過(guò)程中是一個(gè)不斷學(xué)習(xí)、摸索的過(guò)程。 在設(shè)計(jì)和開發(fā)過(guò)程中，根據(jù)個(gè)人收支管理的特點(diǎn)，并結(jié)合應(yīng)用信息系統(tǒng)分析、 設(shè)計(jì)的思路和計(jì)算機(jī)軟件編程的方法，將課堂學(xué)習(xí)的知識(shí)和親手實(shí)踐的成果集 中地表達(dá)在了本軟件中。42 / 48參考文獻(xiàn)1瑞新等.Visual Basic 6.0?序設(shè)計(jì)教程.:電子工業(yè).20032黃梯云等.管理信息系統(tǒng).:高等教育.20003 等.Visual Basic 6.畢業(yè)設(shè)計(jì)指南與工程實(shí)踐.科學(xué).20074韜.駱娟何旭等.Visual B

31、asic 6.0據(jù)庫(kù)系統(tǒng)開發(fā)實(shí)例導(dǎo)航.:人民郵電.20025郭瑞軍.唐邦民 晗晰等.Visual Basic6.0據(jù)庫(kù)實(shí)例精粹.:電子工業(yè).20056周國(guó)民.Visual Basic 6.0+Acces數(shù)據(jù)庫(kù)工程開發(fā)指南.:中國(guó)鐵道.20047溫小敏.Visual Basic 6.0據(jù)庫(kù)系統(tǒng)工程開發(fā)實(shí)踐.:科學(xué).20058 王欽visual Basic6.（入門與提高.京:人民郵電.20029白曉勇.余健.Visual Basic課程設(shè)計(jì)案例精編.:清華大學(xué).200710譚浩強(qiáng).袁枚.薛淑斌Visual Basicg序設(shè)計(jì).：清華大學(xué).200411世峰.Visual Basic6.0S序設(shè)計(jì).

32、:中央播送電大.200312王珊.薩師煊.數(shù)據(jù)庫(kù)系統(tǒng)概論.高等教育.2006附錄：源程序代碼添加類別：Optionl.Value = False And Option2.Value = False ThenDim strl As In tegerstrl = MsgBox（"請(qǐng)選擇收支類型，否那么將默認(rèn)為-收", 4128,"收支類型必須指明”）Optio n1.Value = Trues ="收“ElseIf Optio n1.Value = True The ns ="收“ElseIf Optio n2.Value = True The n

33、s ="支“End IfIf Text_class_add.Text = "" Or Text_class_add.Text ="不超過(guò) 12字” ThenDim str2 As In tegerstr2 = MsgBox（"請(qǐng)輸入收支類型的名稱", 4128,"收支名稱必須指明"）ElseOn Error GoTo showerrorWith rst.AddNew.Fields.ltem（”收支類型 ”）.Value = Text_class_add.Text.Fields.ltem（”收支"）.Val

34、ue = s.Fields.ltem（”說(shuō)明"）.Value = Text_shuoming.Update.RequeryEnd With'顯示全部記錄List_class.Clearrst.MoveFirsti = 0Do While Not rst.EOFList_class.List（i） = rst.Fields（"收支類型"）.ValueList_shouzhi.List(i) = rst.Fields(” 收支 ”).Value rst.MoveNexti = i + 1Loop'完畢GoTo jumpshowerror: MsgBox

35、 Err.Descriptio nWith dbsIf .State = adStateOpe n The n.CloseEnd If.Conn ecti on Stri ng = App.Path & "my mon ey.mdb" .Ope nEnd WithWith rstIf .State = adStateOpe n The n.CloseEnd If.LockType = adLockOptimistic.ActiveC onnection = dbs.CursorLocati on = adUseClie nt.CursorType = adOpe n

36、Keyset.Open "收支類型表", Options:=adCmdTableEnd Withjump:End IfText_class_add.Text =""Text_shuo min g.Text =""Optio n1.Value = FalseOptio n2.Value = FalseEnd Sub修改類別：With rstIf .State = adStateOpe n Then.CloseEnd If.LockType = adLockOptimistic.ActiveC onnection = dbs.Cursor

37、Locati on = adUseClie nt.CursorType = adOpe nKeyset.Open "收支類型表", Options:=adCmdTableEnd Withrst.MoveFirstDo While Not rst.EOFIf ss = rst.Fields（” 收支類型 ”）.Value ThenIf Optio n1.Value = True The ns ="收"ElseIf Optio n2.Value = True The ns ="支“End IfIf Text_class_add.Text = &qu

38、ot;" Or Text_class_add.Text ="不超過(guò) 12 字” Then Dim str2 As In tegerstr2 = MsgBox（"請(qǐng)輸入收支類型的名稱", 4128,"收支名稱必須指明"）ElseOn Error GoTo showerrorWith rst.Fields.ltem（”收支類型"）.Value = Text_class_add.Text.Fields.ltem（”收支"）.Value = s.Fields.ltem（”說(shuō)明"）.Value = Text_shu

39、oming.Update.RequeryEnd With'顯示全部記錄List_class.Clearrst.MoveFirsti = 0Do While Not rst.EOFList_class.List(i) = rst.Fields(”收支類型 ”).Value List_shouzhi.List(i) = rst.Fields("收支").Value rst.MoveNexti = i + 1Loop'完畢showerror:GoTo jumpMsgBox Err.Descripti onWith dbsIf .State = adStateOpe

40、 n The n.CloseEnd If.Conn ecti on Stri ng = App.Path & "my mon ey.mdb".Ope nEnd WithWith rstIf .State = adStateOpe n The n.CloseEnd If.LockType = adLockOptimistic.ActiveC onnection = dbs.CursorLocati on = adUseClie nt.CursorType = adOpe nKeyset.Open "收支類型表", Options:=adCmdTab

41、leEnd Withjump:Text_class_add.Text ="" Text_shuo min g.Text ="" Optio n1.Value = False Opti on 2.Value = FalseEnd IfExit DoEnd Ifrst.MoveNextLoopman d_update.E nabled = Falseman d_class_add.E nabled = TrueEnd Sub收支類型說(shuō)明：ss = List_class.Textm = 0 '< 判斷哪條記錄被選定For i = 0 To Lis

42、t_class .L istCou nt - 1If List_class.Selected（i） = True Then m = iExit ForEnd IfNext iList_shouzhi.Selected（m） = True rst.RequeryDo While Not rst.EOFIf List_class.Text = rst.Fields（” 收支類型 ”）.Value Thenman d_class_add.E nabled = Falseman d_update.E nabled = TrueText_class_add.Text = rst.Fields（"

43、;收支類型"）If IsNull（rst.Fields（"說(shuō)明 ”）.Value） ThenLabel_shuoming.Caption ="無(wú)詳細(xì)說(shuō)明" Text_shuo min g.Text =""ElseLabel_shuoming.Caption = rst.Fields（"說(shuō)明"）.Value Text_shuoming.Text = rst.Fields（"說(shuō)明"）.Value End IfIf rst.Fields（"收支"）="收"The

44、nOptio nl.Value = TrueElseOpti on 2.Value = TrueEnd IfExit DoEnd Ifrst.MoveNextLooprst.RequeryEnd Sub銀行卡添加：With rst.AddNew.Fields(O).Value = Text_card nu m.Text.Fields(1).Value = Text_card name2.Text.Fields(2).Value = Text_ba nkn ame2.Text.Fields(3).Value = DTPicker_card2.Value.Fields(4).Value = Tex

45、t_cardmore2.Text .Update.RequeryEnd With'顯示全部記錄List_card name.Clear'rst.MoveFirsti = 0Do While Not rst.EOFList_card name.List(i) = rst.Fields(1).Value rst.MoveNexti = i + 1Loop'完畢Text_card nu m.Text =""Text_card name2.Text ="" Text_ba nkn ame2.Text ="" DTPic

46、ker_card2.Value = Date Text cardmore2.Text =""GoTo jumpshowerror: MsgBox Err.Descriptio nndatarsttable "銀行卡表"jump:End Sub銀行卡刪除：", vbYesNo,"刪除選s = MsgBox（"確定要?jiǎng)h除該卡嗎？刪除后該卡的所有收支記錄會(huì)喪失 定銀行卡”）If s = 6 The nOn Error GoTo showerror rst.Requeryrst.Move (List_card name.Listl

47、ndex)rst.Deleterst.Requery'顯示全部記錄List_card name.Clear'rst.MoveFirsti = 0Do While Not rst.EOFList_card name.List(i) = rst.Fields(1).Valuerst.MoveNexti = i + 1LoopText_card name1.Text =""Text_ba nkn ame1.Text =""DTPicker_card1.Value = DateText_cardmore1.Text =""Go

48、To jumpshowerror: MsgBox Err.Descriptio nndatarsttable "銀行卡表"jump:End IfEnd Sub支出查詢: ndata'<初始顯示當(dāng)月全部類型的支出If bo_class.Text = "" Or bo_class.Text ="全部支出類型 ” Then'所有支出類型查詢If Check_zhi_all.Value = 1 The n'所有類型，所有日期查詢sql = "select收支名稱as支知名稱，收支類型表 收支類型as工程，收支日期as支出日期, 金額，備注from收支記錄表，收支類型表 where收支記錄表.收支類型=收支類型表.收支 類型and收支='支