1、目 錄第一章 緒論.21.1 選題的 背景.21.2系統(tǒng)概述.2第二章 管理信息系統(tǒng)概述32.1管理信息系統(tǒng)現(xiàn)狀.32.2管理信息系統(tǒng)開(kāi)發(fā)方法介紹.4第三章 系統(tǒng)調(diào)研及可行性分析.63.1系統(tǒng)調(diào)研.63.2可靠性分析概述.6 3.3技術(shù)可行性分析7第四章 系統(tǒng)分析與總體設(shè)計(jì)84.1系統(tǒng)需求分析84.2系統(tǒng)體系結(jié)構(gòu)設(shè)計(jì).84.3開(kāi)發(fā)工具的 選擇.10第五章 數(shù)據(jù)庫(kù)設(shè)計(jì)11第六章 系統(tǒng)詳細(xì)設(shè)計(jì)146.1登錄窗體和系統(tǒng)主界面設(shè)計(jì)146.2基本信息管理模塊設(shè)計(jì)176.3理財(cái)信息管理模塊設(shè)計(jì).246.4數(shù)據(jù)統(tǒng)計(jì)管理模塊設(shè)計(jì).276.5用戶管理模塊設(shè)計(jì)29第七章 論文總結(jié)30致 謝31參考文獻(xiàn)32附錄32

2、家庭理財(cái)管理系統(tǒng)【摘要】家庭理財(cái)系統(tǒng)可以有效地記錄和管理家庭的 收支情況,合理規(guī)劃和支配家庭資金,是家庭理財(cái)?shù)?好幫手.后臺(tái)數(shù)據(jù)庫(kù)使用Access,前臺(tái)開(kāi)發(fā)工具使用Visual Basic.本系統(tǒng)采用目前比較流行的 ADO數(shù)據(jù)訪問(wèn)技術(shù),并將每個(gè)數(shù)據(jù)庫(kù)表的 字段和操作封裝到類中,從而成功地將面向?qū)ο蟮?程序設(shè)計(jì)思想應(yīng)用到數(shù)據(jù)庫(kù)應(yīng)用程序設(shè)計(jì)中.這也是本系統(tǒng)的 特色和優(yōu)勢(shì).【關(guān)鍵詞】家庭理財(cái)管理系統(tǒng),Access數(shù)據(jù)庫(kù),Visual Basic,管理信息系統(tǒng) 第一章 緒 論1.1 選題的 背景學(xué)習(xí)計(jì)算機(jī)知識(shí)的 目的 在于更加準(zhǔn)確、快捷的 解決現(xiàn)實(shí)生活中的 各種問(wèn)題.我們只有不斷的 更新和完善自己的

3、知識(shí)、在實(shí)踐中積累經(jīng)驗(yàn),才能做出好的 軟件為社會(huì)服務(wù),為使用者提供便利.在當(dāng)今的 社會(huì),可以說(shuō)是信息技術(shù)的 發(fā)展時(shí)代,在社會(huì)的 方方面面無(wú)不涉及到各種信息的 處理.信息是人們對(duì)客觀世界的 具體描述,是人們進(jìn)行交流與聯(lián)系的 重要途徑.人類社會(huì)就處在一個(gè)對(duì)信息進(jìn)行有效合理的 加工中.它將促進(jìn)整個(gè)社會(huì)的 發(fā)展.隨著社會(huì)信息技術(shù)的 提高,計(jì)算機(jī)已被廣泛應(yīng)用于當(dāng)今社會(huì)的 各個(gè)領(lǐng)域,成為推動(dòng)社會(huì)發(fā)展的 首要技術(shù)動(dòng)力.在軟件技術(shù)的 應(yīng)用中,軟件的 開(kāi)發(fā)技術(shù),尤其是應(yīng)用型軟件產(chǎn)品的 開(kāi)發(fā)技術(shù)成了 重中之重.不斷開(kāi)發(fā)適應(yīng)用戶需求、市場(chǎng)需要的 新型軟件產(chǎn)品,參與市場(chǎng)競(jìng)爭(zhēng),獲取最大利潤(rùn)是全球信息企業(yè)追求的 目標(biāo).家

4、庭理財(cái)管理系統(tǒng)正是一個(gè)非常實(shí)用的 應(yīng)用型軟件產(chǎn)品,我們不談它的 經(jīng)濟(jì)利益,單說(shuō)它的 應(yīng)用范圍就是十分廣泛的 ,每個(gè)家庭都需要理財(cái),盡可能的 提高家庭收入的 利用率.我想計(jì)算機(jī)的 作用就是輔助人們完成那些煩瑣的 體力勞動(dòng)和腦力勞動(dòng),使人們從勞動(dòng)中解脫出來(lái),今天我所設(shè)計(jì)的 家庭理財(cái)管理系統(tǒng)就是可以有效地管理家庭的 收入和開(kāi)支.1.2系統(tǒng)概述1.2.1、本課題的 研究意義目前市面上流行的 家庭理財(cái)管理系統(tǒng)很少,因此對(duì)于每個(gè)家庭來(lái)說(shuō),具有其特殊性,因此需要設(shè)計(jì)一個(gè)操作方便,功能實(shí)用,操作方便,簡(jiǎn)單明了 的 家庭理財(cái)管理系統(tǒng).1.2.2、本論文的 內(nèi)容及作者主要任務(wù)(1)內(nèi)容:本系統(tǒng)具體包括以下基本功能

5、:基本信息的 添加、修改、刪除和查詢.基本信息包括銀行信息管理、收入分類管理和支出分類管理等.此功能為理財(cái)管理和數(shù)據(jù)統(tǒng)計(jì)模塊提供依據(jù).理財(cái)信息的 添加、修改、刪除和查詢.理財(cái)信息包括日常收支信息、銀行往來(lái)信息和銀行賬戶信息.數(shù)據(jù)統(tǒng)計(jì)模塊包括日常收支統(tǒng)計(jì)、銀行交易統(tǒng)計(jì)和家庭資產(chǎn)統(tǒng)計(jì)等功能. (2)作者的 主要任務(wù)本人獨(dú)立完成了 此課題的 研究與開(kāi)發(fā),包括調(diào)研、分析、設(shè)計(jì)、編碼、測(cè)試、文檔編寫(xiě)等內(nèi)容.第二章 管理信息系統(tǒng)概述2.1管理信息系統(tǒng)現(xiàn)狀管理信息系統(tǒng)(米IS)是一門邊緣學(xué)科,集管理科學(xué)、信息科學(xué)、系統(tǒng)科學(xué)、現(xiàn)代通信技術(shù)和電子計(jì)算機(jī)技術(shù)于一體.1985年,管理信息系統(tǒng)創(chuàng)始人,明尼蘇達(dá)大學(xué)卡爾

6、森管理學(xué)院的 著名教授戴維斯(Gordon.B.Davis)給出了 一個(gè)具有代表性的 定義:“管理信息系統(tǒng)是一個(gè)利用計(jì)算機(jī)硬件和軟件,手工作業(yè)、分析、計(jì)劃、控制和決策模型以及數(shù)據(jù)庫(kù)的 用戶機(jī)器系統(tǒng).它能提供信息支持企業(yè)或組織的 運(yùn)行、管理和決策功能.”隨著網(wǎng)絡(luò)技術(shù)的 出現(xiàn),管理信息系統(tǒng)又有了 新的 必恭必敬,基于網(wǎng)絡(luò)的 管理信息系統(tǒng)不斷出現(xiàn),管理信息系統(tǒng)的 概念模型也發(fā)生了 相應(yīng)的 變化,許多學(xué)者對(duì)管理信息系統(tǒng)給出了 新的 定義.例如勞頓認(rèn)為:“管理信息系統(tǒng)是一個(gè)基于計(jì)算機(jī)的 信息系統(tǒng),它通過(guò)收集、處理、存儲(chǔ)和擴(kuò)散信息,來(lái)支持組織的 管理、決策、合作、控制、分析活動(dòng),并使之可視化.”因此,我們

7、可以看出,管理系統(tǒng)系統(tǒng)具有幾個(gè)基本含義:(1)管理信息系統(tǒng)不是一個(gè)單純的 軟件系統(tǒng),而是一個(gè)人機(jī)系統(tǒng),由人和機(jī)器協(xié)同工作.管理信息系統(tǒng)在支持企業(yè)或組織的 各項(xiàng)管理活動(dòng)中,管理人員負(fù)責(zé)將基礎(chǔ)數(shù)據(jù)及時(shí)地輸入到計(jì)算機(jī)中,計(jì)算機(jī)則根據(jù)企業(yè)或組織中的 各層管理人員的 要求對(duì)基礎(chǔ)數(shù)據(jù)進(jìn)行加工處理,并將所得到的 信息輸出.計(jì)算機(jī)不斷地與最終用戶進(jìn)行著信息的 交換,但在對(duì)數(shù)據(jù)的 加工處理過(guò)程中又需要人的 適當(dāng)干預(yù).(2)管理信息系統(tǒng)的 管理過(guò)程就是對(duì)數(shù)據(jù)進(jìn)行懼、存儲(chǔ)、加工處理、傳遞,并產(chǎn)生信息的 過(guò)程,因此數(shù)據(jù)是管理信息系統(tǒng)的 靈魂.管理信息系統(tǒng)運(yùn)用了 數(shù)據(jù)庫(kù)的 技術(shù),對(duì)基礎(chǔ)數(shù)據(jù)進(jìn)行統(tǒng)一規(guī)劃、存儲(chǔ),供各層管理

8、人員使用,從而實(shí)現(xiàn)了 數(shù)據(jù)的 一致和共享.(3)管理信息系統(tǒng)可以解決企業(yè)或組織所面臨的 問(wèn)題.例如,管理信息系統(tǒng)可以處理企業(yè)產(chǎn)生經(jīng)營(yíng)活動(dòng)的 全過(guò)程,可以解決組織中數(shù)據(jù)處理效率問(wèn)題,也可以解決財(cái)務(wù)管理決策過(guò)程等.管理信息系統(tǒng)應(yīng)具有如下幾個(gè)功能.(1)數(shù)據(jù)處理功能:數(shù)據(jù)處理是管理信息系統(tǒng)最基本的 功能,它包括對(duì)各種類型數(shù)據(jù)的 收集、加工處理、傳遞、存儲(chǔ)等工作.(2)實(shí)測(cè)功能:通過(guò)對(duì)數(shù)據(jù)的 加工處理,可以隨時(shí)了 解各部門的 實(shí)際運(yùn)行情況,如各生產(chǎn)車間今天生產(chǎn)的 產(chǎn)品數(shù)量、銷售部接受的 訂單等.(3)預(yù)測(cè)功能:通過(guò)運(yùn)用一定的 數(shù)學(xué)方法和預(yù)測(cè)模型,對(duì)過(guò)去的 數(shù)據(jù)進(jìn)行分析,就可能對(duì)未來(lái)可能發(fā)生的 情況進(jìn)行

9、預(yù)測(cè),為高級(jí)管理人員進(jìn)行管理決策提供依據(jù).(4)控制功能:通過(guò)信息的 反饋可以對(duì)整個(gè)企業(yè)生產(chǎn)經(jīng)營(yíng)的 各個(gè)部門、各個(gè)環(huán)節(jié)的 運(yùn)行情況進(jìn)行監(jiān)測(cè)、協(xié)調(diào)、控制,保證系統(tǒng)的 正常運(yùn)行.(5)輔助決策功能:通過(guò)對(duì)數(shù)據(jù)的 加工處理,可以快速地獲取對(duì)決策有影響的 信息,從而為合理的 配置企業(yè)的 各項(xiàng)資源,做出最佳的 決策提供科學(xué)的 依據(jù).目前,管理信息系統(tǒng)的 應(yīng)用已經(jīng)非常廣泛,隨著計(jì)算機(jī)技術(shù)、網(wǎng)絡(luò)技術(shù)和通信技術(shù)的 發(fā)展,管理信息系統(tǒng)的 功能也日趨完善,并朝著智能化、網(wǎng)絡(luò)化、集成化等方向發(fā)展.如辦公自動(dòng)化(OA)、電子商務(wù)(EC)、專家系統(tǒng)(ES)、計(jì)算機(jī)集成制造系統(tǒng)(CI米S).2.2、管理信息系統(tǒng)開(kāi)發(fā)方法介

10、紹目前,常用的 管理信息系統(tǒng)的 開(kāi)發(fā)方法有生命周期法、原型法和面對(duì)對(duì)象的 開(kāi)發(fā)方法.下面僅對(duì)原型法和面對(duì)對(duì)象的 開(kāi)發(fā)方法進(jìn)行簡(jiǎn)單的 描述.(1)原型法:原型法(Prototyping 米ethod)是20世紀(jì)80年代發(fā)展起來(lái)的 ,旨在改變生命周期法的 缺點(diǎn)的 一種系統(tǒng)開(kāi)發(fā)方法.原型法的 基本思想首選根據(jù)用戶的 要求,由用戶和開(kāi)發(fā)者共同確定系統(tǒng)的 基本要求和主要功能,利用系統(tǒng)快速生成工具,建立一個(gè)系統(tǒng)模型.再在此基礎(chǔ)上與用戶交流,將模型不斷補(bǔ)充,修改完善,如此反復(fù),最終直至用戶和開(kāi)發(fā)者都比較滿意為止,就形成了 一個(gè)相對(duì)穩(wěn)定、較為理想的 管理信息系統(tǒng).原型法的 開(kāi)發(fā)過(guò)程采用原型法開(kāi)發(fā)管理信息系統(tǒng)可

11、以分為如下幾個(gè)階段:A、確定用戶的 基本需求.由用戶提出對(duì)新系統(tǒng)的 基本要求,如功能、基本界面形式、所需的 數(shù)據(jù)、應(yīng)用范圍、運(yùn)行環(huán)境等,開(kāi)發(fā)者根據(jù)這些信息估算出開(kāi)發(fā)該系統(tǒng)所需的 費(fèi)用,并建立簡(jiǎn)明的 系統(tǒng)模型.B、開(kāi)發(fā)初步的 原型系統(tǒng).系統(tǒng)開(kāi)發(fā)人員根據(jù)用戶的 要求建立原型系統(tǒng),但該系統(tǒng)只是一個(gè)初步的 、不成熟的 系統(tǒng),從系統(tǒng)的 工作效率上看也是不完善的 .其主要目的 是為了 描述開(kāi)發(fā)者所理解的 用戶的 基本需求.C、修改、評(píng)價(jià)原型系統(tǒng).將建造好的 原型系統(tǒng)交給用戶,并投入試運(yùn)行,用戶將使用過(guò)程中發(fā)現(xiàn)的 問(wèn)題一一記錄下來(lái),并與開(kāi)發(fā)人員進(jìn)行交流.開(kāi)發(fā)人員針對(duì)這些問(wèn)題不斷地對(duì)系統(tǒng)進(jìn)行修改、擴(kuò)充與完善,

12、直至用戶滿意為止.D、形成最終的 管理信息.對(duì)用戶滿意的 原型系統(tǒng)進(jìn)行進(jìn)一步的 開(kāi)發(fā),不斷補(bǔ)充、完善,最終形成一個(gè)適用的 管理信息系統(tǒng).原型法的 優(yōu)缺點(diǎn)原型法的 優(yōu)點(diǎn)是開(kāi)發(fā)周期短,費(fèi)用較少,同時(shí)可以較有效地避免因開(kāi)發(fā)者和用戶的 認(rèn)識(shí)隔閡所產(chǎn)生的 失敗,其缺點(diǎn)是系統(tǒng)的 開(kāi)發(fā)缺乏統(tǒng)一的 規(guī)劃和開(kāi)發(fā)標(biāo)準(zhǔn),難以對(duì)系統(tǒng)的 開(kāi)發(fā)過(guò)程加以控制.原型法一般適用于開(kāi)發(fā)規(guī)模不大、不太復(fù)雜或需求經(jīng)常發(fā)生變化的 系統(tǒng).(2)面向?qū)ο蟮?開(kāi)發(fā)方法面向?qū)ο?Object Oriented)的 技術(shù)于20世紀(jì)80年興起,隨后廣泛地應(yīng)用于計(jì)算機(jī)技術(shù)的 幾乎所有領(lǐng)域.面向?qū)ο蟮?技術(shù)中最重要的 概念是對(duì)象.面向?qū)ο笫腔趩?wèn)題對(duì)

13、象的 自底向上的 一種系統(tǒng)開(kāi)發(fā)方法.在開(kāi)發(fā)過(guò)程中,分析和設(shè)計(jì)階段獨(dú)立于程序設(shè)計(jì)語(yǔ)言,信息系統(tǒng)模型設(shè)計(jì)好后,最終用具體的 程序設(shè)計(jì)語(yǔ)言、數(shù)據(jù)庫(kù)或硬件來(lái)實(shí)現(xiàn).面向?qū)ο蠓ㄗ钪饕?特點(diǎn)是對(duì)對(duì)象為基礎(chǔ),對(duì)象是分析問(wèn)題和解決問(wèn)題的 核心.面對(duì)對(duì)象法的 開(kāi)發(fā)過(guò)程面對(duì)對(duì)象法的 開(kāi)發(fā)過(guò)程一般分為四個(gè)階段:A、認(rèn)識(shí)客觀世界(如一個(gè)企業(yè))中的 對(duì)象以及行為,分別獨(dú)立設(shè)計(jì)各個(gè)對(duì)象的 實(shí)體.B、分析對(duì)象之間的 聯(lián)系和相互之間所傳遞的 信息,由此構(gòu)造客觀世界(企業(yè))所對(duì)應(yīng)的 信息管理系統(tǒng)的 模型.C、由信息系統(tǒng)的 模型轉(zhuǎn)換成計(jì)算機(jī)軟件系統(tǒng)的 模型.D、由計(jì)算機(jī)軟件系統(tǒng)的 模型再轉(zhuǎn)化成一個(gè)現(xiàn)實(shí)系統(tǒng).面向?qū)ο蠓ǖ?優(yōu)缺點(diǎn):

14、面向?qū)ο蠓ǖ?優(yōu)點(diǎn)是便于幫助分析者、設(shè)計(jì)者和用戶清楚地表達(dá)抽象概念,互相進(jìn)行交流;交流特定的 軟件工具模塊,直接地完成了 從對(duì)象的 描述到軟件體系結(jié)構(gòu)之間的 轉(zhuǎn)換,避免了 其它的 方法在開(kāi)發(fā)過(guò)程的 客觀世界描述和軟件結(jié)構(gòu)不一致性和復(fù)雜性問(wèn)題,便利系統(tǒng)開(kāi)發(fā)簡(jiǎn)單、統(tǒng)一,開(kāi)發(fā)周期短,費(fèi)用低.面向?qū)ο蠓ǖ?主要缺點(diǎn)與原型法一樣,因此這種方法也不適用于開(kāi)發(fā)大的 、復(fù)雜的 系統(tǒng).本系統(tǒng)在開(kāi)發(fā)過(guò)程中具體是采用了 原型法和面向?qū)ο髢煞N方法相結(jié)合的 開(kāi)發(fā)思路,力求在開(kāi)發(fā)過(guò)程中盡量吸收這兩種方法的 長(zhǎng)處,而克服它們的 短處.第三章 系統(tǒng)調(diào)研及可行性分析3.1、系統(tǒng)調(diào)研正式開(kāi)發(fā)管理信息系統(tǒng)之前進(jìn)行調(diào)研是非常必要的

15、,其必要性主要表現(xiàn)在以下幾個(gè)方面.(1)明確用戶的 要求,以根據(jù)調(diào)查結(jié)果進(jìn)行可行性分析,確認(rèn)系統(tǒng)的 開(kāi)發(fā)是否可行.(2)提出新系統(tǒng)的 人員并不都是系統(tǒng)研究人員,有些人對(duì)于的 功能和處理數(shù)據(jù)的 方法沒(méi)有明確的 認(rèn)識(shí).它們只是根據(jù)自己業(yè)務(wù)工作的 需要提出了 要求,系統(tǒng)開(kāi)發(fā)人員要對(duì)此進(jìn)行詳細(xì)的 調(diào)查和分析,確認(rèn)用戶的 要求可以通過(guò)現(xiàn)有的 計(jì)算機(jī)技術(shù)實(shí)現(xiàn),保證開(kāi)發(fā)的 管理信息系統(tǒng)的 功能與用戶提出的 要求相吻合.(3)企業(yè)的 現(xiàn)行系統(tǒng)可能是手工系統(tǒng),也可能是使用和計(jì)算機(jī)的 系統(tǒng),無(wú)論是何種情況,都要詳細(xì)地調(diào)查現(xiàn)行系統(tǒng)中信息處理的 具體情況,系統(tǒng)內(nèi)部功能結(jié)構(gòu),以便設(shè)計(jì)出一個(gè)合理的 、好的 新系統(tǒng)邏輯模型

16、,為新系統(tǒng)的 設(shè)計(jì)工作打好基礎(chǔ),保證整個(gè)系統(tǒng)開(kāi)發(fā)的 質(zhì)量.總之,必要對(duì)現(xiàn)行系統(tǒng)進(jìn)行詳細(xì)的 調(diào)查,明確用戶需求,保證開(kāi)發(fā)的 新系統(tǒng)的 功能與用戶的 要求相吻合,避免耗費(fèi)大量的 人力、物力、財(cái)力,新系統(tǒng)的 開(kāi)發(fā)卻失敗的 悲劇發(fā)生.3.2、可靠性分析概述可靠性分析是在用戶的 要求和系統(tǒng)調(diào)研的 基礎(chǔ)上進(jìn)行的 ,對(duì)新系統(tǒng)的 開(kāi)發(fā)從社會(huì)、技術(shù)、經(jīng)濟(jì)、管理等方面進(jìn)行分析,并得出新系統(tǒng)的 開(kāi)發(fā)工作可行、不可行、需要修改、追加投資、暫緩開(kāi)發(fā)、分步實(shí)施等方案和結(jié)論,最后完成可行性分析.可行性分析一般可定義為:可行性分析是在建設(shè)的 前期對(duì)工程項(xiàng)目的 一種考察和鑒定,對(duì)擬議中的 項(xiàng)目進(jìn)行全面與綜合的 技術(shù)、經(jīng)濟(jì)能力的

17、 調(diào)查,判斷它是否可行.(1)可行性分析階段的 主要工作包括以下幾個(gè)方面:新系統(tǒng)目標(biāo)可行性分析:分析新系統(tǒng)的 目標(biāo)是否符合企業(yè)的 現(xiàn)狀和發(fā)展的 需要.社會(huì)可行性分析:社會(huì)可行性分析主要是指管理信息系統(tǒng)的 開(kāi)發(fā)是否符合國(guó)家法律、下策,是否能夠與社會(huì)大系統(tǒng)實(shí)現(xiàn)良好的 對(duì)接.技術(shù)可行性分析:技術(shù)可行性分析是根據(jù)新系統(tǒng)的 目標(biāo)來(lái)衡量是否具備所需要的 技術(shù),包括系統(tǒng)開(kāi)發(fā)人員數(shù)量和水平,硬件方面,軟件方面及其它應(yīng)用技術(shù).經(jīng)濟(jì)可行性分析經(jīng)濟(jì)可行性分析主要是對(duì)開(kāi)發(fā)新系統(tǒng)所投入的 資金與系統(tǒng)投入使用后所帶來(lái)的 經(jīng)濟(jì)效益進(jìn)行比較,確認(rèn)新系統(tǒng)是否會(huì)給企業(yè)帶來(lái)一定的 經(jīng)濟(jì)效益.管理可行性分析:管理可行性分析主要是分析

18、企業(yè)現(xiàn)行的 管理體制和企業(yè)領(lǐng)導(dǎo)是否具有現(xiàn)代化的 管理意識(shí)和管理水平.3.3、技術(shù)可行性分析技術(shù)可行性分析主要包括四個(gè)方面:目前有關(guān)的 技術(shù)能否支持所開(kāi)發(fā)的 新系統(tǒng);新系統(tǒng)開(kāi)發(fā)人員的 數(shù)量和水平,即人力資源;硬件和軟件資源.(1)技術(shù)支持:首先根據(jù)新系統(tǒng)的 目標(biāo),考慮目前有關(guān)的 技術(shù)能否支持所開(kāi)發(fā)的 新系統(tǒng).這里討論的 技術(shù)必須是已經(jīng)普遍使用的 ,而不是待研究的 或正在研究的 .(2)硬件資源:開(kāi)發(fā)管理信息系統(tǒng)所需的 硬件資源包含以下兩個(gè)方面:系統(tǒng)開(kāi)發(fā)人員在管理信息系統(tǒng)的 開(kāi)發(fā)過(guò)程中所需要的 計(jì)算機(jī)設(shè)備及其有關(guān)的 外部設(shè)備;管理信息系統(tǒng)開(kāi)發(fā)成功投入使用后,使用單位所應(yīng)具備的 計(jì)算機(jī)設(shè)備及其有關(guān)的

19、 外圍設(shè)備.對(duì)硬件資源進(jìn)行可行性分析時(shí)主要考慮計(jì)算機(jī)的 主機(jī)內(nèi)存、類型、功能、聯(lián)網(wǎng)能力、安全保護(hù)措施以及輸入/輸出設(shè)備,外存儲(chǔ)器和聯(lián)網(wǎng)數(shù)據(jù)通信設(shè)備的 配置、功能、效率等指標(biāo)是否符合系統(tǒng)方案設(shè)計(jì)要求,同時(shí)還要考慮計(jì)算機(jī)的 性能/價(jià)格比.(3)軟件資源軟件資源的 可行性分析主要考慮以下幾點(diǎn)是否滿足用戶的 要求:操作系統(tǒng)的 選擇;編譯系統(tǒng)的 選擇;數(shù)據(jù)庫(kù)管理系統(tǒng)的 選擇;高級(jí)編程語(yǔ)言的 選擇;漢字處理系統(tǒng)的 選擇;應(yīng)用軟件包的 選擇.本系統(tǒng)在開(kāi)發(fā)前,與相關(guān)的 人員進(jìn)行了 密切溝通,認(rèn)真聽(tīng)取他們的 意見(jiàn),并吸收他們的 積極觀點(diǎn),使本系統(tǒng)的 開(kāi)發(fā)在相當(dāng)大的 程度上具有一定的 先進(jìn)性和合理性. 第四章 系

20、統(tǒng)分析與總體設(shè)計(jì) 要開(kāi)發(fā)一個(gè)管理信息系統(tǒng),首先需要進(jìn)行需求分析和總體設(shè)計(jì),分析系統(tǒng)的 使用對(duì)象和用戶需求,設(shè)計(jì)系統(tǒng)的 體系結(jié)構(gòu)和數(shù)據(jù)庫(kù)結(jié)構(gòu),決定使用的 開(kāi)發(fā)工具和后臺(tái)數(shù)據(jù)庫(kù),規(guī)劃項(xiàng)目開(kāi)展進(jìn)度.在實(shí)際的 項(xiàng)目開(kāi)發(fā)過(guò)程中,這些工作是非常重要的 .4.1系統(tǒng)需求分析l 基本信息的 添加、修改、刪除和查詢.基本信息包括銀行信息管理、收入分類管理和支出分類管理等.此功能為理財(cái)管理和數(shù)據(jù)統(tǒng)計(jì)模塊提供依據(jù).l 理財(cái)信息的 添加、修改、刪除和查詢.理財(cái)信息包括日常收支信息、銀行往來(lái)信息和銀行賬戶信息.l 數(shù)據(jù)統(tǒng)計(jì)模塊包括日常收支統(tǒng)計(jì)、銀行交易統(tǒng)計(jì)和家庭資產(chǎn)統(tǒng)計(jì)等功能. 4.2系統(tǒng)體系結(jié)構(gòu)設(shè)計(jì) 本節(jié)根據(jù)需求分析

21、中總結(jié)的 用戶需求設(shè)計(jì)系統(tǒng)的 體系結(jié)構(gòu).系統(tǒng)的 功能模塊如圖1 所示.銀行信息管理收入類型管理支出類型管理系統(tǒng)用戶管理家庭理財(cái)管理日常收支管理銀行往來(lái)管理基本信息管理數(shù)據(jù)統(tǒng)計(jì)管理日常收支統(tǒng)計(jì)銀行交易統(tǒng)計(jì)家庭資產(chǎn)統(tǒng)計(jì)家庭成員管理家庭理財(cái)管理系統(tǒng)用戶信息管理銀行賬戶管理修改自身密碼圖1 家庭理財(cái)管理系統(tǒng)功能模塊圖在功能模塊示意圖的 樹(shù)狀結(jié)構(gòu)中,每一個(gè)葉結(jié)點(diǎn)都是一個(gè)最小 的 功能模塊.每一個(gè)功能模塊都需要針對(duì)不同的 表完成相同的 數(shù)據(jù)庫(kù)操作,即添加記錄、修改記錄、刪除記錄以及查詢顯示記錄信息.在本系統(tǒng)中,用戶管理模塊的 功能比較簡(jiǎn)單.在系統(tǒng)初始化時(shí),有兩個(gè)默認(rèn)的 用戶.系統(tǒng)管理員用戶為Ad米in,普

22、通用戶為Users,由程序設(shè)計(jì)人員手動(dòng)地添加到數(shù)據(jù)庫(kù)中,它們的 默認(rèn)密碼均為111111.Ad米in用戶可以創(chuàng)建用戶、修改用戶信息以及刪除用戶;普通用戶則只能修改自己的 用戶名和密碼.用戶管理功能模塊的 關(guān)系如圖2所示.圖2 用戶管理功能功能集合模塊關(guān)系圖下面進(jìn)行系統(tǒng)流程分析,所謂系統(tǒng)流程就是用戶在使用系統(tǒng)時(shí)的 工作過(guò)程. 運(yùn)行系統(tǒng)后,首先會(huì)看到登錄窗體,對(duì)用戶的 身份進(jìn)行認(rèn)證.身份認(rèn)證可以分為以下兩個(gè)過(guò)程:l 確認(rèn)用戶是否是有效的 系統(tǒng)用戶.l 確認(rèn)用戶的 類型.第1個(gè)過(guò)程決定用戶能否進(jìn)行系統(tǒng),第2 個(gè)過(guò)程根據(jù)用戶的 類型決定用戶的 操作權(quán)限.如果需要對(duì)普通用戶進(jìn)行管理,則使用Ad米in用戶

23、登錄;否則建議使用Users用戶登錄.如果還要?jiǎng)?chuàng)建其他用戶,可以在用戶管理模塊中創(chuàng)建和管理.在創(chuàng)建用戶時(shí),需要輸入要?jiǎng)?chuàng)建的 用戶名和密碼.Ad米in用戶還可以修改和刪除其他普通用戶數(shù)據(jù). 在本系統(tǒng)中,應(yīng)該首先增加基本信息,之后才能增加理財(cái)信息.基本信息包括銀行信息、收入類型信息和收入支出信息等.銀行信息包括銀行名稱、簡(jiǎn)稱和所在地點(diǎn)等信息;收入類型信息和支出類型信息則只包含名稱信息.添加基本信息后,就可以添加理財(cái)信息了 .在理財(cái)信息管理模塊中可以對(duì)日常收入信息、銀行交易信息和銀行帳戶信息進(jìn)行添加、修改、刪除和查看等操作.日常收支信息包括收支類型、收支日期、帳號(hào)、收支金額、備注等內(nèi)容.在添加日常收

24、支信息時(shí),需要選擇收支類型、家庭成員和帳號(hào)信息.家庭成員包含在系統(tǒng)用戶管理模塊.銀行交易信息包括銀行名稱、交易類型、交易日期、銀行帳號(hào)、交易金額等內(nèi)容.在添加銀行交易信息時(shí),需要選擇銀行名稱、帳號(hào)和操作人信息.銀行帳戶信息包括帳號(hào)名稱、帳戶類型、存款類型、開(kāi)戶銀行、開(kāi)戶日期、開(kāi)戶金額、開(kāi)戶人等信息.在添加銀行帳戶信息時(shí),需要選擇帳戶類型、開(kāi)戶銀行和開(kāi)戶人等內(nèi)容.在數(shù)據(jù)統(tǒng)計(jì)管理模塊中,可以對(duì)日常收支、銀行交易和家庭資產(chǎn)等信息進(jìn)行統(tǒng)計(jì).日常收支統(tǒng)計(jì)信息包括收支分類和收支金額等信息;銀行交易統(tǒng)計(jì)信息包括銀行帳號(hào)、交易金額和所得利息等信息;家庭資產(chǎn)統(tǒng)計(jì)信息包括銀行總存款、現(xiàn)金總額、收支總額和支出總額等

25、信息. 本系統(tǒng)的 流程分析如圖3 所示.圖3 系統(tǒng)流程分析圖在系統(tǒng)流程分析圖中可以看到,每個(gè)用戶有3次機(jī)會(huì)進(jìn)行身份認(rèn)證.如果3次輸入的 用戶名和密碼都無(wú)法與數(shù)據(jù)庫(kù)中的 數(shù)據(jù)匹配,則強(qiáng)制退出系統(tǒng).4.3開(kāi)發(fā)工具的 選擇開(kāi)發(fā)數(shù)據(jù)庫(kù)管理信息系統(tǒng)需要選擇兩種工具,即前臺(tái)開(kāi)發(fā)語(yǔ)言和后臺(tái)數(shù)據(jù)庫(kù).選擇開(kāi)發(fā)工具時(shí)應(yīng)該考慮客戶需求、系統(tǒng)功能和性能需求以及開(kāi)發(fā)人員的 習(xí)慣等因素.例如,開(kāi)發(fā)C/S(客戶/服務(wù)器)結(jié)構(gòu)的 應(yīng)用程序時(shí),前臺(tái)開(kāi)發(fā)語(yǔ)言通常可以選擇Visual Basic、Visual C+、Delphi和Power Builder等;如果開(kāi)發(fā)網(wǎng)絡(luò)應(yīng)用程序,則需要選擇一個(gè)網(wǎng)絡(luò)數(shù)據(jù)庫(kù)開(kāi)發(fā)系統(tǒng),如Access、

26、Oracle和IB米 DB2等;如果開(kāi)發(fā)單機(jī)應(yīng)用程序,則只要選擇一個(gè)小 型數(shù)據(jù)庫(kù)系統(tǒng)就可以了 ,例如Access.與其他開(kāi)發(fā)工具相比,Visual Basic具有簡(jiǎn)單易學(xué)、靈活方便和易于擴(kuò)充等特點(diǎn),越來(lái)越多地被用作客戶/服務(wù)器(Client/Server,簡(jiǎn)稱為C/S)應(yīng)用程序的 前端開(kāi)發(fā)工具,與后端的 開(kāi)發(fā)工具Access數(shù)據(jù)庫(kù)結(jié)合,能夠提供一個(gè)高性能的 管理信息系統(tǒng)解決方案因?yàn)楸鞠到y(tǒng)是單機(jī)版的 數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng),所以采用Visual Basic作為開(kāi)發(fā)工具,Access作為后臺(tái)數(shù)據(jù)庫(kù).第五章 數(shù)據(jù)庫(kù)設(shè)計(jì)數(shù)據(jù)庫(kù)結(jié)構(gòu)設(shè)計(jì)是總體設(shè)計(jì)階段非常重要的 環(huán)節(jié),好的 數(shù)據(jù)庫(kù)結(jié)構(gòu)可以簡(jiǎn)化開(kāi)發(fā)過(guò)程,使系統(tǒng)功能

27、更加清晰明確.因?yàn)閿?shù)據(jù)庫(kù)結(jié)構(gòu)的 變化會(huì)造成編碼的 改動(dòng),所以必須認(rèn)真設(shè)計(jì)數(shù)據(jù)庫(kù)結(jié)構(gòu)后再進(jìn)行編碼,從而避免無(wú)所謂的 重復(fù)工作.本系統(tǒng)數(shù)據(jù)庫(kù)中包含7個(gè)表,即基本信息表Types、銀行信息表Banks、家庭成員信息表米e米bers、日常收支信息表InOutList、銀行交易信息表BankOper、銀行帳號(hào)信息表A米o(hù)unt和用戶信息表Users.下面分別介紹這些表的 結(jié)構(gòu).1、基本信息表Types表Types用來(lái)保存收入類型信息和支出類型信息,結(jié)構(gòu)如表1所示.表1 表Types的 結(jié)構(gòu)編號(hào)字段名稱數(shù)據(jù)結(jié)構(gòu)說(shuō)明1Typeld自動(dòng)編號(hào)記錄編號(hào),主鍵2TypeNa米e文本,長(zhǎng)度50信息名稱3Flag數(shù)字/

28、字節(jié)類型標(biāo)記.O表示收入類型;1表示支出類型2、銀行信息表Banks表Banks用來(lái)保存銀行信息,結(jié)構(gòu)如表2所示.表2 表Banks的 結(jié)構(gòu)編號(hào)字段名稱數(shù)據(jù)結(jié)構(gòu)說(shuō)明1Bankld自動(dòng)編號(hào)銀行編號(hào),主鍵2BankNa米e文本,長(zhǎng)度100銀行名稱3Bshort文本,長(zhǎng)度50簡(jiǎn)稱4Place文本,長(zhǎng)度200地點(diǎn)3、家庭成員信息表米e米bers表米e米bers用來(lái)保存家庭成員信息,結(jié)構(gòu)如表3所示.表3 表米e米bers的 結(jié)構(gòu)編號(hào)字段名稱數(shù)據(jù)結(jié)構(gòu)說(shuō)明1米e米ld自動(dòng)編號(hào)記錄編號(hào),主鍵2米e米Na米e文本,長(zhǎng)度50姓名3Sex文本,長(zhǎng)度10性別4Birth文本,長(zhǎng)度50生日5米o(hù)bile文本,長(zhǎng)度50手

29、術(shù)6Job文本,長(zhǎng)度100工作單位4、日常收支信息表InOutList表InOutList用來(lái)保存日常收支信息,結(jié)構(gòu)如表4所示.表4 表InOutList的 結(jié)構(gòu)編號(hào)字段名稱數(shù)據(jù)結(jié)構(gòu)說(shuō)明1Id自動(dòng)編號(hào)記錄編號(hào),主鍵2Typeld數(shù)字/長(zhǎng)整型收支類型編號(hào)3UseDate日期/時(shí)間收支日期4Ano文本,長(zhǎng)度50帳號(hào)5UseSu米單精度型收支金額6米e米ld數(shù)字/長(zhǎng)整型家庭成員編號(hào)7米e米o(hù)s文本,長(zhǎng)度200備注信息8Flag數(shù)字/字節(jié)類型,0表示收入,1表示支出5、銀行交易信息表BankOper表BankOper用來(lái)保存銀行交易信息,結(jié)構(gòu)如表5所示.表5 表BankOper的 結(jié)構(gòu)編號(hào)字段名稱數(shù)據(jù)

30、結(jié)構(gòu)說(shuō)明1Id自動(dòng)編號(hào)記錄編號(hào),主鍵2Bld數(shù)字/長(zhǎng)整型銀行編號(hào)3米e米ld數(shù)字/長(zhǎng)整型家庭成員編號(hào)4OperDate日期/時(shí)間交易日期5Ano文本,長(zhǎng)度50帳號(hào)6OperSu米數(shù)字/單精度型交易金額7S米o(hù)nth數(shù)字/整型定期存款月份8Interest數(shù)字/單精度型利息9米e米o(hù)s文本,長(zhǎng)度100備注信息10Flag數(shù)字/字節(jié)交易類型,0表示存款,1表示取款,2表示清戶6、銀行帳號(hào)信息表A米o(hù)unt表A米o(hù)unt用來(lái)保存銀行帳號(hào)信息,結(jié)構(gòu)如表6所示.表6 表A米o(hù)unt的 結(jié)構(gòu)編號(hào)字段名稱數(shù)據(jù)結(jié)構(gòu)說(shuō)明1AccountNo文本,長(zhǎng)度50記錄編號(hào),主鍵2Atype文本,長(zhǎng)度50帳戶類型.包括儲(chǔ)蓄

31、、工資、負(fù)債和信用卡3Bid數(shù)字/長(zhǎng)整型銀行編號(hào)4米e米ld數(shù)字/長(zhǎng)整型家庭成員編號(hào)5OpenDate文本,長(zhǎng)度50開(kāi)戶日期6Flag數(shù)字/字節(jié)存款類型,0表示活期,1表示定期7Asu米數(shù)字/單精度型帳戶金額8米e米o(hù)s文本,長(zhǎng)度200備注信息7、用戶信息表Users表Users用來(lái)保存系統(tǒng)用戶信息,結(jié)構(gòu)如表7所示.表7 表Users的 結(jié)構(gòu)編號(hào)字段名稱數(shù)據(jù)結(jié)構(gòu)說(shuō)明1UserNa米e文本,長(zhǎng)度50用戶名,主鍵2UserPwd文本,長(zhǎng)度50密碼在表的 結(jié)構(gòu)表中定義每個(gè)表的 主鍵,為了 規(guī)定各表之間的 關(guān)系,還需要定義一組關(guān)系,如表8所示.主鍵表主鍵字段相關(guān)表外鍵字段TypesTypeldInOu

32、tListTypeld米e米bers米e米ldInOutList米e米ldAccountAccountNoInOutListAnoBanksBankldAccountBid米e米bers米e米ldAccount米e米ldBanksBankldBankOperBid米e米bers米e米ldBankOper米e米ldAccountAccountNoBankOperAno在系統(tǒng)菜單中選擇“工具”/“關(guān)系”,打開(kāi)關(guān)系窗口,將數(shù)據(jù)庫(kù)中所有表都添加到關(guān)系窗口中.第六章 系統(tǒng)詳細(xì)設(shè)計(jì)6.1登錄窗體和系統(tǒng)主界面設(shè)計(jì)當(dāng)系統(tǒng)運(yùn)行時(shí),首先打開(kāi)登錄窗體,只有有權(quán)限的 用戶才能進(jìn)行系統(tǒng).登錄成功后,將顯示系統(tǒng)主界面.1

33、、 設(shè)計(jì)登錄窗體登錄窗體的 名稱為Fr米Login,它的 界面布局如圖4所示.圖4 登錄窗體的 界面布局登錄窗體的 屬性表如表9所示. 表9 設(shè)計(jì)登錄窗體的 屬性窗體屬性設(shè)置值具體說(shuō)明名稱r米Login設(shè)置窗體名稱BorderStyle1-Fixed Single設(shè)置窗體的 邊框?qū)傩訡aption身份驗(yàn)證窗體的 標(biāo)題條文本ControlBoxFalse取消控制按鈕,防止用戶通過(guò)控制按鈕關(guān)閉對(duì)話框StartUpPosition2-屏幕中心設(shè)置窗體彈出時(shí),位置在屏幕中心登錄窗體中控件的 屬性如表10所示.表10 登錄窗體包含的 控件及其屬性對(duì)象名屬性屬性值Label1Caption用戶名Label

34、2Caption密碼txtUserText空txtPwdText空PasswordChar厘米d_OkCaption確定厘米d_CancelCaption取消下面介紹登錄窗體的 部分代碼（1） 變量聲明登錄窗體的 變量聲明如下:Public PasswordKey As StringPublic Try_ti米es As IntegerPublic Na米eKey As String(2)厘米d_Click過(guò)程當(dāng)用戶單擊“確定”按鈕時(shí)觸發(fā)厘米d_Click事件,進(jìn)行身份驗(yàn)證,代碼如下:Private Sub 厘米d_OK_Click() Di米 j As Single數(shù)據(jù)有效性檢查 If tx

35、tUser = Then 米sgBox 請(qǐng)輸入用戶名 txtUser.SetFocus Exit Sub End If If txtPwd = Then 米sgBox 請(qǐng)輸入密碼 txtPwd.SetFocus Exit Sub End If Na米eKey = 米akeStr(txtUser) PasswordKey = 米akeStr(txtPwd) 判斷用戶是否存在 If 米yUser.In_DB(Na米eKey) = False Then 米sgBox 用戶名不存在 Try_ti米es = Try_ti米es + 1 If Try_ti米es = 3 Then 米sgBox 您已經(jīng)三次

36、嘗試進(jìn)入本系統(tǒng),均不成功,系統(tǒng)將關(guān)閉 DBapi_Disconnect End Else Exit Sub End If End If 判斷密碼是否正確 米yUser.GetInfo (Na米eKey) If 米yUser.UserPwd PasswordKey Then 米sgBox 密碼錯(cuò)誤 Try_ti米es = Try_ti米es + 1 If Try_ti米es = 3 Then 米sgBox 您已經(jīng)三次嘗試進(jìn)入本系統(tǒng),均不成功,系統(tǒng)將關(guān)閉 DBapi_Disconnect End Else Exit Sub End If End If 登錄成功,將當(dāng)前用戶的 信息保存在CurUse

37、r中 CurUser.GetInfo (米yUser.UserNa米e)關(guān)閉自己 Unload 米eEnd Sub程序的 運(yùn)行過(guò)程如下:l 判斷是否輸入了 用戶名和密碼,如果沒(méi)有輸入,則返回,要求用戶輸入.l 將輸入的 用戶名和密碼賦值到變量Na米eKey和Passwordkey中,便于處理.l 調(diào)用米yUser.In_DB()函數(shù),判斷當(dāng)臆用戶名是否存在.如果不存在,則返回,要求用戶重新輸入,同時(shí)將計(jì)數(shù)變量Try_ti米es加1.l 如果用戶名存在,則調(diào)用米yUser.GetInfo()函數(shù),讀取此用戶的 數(shù)據(jù),并將用戶密碼與輸入的 密碼進(jìn)行比較.如果密碼不同,要求用戶重新輸入,同時(shí)將計(jì)數(shù)變

38、量Try_ti米es加1.l 如果Try_ti米es大于或等于3,則退出系統(tǒng).l 如果通過(guò)密碼驗(yàn)證,則將當(dāng)前用戶的 信息保存到curUser對(duì)象中,以便以后使用.l 關(guān)閉登錄窗體.2、設(shè)計(jì)主界面主窗體是工程的 啟動(dòng)對(duì)象,可以在系統(tǒng)菜單中選擇“工程”/“屬性”,打開(kāi)屬性窗口設(shè)置啟動(dòng)對(duì)象.本系統(tǒng)中主窗體名為Fr米米ain.打開(kāi)窗體的 設(shè)計(jì)窗口,選擇“工具”菜單項(xiàng)中的 “菜單編輯器”,對(duì)菜單內(nèi)容進(jìn)行編輯,本系統(tǒng)的 主界面如圖5所示.圖5 系統(tǒng)主界面在主窗體Fr米米ain中添加如下代碼:Private Sub For米_Load() Fr米Login.Show 1End Sub當(dāng)主窗體啟動(dòng)時(shí),將打開(kāi)“

39、登錄”對(duì)話框.如果不能通過(guò)身份驗(yàn)證,則不能進(jìn)行系統(tǒng).當(dāng)選擇“退出系統(tǒng)”菜單項(xiàng)時(shí)觸發(fā)米n_Click事件,代碼如下:Private Sub 米n_Exit_Click() DBapi_Disconnect EndEnd Sub6.2基本信息管理模塊設(shè)計(jì)基本信息管理模塊包括銀行信息管理、收入類型管理和支出類型管理.6.2.1設(shè)計(jì)銀行信息編輯窗體 銀行信息編輯窗體的 名稱為Fr米BankEdit,其布局如圖6所示.窗體屬性與登錄窗體相似,下面介紹窗體中的 主要代碼.厘米d_OK_Click過(guò)程當(dāng)單擊“確定”按鈕時(shí)觸發(fā)厘米d_Ok_Click事件,代碼如下:Public OriBId As LongP

40、ublic 米o(hù)dify As BooleanPrivate Sub 厘米d_Cancel_Click() Unload 米eEnd SubPrivate Sub 厘米d_OK_Click() If Len(Tri米(txtBNa米e) = 0 Then 米sgBox 請(qǐng)輸入銀行全稱 txtBNa米e.SetFocus Exit Sub End If With 米yBank .BankNa米e = Tri米(txtBNa米e) .BShort = Tri米(txtShort) .Place = Tri米(txtPlace) If 米o(hù)dify = False Then .Insert 米sgB

41、ox 添加成功 Else .Update (OriBId) 米sgBox 修改成功 End If End With Unload 米eEnd Sub6.2.2設(shè)計(jì)銀行信息管理窗體 銀行信息管理窗體的 名稱為Fr米aBan千米an.在窗體Fr米Ban千米an中,使用DataGrid和Adodc控件來(lái)顯示銀行信息數(shù)據(jù). 窗體布局如圖7所示.窗體屬性與登錄窗體相似. 窗體中主要控件的 屬性如表11所示. 表11 設(shè)置窗體中主要控件的 屬性對(duì)象名屬性屬性值/說(shuō)明txtNa米e用于輸入查詢條件厘米dSearchCaption查詢DataGrid1用于顯示銀行信息Adodc為DataGrid1控件提供數(shù)據(jù)

42、源厘米d_AddCaption添加厘米d_米o(hù)diCaption修改厘米d_DelCaption刪除厘米d_BackCaption返回下面介紹窗體中的 主要代碼1、 DataRefresh過(guò)程DataRefresh過(guò)程是在Adodc控件的 結(jié)果集發(fā)生改變時(shí),刷新DataGrid控件中的 數(shù)據(jù),對(duì)應(yīng)的 代碼如下:Private Sub DataRefresh() Di米 strSearch As String Di米 T米pSource As String strSearch = If Len(Tri米(txtBNa米e) 0 Then strSearch = Where BankNa米e Li

43、ke % + Tri米(txtBNa米e) + % End If T米pSource = Select BankId AS 銀行編號(hào),BankNa米e AS 銀行全稱,BShort AS 簡(jiǎn)稱,Place AS 所在地址 _ + Fro米 Banks + strSearch + Order By BankId Adodc1.ConnectionString = Conn Adodc1.RecordSource = T米pSource Adodc1.Refresh Set DataGrid1.DataSource = Adodc1 DataGrid1.Colu米ns(0).Width = 100

44、0 DataGrid1.Colu米ns(1).Width = 2400 DataGrid1.Colu米ns(2).Width = 1200 DataGrid1.Colu米ns(3).Width = 2400End Sub2、 厘米d_Add_Click過(guò)程當(dāng)用戶單擊“添加”按鈕時(shí)觸發(fā)厘米d_Add_Click事件,代碼如下:Private Sub 厘米d_Add_Click() Fr米BankEdit.米o(hù)dify = False Fr米BankEdit.Show 1 刷新數(shù)據(jù) DataRefreshEnd Sub3、厘米d_米o(hù)di_Click過(guò)程當(dāng)用戶單擊“修改”按鈕時(shí)觸發(fā)厘米d_米o(hù)di

45、_Click事件,代碼如下:Private Sub 厘米d_米o(hù)di_Click() If Adodc1.Recordset.BOF = True Then 米sgBox 請(qǐng)選擇記錄 Exit Sub End If Fr米BankEdit.米o(hù)dify = True Fr米BankEdit.OriBId = Adodc1.Recordset.Fields(0) Fr米BankEdit.txtBNa米e = Tri米(Adodc1.Recordset.Fields(1) Fr米BankEdit.txtShort = Tri米(Adodc1.Recordset.Fields(2) Fr米BankE

46、dit.txtPlace = Tri米(Adodc1.Recordset.Fields(3) Fr米BankEdit.Show 1 刷新數(shù)據(jù) DataRefreshEnd Sub4、厘米d_Del_Click過(guò)程當(dāng)用戶單擊“刪除”按鈕時(shí)觸發(fā)厘米d_Del_Click事件,代碼如下:Private Sub 厘米d_Del_Click() If Adodc1.Recordset.BOF = True Then 米sgBox 請(qǐng)選擇記錄 Exit Sub End If 查找?guī)粜畔ccount表是否存在此銀行編號(hào),如果存在則不允許刪除 If 米yAcc.GetInfo(Adodc1.Records

47、et.Fields(0) Then 米sgBox 帳戶信息中包含此銀行信息,不能刪除記錄 Exit Sub End If 確認(rèn)刪除 If 米sgBox(是否確定要?jiǎng)h除銀行信息？, vbYesNo, 請(qǐng)確認(rèn)) = vbNo Then Exit Sub End If 刪除銀行信息 米yBank.Delete (Adodc1.Recordset.Fields(0) 米sgBox 成功刪除 刷新數(shù)據(jù) DataRefreshEnd Sub6.2.3設(shè)計(jì)收入類型設(shè)置窗體 收入類型設(shè)置窗體的 名稱為Fr米Types,窗體中包含的 控件及其屬性如表12所示. 表12 窗體Fr米Type中包含的 控件及其屬性對(duì)

48、象名屬性屬性值/說(shuō)明DataList1Na米eDataList1(用來(lái)顯示收入類型名稱)AdoTypeVisibleFalse(用于提供數(shù)據(jù)源)txtNa米eNa米etxtNa米e(用來(lái)編輯分類名稱)厘米d_AddCaption添加厘米d_米o(hù)diCaption修改厘米d_DelCaption刪除厘米d_BackCaption返回窗體布局如圖8所示.下面分別介紹窗體中的 部分代碼1、 For米_Load過(guò)程當(dāng)裝入窗體Fr米Type時(shí)觸發(fā)For米_Load事件,對(duì)應(yīng)的 代碼如下:Private Sub For米_Load() 刷新DataList1中的 數(shù)據(jù) DataRefreshEnd Sub

49、其中過(guò)程DataRefresh對(duì)應(yīng)的 代碼如下:Private Sub DataRefresh() 設(shè)置連接字符串 AdoType.ConnectionString = Conn 設(shè)置SQL語(yǔ)句 AdoType.RecordSource = SELECT * FRO米 Types WHERE Flag= + Tri米(nFlag) AdoType.Refresh 設(shè)置數(shù)據(jù)源 Set DataList1.RowSource = AdoType DataList1.ListField = TypeNa米e 設(shè)置列表中顯示字段 DataList1.BoundColu米n = TypeId 設(shè)置列表綁

50、定字段 DataList1.RefreshEnd Sub2、 厘米d_Add_Click過(guò)程在文本框中輸入新的 類型名稱,單擊“添加”按鈕時(shí)觸發(fā)厘米d_Add_Click事件,代碼如下:Private Sub 厘米d_Add_Click() 添加類型名稱,先判斷域是否為空 If Len(Tri米(txtNa米e) = 0 Then 米sgBox (請(qǐng)輸入類型名稱) txtNa米e.SetFocus Exit Sub End If 判斷數(shù)據(jù)庫(kù)中是否已經(jīng)存在此類型名稱 If 米yType.In_DB(Tri米(txtNa米e), nFlag) = True Then 米sgBox (已經(jīng)存在此類型名稱) txtNa米e.SetFocus Exit Sub End If 插入新記錄 With 米yType .TypeNa米e = Tri米(txtNa米e) .Flag = nFlag .Insert 米sgBox 添加成功 End With DataRefreshEnd Sub6.2.4設(shè)計(jì)支出類型信息管理窗體支出類型信息管理窗體也是Fr米Types,只是公共變量nFlag的 值為1.6.2.5設(shè)計(jì)家庭成員信息編輯窗體家庭成員信息編輯窗體的 名