個人理財分析系統(tǒng)設(shè)計與實現(xiàn)本科畢業(yè)論文.doc

某某某某大學(xué)畢業(yè)論文 畢業(yè)論文畢業(yè)論文 個人理財分析系統(tǒng)設(shè)計與個人理財分析系統(tǒng)設(shè)計與實現(xiàn)實現(xiàn) Personal Wealth Management System Design and Implementation矚慫潤厲釤瘞睞 櫪廡賴 某某某某大學(xué)畢業(yè)論文 摘要 I 摘要摘要 本文設(shè)計的個人理財軟件是一款通過對個人 家庭 收支 資產(chǎn)及負(fù)債 信息進(jìn)行管理 提供財務(wù)分析報表的數(shù)據(jù)庫訪問軟件 聞創(chuàng)溝燴鐺險愛氌譴凈 設(shè)計按照 面向?qū)ο筌浖こ?的要求進(jìn)行 采用 PowerDesigner 對系 統(tǒng)進(jìn)行分析和設(shè)計 用 Visualbasic 進(jìn)行系統(tǒng)實現(xiàn) 使用 FlexCell DTPicker Listbar 等高級控件 創(chuàng)建通用數(shù)據(jù)訪問模塊 OperatDataBase bas 此模塊規(guī)范 ADO 數(shù)據(jù)訪問流程 只需修改連接字符串 即可實現(xiàn)對多種不同數(shù)據(jù)庫系統(tǒng)的訪問 通過對計算賬戶余額算法的研究 我掌握了利用 SQL 語句進(jìn)行數(shù)據(jù)庫訪問的技巧 殘騖樓諍錈瀨濟(jì)溆塹籟 本論文實現(xiàn)的個人理財軟件可完成收支記賬管理 資產(chǎn) 負(fù)債管理 數(shù) 據(jù)導(dǎo)出 多賬簿多用戶操作及各種財務(wù)報表的自動生成 在各種常用 Windows 操作系統(tǒng)下都可以正常工作 達(dá)到了預(yù)期的設(shè)計目標(biāo) 釅錒極額閉鎮(zhèn)檜豬訣 錐 關(guān)鍵字 關(guān)鍵字 數(shù)據(jù)庫 ADO Visual Basic 理財 某某某某大學(xué)畢業(yè)論文 Abstract II Personal Wealth Management System Design and Implementation彈貿(mào)攝爾 霽斃攬磚鹵廡 Abstract This design is a personal wealth management software through manage the information of a family s income and expenditure assets and liabilities to provide financial analysis statements and database access software 謀蕎摶篋飆鐸懟類蔣薔 Designed in accordance with the object oriented software engineering requirements uses PowerDesigner to carry on the analysis and the design the system the system Execution is through Visualbasic Use FlexCell DTPicker Listbar and other High level controls software Then founds the general data accessing module OperatDataBase bas This module Standard the Process of ADO data access only a modification of the connection character string then to realize a visit of many kinds of different databases system By calculating account balances algorithm research I have grasped the skill of using the SQLsentence to visit database 廈礴懇蹣駢時盡繼價騷 In this paper personal wealth management software to achieve complete revenue expenditure account management asset liability management data derived and multi accounts books of operation and the automatic generation of financial statements It can work commonly under each kind of Windows operating system so it can achieve the anticipated design 煢楨廣鰳鯡選塊網(wǎng)羈淚 Key word Database ADO Visual Basic Personal financing鵝婭盡損鵪慘 歷蘢鴛賴 某某某某大學(xué)畢業(yè)論文 目錄 III 目錄目錄 摘要摘要 I ABSTRACT II 目錄目錄 III 第一章第一章 緒論緒論 1 1 1 什么是個人 家庭 理財 1 1 2 個人理財分析中最重要的四份財務(wù)報表 1籟叢媽羥為贍僨蟶練淨(jìng) 1 3 常見個人理財軟件分析 2 第二章第二章 系統(tǒng)功能介紹系統(tǒng)功能介紹 3 2 1 系統(tǒng)簡介 3 2 2 系統(tǒng)主要功能 3 2 3 系統(tǒng)特點 4 2 4 系統(tǒng)運行界面 4 第三章第三章 系統(tǒng)設(shè)計系統(tǒng)設(shè)計 7 3 1 系統(tǒng)需求分析 7 3 2 系統(tǒng)性能要求 7 3 3 硬件配置要求 7 3 4 軟件開發(fā)所需軟件配置要求 8 3 5 系統(tǒng)結(jié)構(gòu)設(shè)計圖 9 3 6 數(shù)據(jù)庫分析設(shè)計 9 3 6 1 系統(tǒng) E R 圖 11 3 6 2 數(shù)據(jù)字典 12 3 6 3 創(chuàng)建表關(guān)系 14 3 6 4 創(chuàng)建查詢 15 第四章第四章 系統(tǒng)實現(xiàn)系統(tǒng)實現(xiàn) 18 4 1 系統(tǒng)主界面 18 4 1 1 創(chuàng)建工程項目 18 4 1 2 創(chuàng)建系統(tǒng)主窗體 19 4 1 3 主窗口菜單 21 4 2 公用模塊 23 4 2 1 OperatDataBase bas 23預(yù)頌圣鉉儐歲齦訝驊糴 4 2 2 PublicVar bas 23滲釤嗆儼勻諤鱉調(diào)硯錦 某某某某大學(xué)畢業(yè)論文 目錄 IV 4 3 ADO 數(shù)據(jù)訪問技術(shù) 24 4 3 1 從 Microsoft Visual Basic 引用 ADO 的步驟24鐃誅臥瀉噦圣騁貺頂 廡 4 3 2 在 Visual Basic 中創(chuàng)建 ADO 對象 25擁締鳳襪備訊顎輪爛薔 4 4 FLEXCELL表格控件 25 4 5 賬套管理 28 4 5 1 選用賬套 29 4 5 2 新建賬套 29 4 5 3 刪除賬套 30 4 6 日常收支流水賬 31 4 6 1 信息流覽頁面 31 4 6 2 收支記錄管理界面 33 4 7 年度收支統(tǒng)計表 35 4 8 對計算賬戶余額算法的研究 36 4 8 1 用數(shù)據(jù)指針對數(shù)據(jù)集進(jìn)行處理 36贓熱俁閫歲匱閶鄴鎵騷 4 8 2 用 SQL 函數(shù)對數(shù)據(jù)集進(jìn)行處理 37壇摶鄉(xiāng)囂懺蔞鍥鈴氈淚 4 8 3 算法比較 38 4 9 對程序錯誤的處理 40 4 9 1 使用 On Error Resume Next 錯誤處理程序 40蠟變黲癟報倀鉉錨鈰贅 4 9 2 使用 On Error GoTo 錯誤處理程序 41買鯛鴯譖曇膚遙閆擷凄 4 9 3 創(chuàng)建統(tǒng)一的錯誤處理程序塊 41 第五章第五章 系統(tǒng)發(fā)布系統(tǒng)發(fā)布 43 總結(jié)總結(jié) 47 致謝致謝 48 參考文獻(xiàn)參考文獻(xiàn) 49 某某某某大學(xué)畢業(yè)論文 第一章 緒論 第 1 頁 共 49 頁 第一章第一章 緒論緒論 1 1 什么是個人什么是個人 家庭家庭 理財理財 人的衣 食 住 行離不開錢 我們每天都在自覺或不自覺地運用和處 理著錢財 這就是個人 家庭 理財 如果 對個人理財下個確切的定義 個人理財就是對個人 家庭 的財 務(wù)進(jìn)行科學(xué)的 有計劃的 系統(tǒng)的全方位管理 以實現(xiàn)個人財產(chǎn)的合理安排 消費和使用 有效地增值和保值 簡單地講個人理財就是管理好自己的錢財 綾鏑鯛駕櫬鶘蹤韋轔糴 有人說 花一分時間去賺錢 但要花兩分時間去理財 其實這句話中無 非包含兩層意思 第一 理財重要 第二 理財困難 而我設(shè)計這個個人理 財分析軟件的目標(biāo)也就是要幫助我們把這件重要的事做好 驅(qū)躓髏彥浹綏譎飴憂錦 1 2 個人理財分析中最重要的四份財務(wù)報表個人理財分析中最重要的四份財務(wù)報表 現(xiàn)代人的投資面越來越廣 收入也五花八門 通過制作家庭財務(wù)報表可 以對自己的財務(wù)狀況一目了然 也對我們普通家庭合理安排收支非常有幫助 我們?nèi)粘Ｉ钪凶顬橛^注的主要有以下幾方面的報表 貓蠆驢繪燈鮒誅髏貺廡 1 年度收支統(tǒng)計表 以年為單位按月統(tǒng)計日常普通收支項目的收支金額 及其他活動的收 支詳情 以便我們從微觀到宏觀地了解資金來源和支出在 各時期的分布情況 鍬籟饗逕瑣筆襖鷗婭薔 2 資金流量表 按賬戶或收支項目統(tǒng)計指定時間范圍內(nèi)的現(xiàn)金流入 流 出等各類消費收支的詳細(xì)情況 3 資產(chǎn)負(fù)債表 用于計算用戶所擁有的總資產(chǎn) 債務(wù)及凈資產(chǎn)額 了解 家庭真實情況 通過這些報表我們可以了解到 日常的收支情況 現(xiàn)在總體的資產(chǎn) 債 某某某某大學(xué)畢業(yè)論文 第一章 緒論 第 2 頁 共 49 頁 務(wù)情況 讓我們對自己的財務(wù)狀況做到心中有數(shù) 凈資產(chǎn)的統(tǒng)計 可知道我 們是否邁上了正常的理財之路 構(gòu)氽頑黌碩飩薺齦話騖 1 3 常見個人理財軟件分析常見個人理財軟件分析 目前常見的個人理財軟件從功能上可以分為兩類 1 功能單一型軟件 此類軟件功能較少 一般為記生活收支流水賬軟件 軟件設(shè)計的根本目的是利用計算機(jī)記賬方式代替原始手工記賬方式 它的優(yōu) 點是操作簡單 容易上手 主要缺點是此類軟件無法提供真正意義上的理財 分析報表 只能算是記賬軟件算不上理財分析軟件 輒嶧陽檉籪癤網(wǎng)儂號澩 2 功能復(fù)雜型軟件 此類軟件為了全面 完整地解決個人理財分析問題 便利功能繁多 操作復(fù)雜 它的優(yōu)點是能夠提供完整的理財分析報表 缺點 是由于操作界面專業(yè)導(dǎo)致用戶不易上手使用 感覺操作復(fù)雜繁瑣 且往往此 類軟件本身就價格不菲 堯側(cè)閆繭絳闕絢勵蜆贅 一款既操作簡單 又能夠提供準(zhǔn)確 實用家庭財務(wù)分析報表的軟件必將 受到廣大個人 家庭 理財者的青睞 某某某某大學(xué)畢業(yè)論文 第二章 系統(tǒng)功能介紹 第 3 頁 共 49 頁 第二章第二章 系統(tǒng)功能介紹系統(tǒng)功能介紹 2 1 系統(tǒng)簡介系統(tǒng)簡介 個人理財分析軟件是一套即操作簡單又能夠提供專業(yè)理財報表的個人 家庭 理財分析工具軟件 適合中國現(xiàn)代家庭 它能全面管理所有資產(chǎn)與 負(fù)債 跟蹤家庭經(jīng)濟(jì)狀況的變化 為用戶合理配置家庭資產(chǎn) 達(dá)到保值增值 的目的 以及最終實現(xiàn)財富的最大化提供幫助 識饒鎂錕縊灩筧嚌儼淒 2 2 系統(tǒng)主要功能系統(tǒng)主要功能 1 多賬套多用戶 可管理多套賬簿 每套賬簿是一個獨立的數(shù)據(jù)庫文件 賬簿之間互不影響 軟件可供多用戶使用而互不干擾 適應(yīng)家庭中的每個成 員的不同需求 凍鈹鋨勞臘鍇癇婦脛糴 2 收支記賬 收支記賬是把日常收入 支出等所有與財務(wù)活動相關(guān)的事 件準(zhǔn)確 及時地記入賬簿 收支記賬是整個軟件中最常用的功能 也是最重 要的功能 它是家庭理財分析軟件的基礎(chǔ) 恥諤銪滅縈歡煬鞏鶩錦 3 資產(chǎn)管理 資產(chǎn)管理界面可以顯示家庭貴重物品詳細(xì)資料 同時提供 資產(chǎn)現(xiàn)目前的現(xiàn)值情況 4 債務(wù)管理 債務(wù)管理界面顯示了所有債務(wù)信息 包括債務(wù)的詳細(xì)資料 以及對債務(wù)進(jìn)行新建 刪除 修改等 5 導(dǎo)出 將賬簿中的財務(wù)數(shù)據(jù)導(dǎo)出成 Microsoft Office Excel 格式文件 6 理財寶典 理財寶典是家庭 個人理財?shù)闹R讀本 講述了投資理財 的基本概念 原則 步驟 介紹了現(xiàn)行國內(nèi)主要的投資理財品種 如儲蓄 貸款 保險 股票 基金 外匯 債券 房地產(chǎn) 收藏等項目 通過此理財 寶典的學(xué)習(xí) 可充分掌握投資理財?shù)幕靖拍钆c技能 為您家庭財富保值 增值等提供寶貴的知識 鯊腎鑰詘褳鉀溈懼統(tǒng)庫 某某某某大學(xué)畢業(yè)論文 第二章 系統(tǒng)功能介紹 第 4 頁 共 49 頁 2 3 系統(tǒng)特點系統(tǒng)特點 1 讓用戶開支井井有條 心中一本明白賬 2 債務(wù)借貸功能 誰欠你 你欠誰 一目了然 保障用戶具有良好的信 用 3 注意高消費項目 可以輕松發(fā)現(xiàn)高消費項目 適當(dāng)控制它們 將是我 們減少開支的重要手段 4 頻繁消費項目 也許這些項目每次消費金額不算高 但考慮其頻繁的 消費次數(shù)后 其累計金額也是較為可觀的 發(fā)現(xiàn)這類項目用戶應(yīng)放在力爭減 少每次消費額 日積月累就能為用戶節(jié)省一大筆開銷 碩癘鄴頏謅攆檸攜驤蘞 5 通過軟件生成的多種統(tǒng)計報表 讓用戶清楚的了解自已賬戶余額 資 產(chǎn) 債務(wù)項目 收支情況 當(dāng)我們聚積了財富的時候 用戶可以通過這些統(tǒng) 計報表享受成功感 閿擻輳嬪諫遷擇楨秘騖 2 4 系統(tǒng)運行界面系統(tǒng)運行界面 圖 2 1 歡迎界面 某某某某大學(xué)畢業(yè)論文 第二章 系統(tǒng)功能介紹 第 5 頁 共 49 頁 圖 2 2 收支流水賬 圖 2 3 資產(chǎn)負(fù)債表 某某某某大學(xué)畢業(yè)論文 第二章 系統(tǒng)功能介紹 第 6 頁 共 49 頁 圖 2 4 關(guān)于界面 某某某某大學(xué)畢業(yè)論文 第三章 系統(tǒng)設(shè)計 第三章第三章 系統(tǒng)設(shè)計系統(tǒng)設(shè)計 3 1 系統(tǒng)需求分析系統(tǒng)需求分析 需求分析要弄清用戶對開發(fā)的應(yīng)用系統(tǒng)的確切要求 要設(shè)計一個有效的 管理信息系統(tǒng) 必須用系統(tǒng)工程的觀點來考慮問題 在系統(tǒng)分析階段 設(shè)計 者要收集和分析數(shù)據(jù)管理中信息的內(nèi)容和用戶對處理的要求 氬嚕躑竄貿(mào)懇彈瀘頷 澩 1 能夠記錄日常生活流水賬 2 能夠?qū)κ罩ы椖考百~戶進(jìn)行編輯管理 3 實現(xiàn)負(fù)債 資產(chǎn)管理 4 對表格中的數(shù)據(jù)可以按多種條件進(jìn)行排序 5 可以根據(jù)數(shù)據(jù)庫中相關(guān)記錄生成各種統(tǒng)計報表 6 支持多賬套 7 可以將數(shù)據(jù)導(dǎo)出到其它通用軟件中 3 2 系統(tǒng)性能要求系統(tǒng)性能要求 1 系統(tǒng)安全 可靠 2 功能齊全 3 操作方便 界面友好 4 易于維護(hù)和擴(kuò)充 3 3 硬件配置要求硬件配置要求 1 奔 以上的 CPU 2 主頻 500 以上 某某某某大學(xué)畢業(yè)論文 第三章 系統(tǒng)設(shè)計 第 8 頁 共 49 頁 3 128MB 以上的內(nèi)存 4 彩色顯示器 800 600 5 8M 以上顯存 6 10G 以上硬盤空間 7 鼠標(biāo)器 3 4 軟件開發(fā)所需軟件配置要求軟件開發(fā)所需軟件配置要求 1 WINDOWS XP SP2 操作系統(tǒng) 2 Microsoft Visual Basic 6 0 SP6 簡體中文版 3 FlexCell 表格控件 版本 5 6 3 4 Microsoft Office Access 2003 某某某某大學(xué)畢業(yè)論文 第三章 系統(tǒng)設(shè)計 第 9 頁 共 49 頁 3 5 系統(tǒng)結(jié)構(gòu)設(shè)計圖系統(tǒng)結(jié)構(gòu)設(shè)計圖 歡歡迎迎屏屏 個個人人理理財財 主主界界面面 理理財財信信息息管管理理 統(tǒng)統(tǒng)計計報報表表 理理財財知知識識 備備用用 系系統(tǒng)統(tǒng)設(shè)設(shè)置置 關(guān)關(guān)于于 收收支支流流水水帳帳 帳帳戶戶一一覽覽 收收支支項項目目 資資產(chǎn)產(chǎn) 負(fù)負(fù)債債 負(fù)負(fù)債債流流水水帳帳 年年度度收收支支統(tǒng)統(tǒng)計計表表 按按帳帳戶戶現(xiàn)現(xiàn)金金流流量量表表 按按項項目目現(xiàn)現(xiàn)金金流流量量表表 資資產(chǎn)產(chǎn)負(fù)負(fù)債債表表 訪訪問問作作者者主主頁頁 關(guān)關(guān)于于軟軟件件說說明明 退退出出系系統(tǒng)統(tǒng) 理理財財寶寶典典在在線線書書 帳帳套套管管理理 添添加加 刪刪除除流流水水帳帳 添添加加 刪刪除除帳帳戶戶 添添加加 刪刪除除收收支支項項目目 添添加加 刪刪除除資資產(chǎn)產(chǎn) 添添加加 刪刪除除負(fù)負(fù)債債項項目目 添添加加 刪刪除除負(fù)負(fù)債債流流水水帳帳 年年度度收收支支統(tǒng)統(tǒng)計計表表打打印印預(yù)預(yù)覽覽 按按帳帳戶戶現(xiàn)現(xiàn)金金流流量量表表打打印印預(yù)預(yù)覽覽 按按項項目目現(xiàn)現(xiàn)金金流流量量表表打打印印預(yù)預(yù)覽覽 資資產(chǎn)產(chǎn)負(fù)負(fù)債債表表打打印印預(yù)預(yù)覽覽 帳帳套套添添加加 刪刪除除 選選用用 圖 3 1 3 6 數(shù)據(jù)庫分析設(shè)計數(shù)據(jù)庫分析設(shè)計 Access 是微軟公司推出的基于 Windows 的桌面關(guān)系數(shù)據(jù)庫管理系統(tǒng) RDBMS 是 Office 系列應(yīng)用軟件之一 它提供了表 查詢 窗體 報表 頁 宏 模塊 7 種用來建立數(shù)據(jù)庫系統(tǒng)的對象 提供了多種向?qū)?生成器 模板 把數(shù)據(jù)存儲 數(shù)據(jù)查詢 界面設(shè)計 報表生成等操作規(guī)范化 為建立 某某某某大學(xué)畢業(yè)論文 第三章 系統(tǒng)設(shè)計 第 10 頁 共 49 頁 功能完善的數(shù)據(jù)庫管理系統(tǒng)提供了方便 也使得普通用戶不必編寫代碼 就 可以完成大部分?jǐn)?shù)據(jù)管理的任務(wù) Access 是一種關(guān)系型數(shù)據(jù)庫管理系統(tǒng) 釷 鵒資贏車贖孫滅獅贅 圖 3 2 根據(jù)系統(tǒng)需要分析 系統(tǒng)需要建立 6 個表 其用途說明如表 3 1 所示 表 3 1 數(shù)據(jù)表及其用途 ID數(shù)據(jù)表名稱數(shù)據(jù)表名稱數(shù)據(jù)表用途數(shù)據(jù)表用途 1流水賬保存日常生活流水賬信息 2收支項目保存收支項目信息 3賬戶保存賬戶信息 4負(fù)債保存負(fù)債項目信息 5還債流水賬保存還債記錄信息 6資產(chǎn)保存資產(chǎn)購入價格及現(xiàn)值信息 某某某某大學(xué)畢業(yè)論文 第三章 系統(tǒng)設(shè)計 第 11 頁 共 49 頁 3 6 1 系統(tǒng) E R 圖 系統(tǒng) E R 圖是一種信息模型圖 體現(xiàn)了系統(tǒng)實體之間的關(guān)系 通過系統(tǒng) 需要分析 得到了系統(tǒng)的分解功能以及數(shù)據(jù)流程 根據(jù)這些實體和實體之間 的關(guān)系 可以得到系統(tǒng) E R 圖 如圖 3 3 所示 慫闡譜鯪逕導(dǎo)嘯畫長涼 負(fù)債查詢?nèi)?負(fù)負(fù)債債編編號號 負(fù)債名稱 帳戶編號 債務(wù)金額 嘗還金額 嘗還余額 說明 帳戶名稱 負(fù)債日期 負(fù)債 PK負(fù)債編號 負(fù)債名稱 負(fù)負(fù)債債日日期期 FK1 I1帳帳戶戶編編號號 債債務(wù)務(wù)金金額額 嘗嘗還還金金額額 嘗嘗還還余余額額 說明 資產(chǎn) PK資產(chǎn)編號 資資產(chǎn)產(chǎn)名名稱稱 購購入入價價值值 現(xiàn)值 說明 還債流水帳查詢?nèi)?負(fù)債編號 帳戶編號 還債日期 還債金額 說明 帳戶名稱 負(fù)債名稱 編編號號 開戶金額 負(fù)債日期 債務(wù)金額 嘗還金額 還債流水帳 PK編號 FK1 I1負(fù)負(fù)債債編編號號 FK2 I2帳帳戶戶編編號號 還還債債日日期期 還還債債金金額額 說明 流水帳 PK編號 FK2 I3 I1 帳帳戶戶編編號號 FK1 I2 I4 項項目目編編號號 交交易易日日期期 資資金金 說明 流水帳查詢?nèi)?編編號號 交易日期 帳戶編號 項目編號 資金 說明 項目名稱 類類型型 帳戶名稱 收支項目 PK項項目目編編號號 項目名稱 類類型型 說明 帳戶 PK帳帳戶戶編編號號 帳帳戶戶名名稱稱 開開戶戶金金額額 帳帳戶戶余余額額 說明 具有帳戶債務(wù) 屬于 具有債務(wù)債務(wù)流水帳 屬于 具有帳戶債務(wù)流水帳 屬于 具有收支項目流水帳 屬于 具有帳戶流水帳 屬于 圖 3 3 系統(tǒng) E R 圖 某某某某大學(xué)畢業(yè)論文 第三章 系統(tǒng)設(shè)計 第 12 頁 共 49 頁 3 6 2 數(shù)據(jù)字典 表 3 2 到表 3 7 給出了 6 個數(shù)據(jù)表 流水賬 收支項目 賬戶 負(fù)債 還債流水賬 資產(chǎn) 的具體描述 包括字段名稱 數(shù)據(jù)類型和主鍵 外鍵設(shè)置 信息 諺辭調(diào)擔(dān)鈧諂動禪瀉類 主鍵 Primary Key 也稱為主關(guān)鍵字 是表中惟一能標(biāo)識一條記錄的字段 可以是一個字段或多個字段的組合 嘰覲詿縲鐋囁偽純鉿錈 定義主鍵時 先要指定作為主鍵的一個或多個字段 如果只選擇一個字 段 可單擊字段所在行的選定按鈕 若需要選擇多個字段作為主鍵 可先按 下 Ctrl 鍵 再依次單擊這些字段所有行的選定按鈕 指定字段后 可在鼠標(biāo) 右鍵菜單中選擇 主鍵 命令 或直接單擊工具欄上的 主鍵 按鈕 即可 把該字段設(shè)為表的主鍵 如果主鍵在設(shè)置后發(fā)現(xiàn)不適用或不正確 可以通過 主鍵 按鈕取消原有的主鍵 熒紿譏鉦鏌觶鷹緇機(jī)庫 數(shù)據(jù)表之間的關(guān)聯(lián)是由鍵值匹配來確定的 如果表中的一個字段是另一 個表的主鍵字段 那么這個字段在本表中被稱為外鍵 Foreign Key 鶼漬螻偉 閱劍鯫腎邏蘞 1 流水賬 表 3 2 流水賬 編號編號字段名稱字段名稱數(shù)據(jù)類型數(shù)據(jù)類型主鍵主鍵 外鍵外鍵 1編號COUNTERPK 2賬戶編號INTEGERFK 3項目編號INTEGERFK 4交易日期DATETIME 5資金CURRENCY 6說明VARCHAR 100 某某某某大學(xué)畢業(yè)論文 第三章 系統(tǒng)設(shè)計 第 13 頁 共 49 頁 2 收支項目 表 3 3 收支項目 編號編號字段名稱字段名稱數(shù)據(jù)類型數(shù)據(jù)類型主鍵主鍵 外鍵外鍵 1項目編號COUNTERPK 2項目名稱VARCHAR 20 3類型BOOLEAN 4說明VARCHAR 50 3 賬戶 表 3 4 賬戶 編號編號字段名稱字段名稱數(shù)據(jù)類型數(shù)據(jù)類型主鍵主鍵 外鍵外鍵 1賬戶編號COUNTERPK 2賬戶名稱VARCHAR 100 3開戶金額CURRENCY 4賬戶余額CURRENCY 5說明VARCHAR 100 4 負(fù)債 表 3 5 負(fù)債 編號編號字段名稱字段名稱數(shù)據(jù)類型數(shù)據(jù)類型主鍵主鍵 外鍵外鍵 1負(fù)債編號COUNTERPK 2負(fù)債名稱VARCHAR 100 某某某某大學(xué)畢業(yè)論文 第三章 系統(tǒng)設(shè)計 第 14 頁 共 49 頁 3負(fù)債日期DATETIME 4賬戶編號INTEGERFK 5債務(wù)金額CURRENCY 6嘗還金額CURRENCY 7嘗還余額CURRENCY 8說明VARCHAR 100 5 還債流水賬 表 3 6 還債流水賬 編號編號字段名稱字段名稱數(shù)據(jù)類型數(shù)據(jù)類型主鍵主鍵 外鍵外鍵 1編號COUNTERPK 2負(fù)債編號INTEGERFK 3賬戶編號INTEGERFK 4還債日期DATETIME 5還債金額CURRENCY 6說明VARCHAR 100 6 資產(chǎn) 表 3 7 資產(chǎn) 編號編號字段名稱字段名稱數(shù)據(jù)類型數(shù)據(jù)類型主鍵主鍵 外鍵外鍵 1資產(chǎn)編號COUNTERPK 2資產(chǎn)名稱VARCHAR 100 3購入價值CURRENCY 某某某某大學(xué)畢業(yè)論文 第三章 系統(tǒng)設(shè)計 第 15 頁 共 49 頁 4現(xiàn)值CURRENCY 5說明VARCHAR 100 3 6 3 創(chuàng)建表關(guān)系 所謂的關(guān)系 指的是兩個表中都有一個相同的數(shù)據(jù)類型 大小的字段 利用這個字段建立兩個表之間的關(guān)系 通過這種表之間的關(guān)聯(lián)性 可以將數(shù) 據(jù)庫中的多個表聯(lián)結(jié)成一個有機(jī)的整體 關(guān)系的主要作用是使多個表中的字 段協(xié)調(diào)一致 以便快速地提取信息 紂憂蔣氳頑薟驅(qū)藥憫騖 如果兩個表使用了共同的字段 就應(yīng)該為這兩個表建立一個關(guān)系 通過 表間關(guān)系就可以指出一個表中的數(shù)據(jù)與另一個表中數(shù)據(jù)的相關(guān)方式 穎芻莖蛺餑 億頓裊賠瀧 常見表關(guān)系類型如下 1 一對一 一個表中的每個記錄只與第二個表中的一個記錄匹配 2 一對多 一個表中的每個記錄與第二個表中的一個或多個記錄匹配 但第二個表中的每個記錄只能與第一個表中的一個記錄匹配 濫驂膽閉 驟羥闈詔寢賻 3 多對一 一個表的多個記錄與第二個表中的一個記錄匹配 4 多對多 一個表中的每個記錄與第二個表中的多個記錄匹配 反之 亦然 通過 Microsoft Office Access 可以得到數(shù)據(jù)庫表關(guān)系圖 如圖 3 4 所示 所有主表和外鍵表之間的關(guān)系具有如下特征 銚銻縵嚌鰻鴻鋟謎諏涼 1 對 Insert 和 Update 具有強(qiáng)制性 2 級聯(lián)刪除相關(guān)的記錄 某某某某大學(xué)畢業(yè)論文 第三章 系統(tǒng)設(shè)計 第 16 頁 共 49 頁 圖 3 4 數(shù)據(jù)庫表關(guān)系 3 6 4 創(chuàng)建查詢 使用查詢可以按照不同的方式查看 更改和分析數(shù)據(jù) 也可以用查詢作 為窗體 報表和數(shù)據(jù)訪問頁的記錄源 使用 SQL 語句創(chuàng)建的查詢 可以用結(jié)構(gòu)化查詢語言 SQL 來查詢 更 新和管理 Access 這樣的關(guān)系數(shù)據(jù)庫 擠貼綬電麥結(jié)鈺贖嘵類 在查詢 設(shè)計 視圖中創(chuàng)建查詢時 Access 將在后臺構(gòu)造等效的 SQL 語 句 實際上 在查詢 設(shè)計 視圖的屬性表中 大多數(shù)查詢屬性在 SQL 視圖 中都有等效的可用子句和選項 如果需要 可以在 SQL 視圖中查看和編輯 SQL 語句 但是 在對 SQL 視圖中的查詢做更改之后 查詢可能無法以以 前在 設(shè)計 視圖中所顯示的方式進(jìn)行顯示 賠荊紳諮侖驟遼輩襪錈 有一些 SQL 查詢 稱為 SQL 特定查詢 無法在設(shè)計網(wǎng)格中進(jìn)行創(chuàng)建 對于傳遞查詢 數(shù)據(jù)定義查詢和聯(lián)合查詢 必須直接在 SQL 視圖中創(chuàng)建 某某某某大學(xué)畢業(yè)論文 第三章 系統(tǒng)設(shè)計 第 17 頁 共 49 頁 SQL 語句 對于子查詢 可以在查詢設(shè)計網(wǎng)格的 字段 行或 條件 行輸入 SQL 語句 塤礙籟饈決穩(wěn)賽釙冊庫 1 負(fù)債查詢?nèi)?fù)債查詢?nèi)?SELECT 負(fù)債 負(fù)債編號 負(fù)債 負(fù)債名稱 負(fù)債 賬戶編號 負(fù)債 債務(wù)金 額 負(fù)債 嘗還金額 負(fù)債 嘗還余額 負(fù)債 說明 賬戶 賬戶名稱 負(fù)債 負(fù)債日 期裊樣祕廬廂顫諺鍘羋藺 FROM 賬戶 INNER JOIN 負(fù)債 ON 賬戶 賬戶編號 負(fù)債 賬戶編號 2 還債流水賬查詢?nèi)€債流水賬查詢?nèi)?SELECT 還債流水賬 負(fù)債編號 還債流水賬 賬戶編號 還債流水賬 還 債日期 還債流水賬 還債金額 還債流水賬 說明 賬戶 賬戶名稱 負(fù)債 負(fù)債 名稱 還債流水賬 編號 賬戶 開戶金額 負(fù)債 負(fù)債日期 負(fù)債 債務(wù)金額 負(fù) 債 嘗還金額倉嫗盤紲囑瓏詁鍬齊驁 FROM 賬戶 INNER JOIN 負(fù)債 INNER JOIN 還債流水賬 ON 負(fù)債 負(fù)債編號 還債流水賬 負(fù)債編號 ON 賬戶 賬戶編號 還債流水賬 賬戶編 號 綻萬璉轆娛閬蟶鬮綰瀧 3 流水賬查詢?nèi)魉~查詢?nèi)?SELECT 流水賬 編號 流水賬 交易日期 流水賬 賬戶編號 流水賬 項 目編號 流水賬 資金 流水賬 說明 收支項目 項目名稱 收支項目 類型 賬 戶 賬戶名稱驍顧燁鶚巰瀆蕪領(lǐng)鱺賻 FROM 賬戶 INNER JOIN 收支項目 INNER JOIN 流水賬 ON 收支 項目 項目編號 流水賬 項目編號 ON 賬戶 賬戶編號 流水賬 賬戶編號 瑣釙濺曖惲錕縞馭篩涼 某某某某大學(xué)畢業(yè)論文 第四章 系統(tǒng)實現(xiàn) 第 18 頁 共 49 頁 第四章第四章 系統(tǒng)實現(xiàn)系統(tǒng)實現(xiàn) 4 1 系統(tǒng)主界面系統(tǒng)主界面 通過數(shù)據(jù)庫分析設(shè)計 已經(jīng)完成了所有的后臺工作 現(xiàn)在需要通過 Visual Basic 來編寫程序 Visual Basic 是一種可視化的 面向?qū)ο蠛筒捎檬录?qū)動方式的結(jié)構(gòu)化高 級程序設(shè)計語言 可用于開發(fā) Windows 環(huán)境下的各類應(yīng)用程序 Visual 意即 可視的 可見的 指的是開發(fā)像 windows 操作系統(tǒng)的圖形用戶界面 Graphic User Interface GUI 的方法 它不需要編寫大量代碼去描述界面元素的外觀 和位置 只要把預(yù)先建立好的對象拖放到屏幕上相應(yīng)的位置即可 Basic 指的 是 Beginners all purpose symbolic instruction code 初始者通用符號指令代碼語 言 鎦詩涇艷損樓紲鯗餳類 Visual Basic 簡單易學(xué) 效率高 且功能強(qiáng)大可以與 Windowsr 專業(yè)開發(fā) 工具 SDK 相媲美 在 Visual Basic 環(huán)境下 利用事件驅(qū)動的編程機(jī)制 新穎 易用的可視化設(shè)計工具 使用 Windows 內(nèi)部的廣泛應(yīng)用程序接口 API 函 數(shù) 以用動態(tài)鏈接庫 DLL 對象的鏈接與世隔嵌入 OLE 開放式數(shù)據(jù) 連接 ODBC 等技術(shù) 可以高效 快速地開發(fā) Windows 環(huán)境下功能強(qiáng)大 圖形界面豐富的應(yīng)用軟件系統(tǒng) 隨著版本的提高 Visual Basic 的功能也越來 越強(qiáng) 5 0 版以后 Visual Basic 推出了中文版 與前個版本相比 其功能有 了很大提升 櫛緶歐鋤棗鈕種鵑瑤錟 4 1 1 創(chuàng)建工程項目 為了實現(xiàn)應(yīng)用程序 首先要建立一個工程 工程是用來構(gòu)建應(yīng)用程序的 文件的集合 通常包含如下文件 1 工程文件 vbp 某某某某大學(xué)畢業(yè)論文 第四章 系統(tǒng)實現(xiàn) 第 19 頁 共 49 頁 2 窗體文體 frm 3 窗體的二進(jìn)制數(shù)據(jù)文件 frx 4 類模塊文件 cls 5 標(biāo)準(zhǔn)模塊文件 bas 6 一個或多個包含 ActiveX 控件的文件 ocx 7 單個資源文件 res 啟動 Visual Basic 6 0 后 單擊 文件 新建工程 命令 在如圖 4 1 所 示對話框中選擇 VB 企業(yè)版控件 選項 然后單擊 確定 按鈕 Visual Basic 將自動創(chuàng)建一個 工程 1 工程項目 包含一個窗體文件夾和一個 Form1 窗 體 在項目的 屬性 面板中將工程的 Name 屬性改為 MMM 將 Form1 的 Caption 屬性改為 Manage Money Matters V1 0 轡燁棟剛殮攬瑤麗鬮應(yīng) 圖 4 1 VB 新建工程 對話框 4 1 2 創(chuàng)建系統(tǒng)主窗體 在創(chuàng)建工程項目 已經(jīng)創(chuàng)建了一個 Form1 窗體文件 將它直接作為 主窗體文件 系統(tǒng)主窗體的界面如圖 4 2 所示 在窗體上添加一個 某某某某大學(xué)畢業(yè)論文 第四章 系統(tǒng)實現(xiàn) 第 20 頁 共 49 頁 WB listbar 控件 用于調(diào)用系統(tǒng)各個功能模塊 其主要控件的屬性如表 4 1 所示 峴揚(yáng)斕滾澗輻灄興渙藺 圖 4 2 系統(tǒng)主界面 表 4 1 主窗體屬性設(shè)置 控件控件屬性屬性屬性值屬性值 Form1 Form BorderStyle Caption MaxButton MinButton StartUpPosition 1 Fixed Single Manage Money Matters 0 False 0 False 2 屏幕中心 WB listbar1 WB listbar MenuCaption1 MenuItemCaption11 MenuItemCaption12 理財信息管理 收支流水賬 賬戶一覽 某某某某大學(xué)畢業(yè)論文 第四章 系統(tǒng)實現(xiàn) 第 21 頁 共 49 頁 MenuItemCaption13 MenuItemCaption14 MenuItemCaption15 MenuItemCaption16 MenuCaption2 MenuItemCaption21 MenuItemCaption22 MenuItemCaption23 MenuItemCaption24 MenuCaption3 MenuItemCaption31 MenuCaption4 MenuCaption5 MenuItemCaption51 MenuCaption6 MenuItemCaption61 MenuItemCaption62 MenuItemCaption63 收支項目 資產(chǎn) 負(fù)債 還債流水賬 統(tǒng)計報表 年度收支統(tǒng)計表 按賬戶現(xiàn)金流量表 按項目現(xiàn)金流量表 資產(chǎn)負(fù)債表 理財知識 訪問理財知道網(wǎng) 備用功能 系統(tǒng)設(shè)置 賬套管理 關(guān)于 訪問作者主頁 關(guān)于 退出系統(tǒng) StatusBar1 StatusBar Align SimpleText TabIndex 2 Align Bottom 個人理財軟件 1 4 1 3 主窗口菜單 右擊 WB listbar1 控件 選擇彈出式菜單中的 屬性 命令 將出現(xiàn)如圖 4 3 所示的菜單編輯對話框 詩叁撻訥燼憂毀厲鋨驁 某某某某大學(xué)畢業(yè)論文 第四章 系統(tǒng)實現(xiàn) 第 22 頁 共 49 頁 圖 4 3 菜單編輯對話框 對菜單項操作的代碼如程序 4 1 所示 Private Sub WB listbar1 MenuItemClick MenuNumber As Long MenuItem As Long 則鯤愜韋瘓賈暉 園棟瀧 Select Case MenuNumber Case 1 Select Case MenuItem Case 1 F11load 調(diào)用出支流水賬管理模塊 Case 6 Case 3 Unload Me 結(jié)束程序運行 End Sub 某某某某大學(xué)畢業(yè)論文 第四章 系統(tǒng)實現(xiàn) 第 23 頁 共 49 頁 程序 4 1 菜單控制代碼 4 2 公用模塊公用模塊 在 Visual Basic 中 可以使用公用模塊來存放整個項目所需要的公用函 數(shù)和全局變量等 通過公用函數(shù)和變量可以極大地提高代碼的利用率 在項 目資源管理器中為項目添加一個模塊 并將其保存為 OperatDataBase bas 脹 鏝彈奧秘孫戶孿釔賻 4 2 1 OperatDataBase bas OperatDataBase bas 公用模塊主要是用來對數(shù)據(jù)庫進(jìn)行 ADO 操作的 包 括以下 5 個函數(shù) 1 GetConnStr As String 函數(shù) 返回連接字符串 用來設(shè)置數(shù)據(jù)庫連接 字符串 2 OpenConn ByRef Conn As ADODB Connection As Boolean 函數(shù) 返 回布爾值 用來打開數(shù)據(jù)庫連接 鰓躋峽禱紉誦幫廢掃減 3 ExecuteSQL ByValSQL As String ByRef msg As String 函數(shù) 用來執(zhí) 行 SQL 語句 稟虛嬪賑維嚌妝擴(kuò)踴糶 4 SelectSQL ByVal SQL As String ByRef msg As String As ADODB Recordset 函數(shù) 返回 Recordset 用來執(zhí)行查詢語句 陽簍埡 鮭罷規(guī)嗚舊巋錟 5 BatchSelectSQL ByVal SQL As String ByRef msg As String As ADODB Recordset 函數(shù) 返回 Recordset 用來執(zhí)行批處理操作 溈氣嘮 戇萇鑿鑿櫧諤應(yīng) 4 2 2 PublicVar bas 為了實現(xiàn)全局變量 別外創(chuàng)建一個全局變量模塊 PublicVar bas 主要有 某某某某大學(xué)畢業(yè)論文 第四章 系統(tǒng)實現(xiàn) 第 24 頁 共 49 頁 如下內(nèi)容 ConnectionString用來保存數(shù)據(jù)庫連接字符串 temP用來保存暫時傳值變量 temp1 用來保存全局臨時變量 1 temp2 用來保存全局臨時變量 2 t 編號 用來保存流水賬編號 4 3 ADO 數(shù)據(jù)訪問技術(shù)數(shù)據(jù)訪問技術(shù) ADO ActiveX Data Objects ActiveX 數(shù)據(jù)對象 是一個用于存取數(shù)據(jù)源 的 COM 組件 它提供了編程語言和統(tǒng)一數(shù)據(jù)訪問方式 OLE DB 的一個中間 層 允許開發(fā)人員編寫訪問數(shù)據(jù)的代碼而不用關(guān)心數(shù)據(jù)庫是如何實現(xiàn)的 而 只用關(guān)心到數(shù)據(jù)庫的連接 是一個用于存取數(shù)據(jù)源的 COM 組件 它提供了 編程語言和統(tǒng)一數(shù)據(jù)訪問方式 OLE DB 的一個中間層 允許開發(fā)人員編寫訪 問數(shù)據(jù)的代碼而不用關(guān)心數(shù)據(jù)庫是如何實現(xiàn)的 而只用關(guān)心到數(shù)據(jù)庫的連接 ADO 被設(shè)計來繼承微軟早期的數(shù)據(jù)訪問對象層 包括 RDO Remote Data Objects 和 DAO Data Access Objects 鋇嵐縣緱虜榮產(chǎn)濤團(tuán)藺 圖 4 4 ADO 類模型 某某某某大學(xué)畢業(yè)論文 第四章 系統(tǒng)實現(xiàn) 第 25 頁 共 49 頁 4 3 1 從 Microsoft Visual Basic 引用 ADO 的步驟 1 在 Visual Basic 中 從 工程 菜單中選擇 引用 2 從列表中選擇 Microsoft ActiveX Data Objects x x Library 懨俠劑鈍觸 樂鷴燼觶騮 3 請驗證至少還選擇了下列庫 Visual Basic for Applications Visual Basic runtime objects and procedures Visual Basic objects and procedures OLE Automation 4 單擊 確定 圖 4 5 4 3 2 在 Visual Basic 中創(chuàng)建 ADO 對象 在 Dim 中使用 New 關(guān)鍵字 可以只用一個步驟就完成 ADO 對象的 聲明和實例化 Dim conn As New ADODB Connection 或者 也可用兩個步驟來完成 Dim 語句聲明和對象實例化 某某某某大學(xué)畢業(yè)論文 第四章 系統(tǒng)實現(xiàn) 第 26 頁 共 49 頁 Dim conn As ADODB Connection Set conn New ADODB Connection 4 4 FlexCell 表格控件表格控件 FlexCell 是一款靈活 易用的表格和報表控件 因本系統(tǒng)中多處應(yīng)用此 控件 在此對其功能進(jìn)行簡單介紹 謾飽兗爭詣繚鮐癩別瀘 FlexCell 提供了 6 種單元格類型和 6 種圖表類型 提供了合并單元格 虛表 打印和打印預(yù)覽等功能 支持剪貼板操作 XML 文件的導(dǎo)入和導(dǎo)出 不需要 Excel 運行庫支持就可以導(dǎo)出為 Excel WorkBook 軟件包中附帶報表 設(shè)計器 只需很少的代碼就可以制作出圖文并茂的報表和程序界面 咼鉉們歟謙 鴣餃競蕩賺 圖 4 6 某某某某大學(xué)畢業(yè)論文 第四章 系統(tǒng)實現(xiàn) 第 27 頁 共 49 頁 圖 4 7 主要特點 主要特點 功能全面功能全面 FlexCell 提供了非常全面的功能 例如 打開 保存文件 不需 要 Excel 運行庫的支持直接導(dǎo)出 Excel 導(dǎo)出 CSV 導(dǎo)出 HTML 導(dǎo)出 導(dǎo)入 XML 打印 打印預(yù)覽 凍結(jié)行列 排序 添加 Chart 合并單元格 虛表 模式 OwnerDraw 模式 瑩諧齷蘄賞組靄縐嚴(yán)減 表格設(shè)計器表格設(shè)計器 FlexCell 表格設(shè)計器是一個獨立的工具 開發(fā)人員可以使用 它來制作表格模板 然后將表格保存為 cel 文件 也可以導(dǎo)出成 XML 文件 然后可以在程序運行時使用 OpenFile 方法或 LoadFromXML 方法加載表格模 板 這樣做可以極大地減少編程人員的工作量 使用少量代碼即可設(shè)計出復(fù) 雜的表格 麩肅鵬鏇轎騍鐐縛縟糶 打印方便打印方便 FlexCell 提供了方便的打印和預(yù)覽功能 您可以通過 PageSetup 對象修改頁面設(shè)置 例如 紙張大小 紙張方向 設(shè)置打印范圍 單色打印 頁邊距 頁眉和頁腳 可以在每一頁都重復(fù)打印的標(biāo)題行和標(biāo)題列 您還可 以添加不會顯示在 Grid 中的分頁符和報表標(biāo)題 納疇鰻吶鄖禎銣膩鰲錟 對象模型對象模型 精心設(shè)計的對象模型 可以使程序的條理更加清晰 FlexCell 提供了 10 個類 某某某某大學(xué)畢業(yè)論文 第四章 系統(tǒng)實現(xiàn) 第 28 頁 共 49 頁 Cell Chart Column ComboBox Image PageBreak PageSetup Range ReportTitle Selection 風(fēng)攆鮪貓鐵頻鈣薊糾廟 單元格類型單元格類型 FlexCell 提供了 6 種單元格類型 TextBox ComboBox CheckBox Calendar Button HyperLink 滅噯駭諗鋅獵 輛覯餿藹 單元格屬性單元格屬性 FlexCell 提供了豐富的單元格屬性 例如 Alignment BackColor Border CellType Font ForeColor Locked Mask Printable Tag Text WrapText 鐒鸝餉飾鐔閌貲諢癱騮 單元格單元格 Mask FlexCell 提供了多種 Mask 如 Letter Upper Lower Numeric Value 等 能夠自動控制用戶輸入 減少 輸入錯誤 攙閿頻嶸陣澇諗譴隴瀘 內(nèi)置內(nèi)置 Chart FlexCell 提供了 6 種類型的圖表 柱狀圖 折線圖 餅圖 3D 柱狀圖 3D 折線圖 3D 餅圖 趕輾雛紈顆鋝討躍滿賺 合并單元格合并單元格 FlexCell 提供了靈活方便的合并單元格功能 操作方式和 Excel 很相似 支持剪貼板操作支持剪貼板操作 FlexCell 支持剪貼板操作 可以自由復(fù)制 剪切 粘貼 單元格內(nèi)容和格式 可以和 Excel Notepad 等軟件互相復(fù)制 粘貼文本 夾覡 閭輇駁檔驀遷錟減 4 5 賬套管理賬套管理 用于新建賬套或打開 刪除已存在的賬套文件 單擊菜單 系統(tǒng)設(shè)置 賬 套管理 進(jìn)入 如圖 4 8 所示 某某某某大學(xué)畢業(yè)論文 第四章 系統(tǒng)實現(xiàn) 第 29 頁 共 49 頁 圖 4 8 賬套管理界面 表 4 2 控件屬性設(shè)置 控件控件屬性屬性屬性值屬性值 ListView1 ListView AllowColumnreorder Checkboxes Arrange False False 1 lvwAutoLeft ImageList1 ImageList ImageHeight ImageWidth UseMaskColor 32 32 True File1 FileListBox Archive CausesValidation Pattern ReadOnly True True mdb True 某某某某大學(xué)畢業(yè)論文 第四章 系統(tǒng)實現(xiàn) 第 30 頁 共 49 頁 4 5 1 選用賬套 位于個人理財分析助手軟件安裝目錄文件夾中的所有賬套均會在賬套管 理界面中顯示出來 選擇要使用的賬套后點擊 選用賬套 即可打開使用 程 序序代碼如程序 4 2 所示 視絀鏝鴯鱭鐘腦鈞欖糲 選用賬套 Private Sub Command26 Click If File1 ListCount 0 Then 如果已從賬套列表中選擇了一個賬套則將賬套信息寫入注冊表偽 澀錕攢鴛擋緬鐒鈞錠 將賬套信息寫入注冊表中 SaveSetting App EXEName SETUP ConnectionString ListView1 SelectedItem緦徑銚膾齲轎 級鏜撟廟 MsgBox 已啟用 ListView1 SelectedItem 賬套 Unvisible End If End Sub 程序 4 2 選用賬套程序代碼 4 5 2 新建賬套 一個賬套就是一個獨立的數(shù)據(jù)庫文件 根據(jù)不同用戶的需求 建立一個 或多個賬套 在 新建賬套 后的輸入框里自定義一個名稱 如 溫馨小家 2007 按 確定 按鈕后系統(tǒng)自動進(jìn)入該賬套 新建賬簿存放的路徑為軟件安 裝目錄文件夾中 文件名為 溫馨小家 2004 mdb 程序序代碼如程序 4 3 所 示 騅憑鈳銘僥張礫陣軫藹 新建賬套 Private Sub Command24 Click Dim a As String On Error GoTo ErrorHandler 輸入一個賬套名稱 a InputBox 請輸入新賬套名稱 新建賬套 If Trim a Or IsNull a Then 如果賬套名稱不為空則創(chuàng)建此賬套癘騏鏨農(nóng)剎貯獄顥 幗騮 MsgBox 新建賬套未成功 某某某某大學(xué)畢業(yè)論文 第四章 系統(tǒng)實現(xiàn) 第 31 頁 共 49 頁 Else 通過文件復(fù)制 用賬套模版創(chuàng)建新賬套 FileCopy App Path mmm emp App Path a mdb 鏃鋝過潤啟婭澗駱讕瀘 MsgBox 新建賬套成功 F51load 選用剛新建的賬套為當(dāng)前使用賬套 Command26 Click End If Exit Sub ErrorHandler 如出現(xiàn)錯誤 顯示錯誤信息 Screen MousePointer 0 MsgBox Err Description vbExclamation Error Err Clear End Sub 程序 4 3 新建賬套程序代碼 4 5 3 刪除賬套 本界面上會列出軟件安裝目錄文件夾中的所有賬套 點擊要刪除的賬套 按 刪除 按鈕并確認(rèn)即可 當(dāng)刪除成功后系統(tǒng)自動選用賬套列表中第一個賬 套為當(dāng)前使用賬套 程序序代碼如程序 4 4 所示 榿貳軻謄壟該檻鯔塏賽 刪除賬套 Private Sub Command25 Click Dim N1 As Integer On Error GoTo ErrorHandler If ListView1 ListItems Count 0 Then 如果賬套列表中不為空則可進(jìn)行賬套刪除處理邁蔦賺陘 賓唄擷鷦訟湊 N1 MsgBox