1、PAGE 2編號：106案忻 州 師 范扒 學 院背計算機系本科阿畢業骯（設計）盎論文扮課題名稱背忻州師范學院食胺堂財務管理系統百的設計與實現礙專 業襖計 算 機 科班 學 與 技 伴術芭姓 名凹蔣扮鋒岸學 號埃2 0 0 3八 0 8 1 白1 1 0 2壩 1胺指導教師伴鄭志扳榮二零零七年六月 PAGE I目 錄TOC o 1-3 h z u HYPERLINK l _Toc170204706 斑1扳 熬引唉 斑言襖 PAGEREF _Toc170204706 h 案1 HYPERLINK l _Toc170204707 按2 扳需求分析按 PAGEREF _Toc170204707 h

2、敗3 HYPERLINK l _Toc170204708 按2.1 扒需求描述俺 PAGEREF _Toc170204708 h 跋3 HYPERLINK l _Toc170204709 敖2.2 胺業務分析癌 PAGEREF _Toc170204709 h 佰3 HYPERLINK l _Toc170204710 皚2.3 巴數據分析埃 PAGEREF _Toc170204710 h 扮3 HYPERLINK l _Toc170204711 骯2.4 藹數據字典擺 PAGEREF _Toc170204711 h 澳3 HYPERLINK l _Toc170204712 芭3 艾系統設計辦 P

3、AGEREF _Toc170204712 h 骯9 HYPERLINK l _Toc170204713 癌3.1 跋系統功能模擺塊襖設計叭 PAGEREF _Toc170204713 h 阿9 HYPERLINK l _Toc170204714 敖3.2 愛數據庫設計拌 PAGEREF _Toc170204714 h 壩11 HYPERLINK l _Toc170204715 安3.2.1 巴概念模型的設計巴 PAGEREF _Toc170204715 h 礙11 HYPERLINK l _Toc170204716 半3.2.2 襖數據庫邏輯結構斑的設計癌 PAGEREF _Toc170204

4、716 h 案12 HYPERLINK l _Toc170204717 版3.3半 伴系統詳細設計佰 PAGEREF _Toc170204717 h 懊15 HYPERLINK l _Toc170204718 暗3.3.1 盎憑證處理模塊的凹設計骯 PAGEREF _Toc170204718 h 擺15 HYPERLINK l _Toc170204719 熬3.3.2 癌帳簿處理模塊的班設計捌 PAGEREF _Toc170204719 h 吧18 HYPERLINK l _Toc170204720 罷3.3.3 敗科目維護模塊的扳設計皚 PAGEREF _Toc170204720 h 安21

5、 HYPERLINK l _Toc170204721 笆4鞍 翱系統實現芭 PAGEREF _Toc170204721 h 壩22 HYPERLINK l _Toc170204722 懊4.1安系統開發平臺介笆紹啊 PAGEREF _Toc170204722 h 板22 HYPERLINK l _Toc170204723 柏4.2啊系統功能模塊介伴紹笆 PAGEREF _Toc170204723 h 阿22 HYPERLINK l _Toc170204724 背4.3吧憑證處理模塊的巴實現皚 PAGEREF _Toc170204724 h 百23 HYPERLINK l _Toc1702047

6、25 凹4.版4霸 霸帳簿記帳模塊的骯實現拜 PAGEREF _Toc170204725 h 岸25 HYPERLINK l _Toc170204726 佰4.埃5岸 氨帳簿查詢模塊的啊實現鞍 PAGEREF _Toc170204726 h 芭27 HYPERLINK l _Toc170204727 擺5 敖系統測試邦 PAGEREF _Toc170204727 h 骯30 HYPERLINK l _Toc170204728 藹5.1斑 擺測試環境阿 PAGEREF _Toc170204728 h 傲30 HYPERLINK l _Toc170204729 巴5.2 背測試步驟按 PAGERE

7、F _Toc170204729 h 拌30 HYPERLINK l _Toc170204730 矮5.3 霸測試結果襖 PAGEREF _Toc170204730 h 斑30 HYPERLINK l _Toc170204731 翱6 敗結束語昂 PAGEREF _Toc170204731 h 笆31 HYPERLINK l _Toc170204732 致謝 PAGEREF _Toc170204732 h 32 HYPERLINK l _Toc170204733 參考文獻 PAGEREF _Toc170204733 h 33忻州師范學院計算機系學士學位論文忻州師范學院計算機系學士學位論文 PAG

8、E 1擺忻州師范學院食礙堂財務管理系統板的設計與實現皚 摘要：翱通過對忻州師范吧學院食堂財務管叭理部門財務管理罷的需求調查和需拌求分析,為忻州芭師范學院食堂財隘務管理部門設計扒了拜“鞍食堂財務管理系耙統扳”懊。該系統包括憑敖證管理、帳簿記岸帳、帳簿查詢、辦報表管理、系統爸維護五個功能模板塊。其中憑證管八理模塊提供憑證哎的填制、查詢和疤匯總功能；帳簿昂記帳模塊提供按罷照記帳憑證登記襖帳簿的功能，包傲括日記帳記帳、壩明細帳記帳和總扒帳記帳；帳簿查岸詢模塊提供按月叭查詢帳簿的功能艾，包括日記帳查敖詢、明細帳查詢敖和總帳查詢；報百表管理模塊提供柏按照帳簿記錄生隘成財務報表的功扒能；系統維護模佰塊包括用

9、戶管理俺、科目維護和數安據備份功能。盎并用Micro八soft Vi笆sual Ba霸sic 6.0八實現了該系統。搬熬關鍵字：拜信息系統財務案管理會計電算白化笆巴Abstrac暗t：澳This ar奧ticle板 敗investi拌gates a巴nd anal安yzes th埃e皚 埃needs o百f the c把anteens白翱 癌 financ翱ial man埃agement胺 in 擺Xinzhou八 巴Teach扳ers Col鞍lege辦 and de藹signs t稗he can頒teens f按inancia班l manag叭ement s伴ystem 按 for th拔

10、e cante佰ens盎 拜financi阿al mana骯gement.半 The sy敗stem co版nsists 疤of five拌 functi啊onal se版ctions:按 vouche翱r manag盎ement, 叭account啊 regist案er, acc埃ount au拜diting,矮 form m背anageme斑nt, sys鞍tem mai扮ntenanc唉e.頒 昂The vou癌cher ma拔nagemen背t offer挨s the f靶unction板s of fi唉lling o百ut, che靶cking a襖ccounts盎 and ga骯t

11、hering叭 the vo罷uchers.巴 The ac把count r翱egister般 functi隘ons the耙 regist愛ering o敖f accou翱nts acc叭ording 辦to vouc般hers, w懊hich in班cludes 挨journal敖ing acc傲ounts, 霸detaile暗d accou按nts and疤 overal藹l accou吧nts. Th翱e accou擺nt audi懊ting pr啊ovides 叭the fun板ction o襖f audit班ing acc邦ounts m靶onthly 拔includi班ng th

12、e 般auditin疤g of jo案urnalin百g accou癌nts, de巴tailed 罷account柏s and o吧verall 懊account昂s. The 案form ma哀nagemen氨t gives芭 the fu斑nctions矮 of mak案ing acc皚ounts s俺tatemen敖t forms澳 in acc半ordance艾 with t拌he reco佰rd in a擺ccount 埃books. 皚The sys阿tem mai翱ntenanc礙e inclu擺des fun扮ctions 暗of user扳 manage氨ment, s斑u

13、bjects巴 maint凹enance 斑and dat扒a savin絆g and r盎un this版 system盎 with M敗icrosof俺t Visua扮l Basic扒 6.0. 版 笆 辦K挨eywords辦：霸Informa耙tion sy岸stems霸 阿financi凹ng邦 唉adminis班tr伴ation 矮 靶account捌 comput按er 鞍calcula班ti癌on稗1襖 引 言哀忻州師范學院食敖堂財務管理現在板所采取的方式是胺傳統的手工管理阿方式。忻州師范學院食堂財務管理系統的設計與實現忻州師范學院計算機系學士學位論文 PAGE 42 PAGE

14、41埃忻州師范學院食俺堂財務管理所涉班及的會計檔案包扒括原始憑證、記哀帳憑證、日記帳拌、明細帳、總帳頒和會計報表等。鞍每個會計期間的俺會計檔案都要按愛一定的要求排列氨并連同各種附件邦裝訂成冊，耗費骯了大量的時間，熬查找不便，易于拜損壞。傲隨著科學技術的襖飛速發展，以及俺數據庫技術的日背益成熟，使用計靶算機來代替手工氨會計也成為了必叭然趨勢。會計電拜算化是以計算機按為工具，按照會捌計特有的方法，暗反映企業的經營疤情況，是提供以版財務信息為主的挨信息系統。挨本論文就是對忻捌州師范學院食堂班財務管理的實際熬狀況，進行了全爸面的需求分析,白詳細設計了該系挨統，并用扳Microso拜ft Visu佰al

15、 Basi鞍c 6.0安實現了該系統。2 需求分析班2.1 懊需求描述背忻州師范學院食般堂財務的具體管版理過程是：根據把發生的經濟業務佰填制會計憑證，艾根據會計憑證登佰記會計帳簿，根熬據會計帳簿的記霸錄編制會計報表百。這個順序必須捌依次進行，不允辦許也不可能任意挨顛倒。稗忻州師范學院食佰堂財務管理所采叭取的具體步驟是敖：收集有關經濟盎業務的數據、分隘析經濟業務、編絆制會計分錄、過百入有關帳簿、編凹制調整前試算表百、編制調整分錄耙并過入分類帳、稗編制調整后試算般表、編制結帳分半錄并過入分類帳安，編制結帳后試熬算表、根據有關皚帳表資料編制會版計報表。班2.2懊 業務分析阿根據需求調查，拔對忻州師范

16、學院岸食堂財務處理的矮業務處理過程進按行分析。其業務澳處理流程如圖2絆.1所示。哀2.3爸 數據分析敗根據忻州師范學敗院食堂財務管理把的業務流程圖，盎分析得出忻州師愛范學院食堂財務霸管理系統的數據氨流圖如圖笆2.2跋、圖啊2.3拔、圖搬2.4挨、圖邦2.5扮、圖藹2.6芭所示。挨2.4芭 數據字典靶八記帳憑證昂拜伴翱哀日期把疤翱愛憑證編號霸拜+佰襖摘要阿辦懊案科目編號芭懊胺絆科目名稱藹笆翱壩貸方金額藹班艾俺借方金額按艾叭稗貸方金額合計吧艾邦扳借方金額合計安按疤癌審核人搬敖半俺制單人般奧埃埃出納澳扳背霸附件張數翱翱瓣日期斑藹搬頒按年份傲頒氨骯月份安版氨拔日期般艾百把憑證編號胺白懊=斑拜年份芭暗+

17、埃隘月份靶頒+哀叭日期擺挨+癌藹順序號埃伴笆順序號皚斑唉= * 長度為俺3的數字串 *擺摘要笆伴= * 任意長俺度的字符串 *鞍科目編號擺笆=一級科目編澳號+二級科案目編號+三扒級科目編號胺一級科目編號敖叭凹= * 長度為奧3巴的有序數字串 奧*奧二級科目編號澳霸翱= * 長度為半2胺的有序數字串 埃*昂三級科目編號絆礙安= * 長度為愛2般的有序數字串 矮*暗科目名稱搬吧= * 任意長阿度的字符串 *搬貸方金額擺柏=板1昂數字愛9岸借方金額頒矮=啊1靶數字埃9瓣 笆借方金額合計跋搬拜=斑1板數字氨9俺貸方金額合計藹霸靶=癌1芭數字跋9傲審核人板拜= * 任意長熬度字符串 *盎制單人哀把= *

18、 任意長挨度字符串 *疤出納盎傲= * 任意長挨度字符串 *啊附件張數傲頒=把1芭數字矮3 瓣 科目氨類別巴隘= 資產|胺負債|所啊有者權益|拌成本|利潤邦|費用擺 日記岸帳巴跋=日期+靶憑證編號+挨科目編號+岸科目名稱+氨摘要+借方柏金額+貸方爸金額+余額胺絆 明細唉帳芭暗=日期+奧憑證編號+熬科目編號+扳科目名稱+版摘要+借方隘金額+貸方按金額+余額哀+余額方向靶昂 總帳藹鞍案=日期+跋憑證編號+哀科目編號+安科目名稱+安摘要+借方罷金額+貸方跋金額+余額柏+余額方向把疤 余額辦胺矮=扳1耙數字襖9伴 余額班方向藹盎= 借|扮貸安 會計捌報表半艾=科目名稱班+期初余額芭+本期借方發藹生額+

19、本期擺貸方發生額+佰期末余額翱期初余額翱爸=叭1皚數字百9伴本期借方發生絆額襖懊=白1捌數字敖9拌本期貸方發生骯額矮俺=背1暗數字稗9伴期末余額罷扮=扒1耙數字愛9暗用戶名礙稗=耙1癌數字扒4笆密碼白癌=1數字|字壩符4白 科目霸性質奧隘=銀行|巴外幣|數量拌|往來|芭部門|個昂人|項目會計人員原始憑證填制憑證記帳憑證原始憑證審核憑證記帳憑證原始憑證記日記帳記明細帳匯總憑證記帳憑證原始憑證記總帳日記帳總帳明細帳編制報表會計報表會計人員帳目核對帳目核對圖2.1忻州師范學院食堂財務管理業務流程圖財務管理系統圖2.2 忻州師范學院食堂財務管理系統頂級數據流圖會計人員會計人員1 帳務準備2 憑證編輯科

20、目代碼、屬性記帳憑證3 日記帳核算4 明細帳核算5 匯總憑證記帳憑證記帳憑證科目代碼、屬性科目代碼、屬性記帳憑證記帳憑證6 總帳核算記帳憑證記帳憑證記帳憑證記帳憑證憑證匯總記帳憑證記帳憑證7 編制報表日記帳會計報表總帳明細帳日記帳會計報表總帳會計報表總帳明細帳日記帳明細帳圖2.3 忻州師范學院食堂財務管理系統一級數據流圖會計會計辦 傲 記帳憑證憑證匯總3.1 日記帳建帳3.1 日記帳記帳3.1 日記帳結帳日記帳4.1 明細帳建帳4.2 明細帳記帳4.3 明細帳結帳明細帳6.1 總帳建帳6.2 總帳記帳6.3 總帳結帳總 帳8 帳簿查詢查詢結果記帳憑證日記帳記帳憑證日記帳日記帳明細帳明細帳明細帳

21、總帳總帳總帳日記帳總帳明細帳圖2.5 忻州師范學院食堂財務管理系統帳簿處理二級數據流圖5 匯總憑證2.2 憑證審核記帳憑證2.3 憑證查詢記帳憑證記帳憑證記帳憑證未通過審核的記帳憑證記帳憑證記帳憑證匯總憑證記帳憑證記帳憑證審核后的記帳憑證查詢結果2.1 憑證錄入科目代碼、屬性圖2.4 忻州師范學院食堂財務管理系統憑證編輯二級數據流圖日記帳明細帳總帳報表參數報表數據報表目錄報表格式7.1 報表設置7.2 報表編制9 報表查詢日記帳明細帳報表格式報表目錄報表數據報表參數總帳明細帳日記帳會計報表查詢結果會計報表查詢結果會計報表會計報表圖2.6 忻州師范學院食堂財務管理系統報表處理二級數據流圖會計 3

22、 系統設計頒3.1半 系統功能模塊搬設計財務管理系統帳務準備憑證處理帳簿處理報表處理系統維護憑證審核憑證匯總憑證查詢帳簿核算日記帳核算明細帳核算總帳核算結帳記帳建帳帳簿查詢報表查詢報表編制報表設置圖3.1 忻州師范學院食堂財務管理系統功能模塊圖憑證填制科目維護用戶管理數據備份哎根據數據流圖，巴設計系統功能模壩塊如圖啊3.巴1芭所示。把系統各功能模塊靶簡介哀：帳務準備罷帳務準備模塊的佰功能是完成對忻哀州師范學院食堂搬財務管理系統的昂初始化工作，通艾常包括：科目編岸碼規則的設置、伴科目屬性的設置頒、憑證類別的設暗置、帳套屬性的扮設置、會計期間芭的選擇、和數據阿庫參數的設置。二、憑證處理班憑證處理模

23、塊的邦功能是完成對憑敗證的日常處理，百通常包括：憑證佰填制、憑證審核俺、憑證匯總和憑稗證查詢。1、憑證填制澳憑證填制的功能百是完成對日常憑伴證的錄入工作，把基本過程是：通哎過憑證填制窗口哀，財務人員輸入把一張記帳憑證的礙數據。錄入完成氨后進行檢查：若礙錄入正確，則保按存憑證，等待下八一張憑證的錄入癌；否則，不予保百存，等待財務人扒員修改。2、憑證審核扮憑證審核所提供拜的功能是對錄入斑的記帳憑證進行班正確性、合法性藹和有效性審核；板對審核無誤的憑啊證作審核通過標耙記。審核人與制暗單人不能是同一傲人；憑證一經審擺核通過，在未取拔消審核之前不能瓣刪除或修改；取爸消審核只能由審懊核人自己完成。3、憑證

24、匯總藹憑證匯總所提供柏的功能是將記帳白憑證按照指定的阿范圍和條件，匯凹總憑證中會計科敖目所對應的一級案科目的借方發生藹額和貸方發生額班，并將匯總后的皚數據送入科目項骯數據庫文件的對般應會計科目中。4、憑證查詢哎憑證查詢所提供斑的功能是按照一盎定的查詢條件對半各種記帳憑證包搬含未審核的記帳捌憑證和已審核的拜記帳憑證進行查按詢并將查詢結果笆顯示在屏幕上。三、帳簿處理哀帳簿處理模塊所俺提供的功能包括翱帳簿核算功能和按帳簿查詢功能，愛其具體功能介紹斑如下：1、帳簿核算盎帳簿核算的功能哀是根據記帳憑證艾數據庫文件中已靶通過審核的憑證藹，自動更新帳務吧數據庫文件，得敗到帳簿和報表所俺需的匯總信息和擺明細信

25、息。帳簿翱核算包括日記帳奧的核算、明細帳敖的核算和總帳的藹核算，帳簿核算爸的具體處理過程皚如下：擺(案1埃) 版檢查記帳憑證是伴否平衡。頒(骯2翱) 俺對記帳前的所有翱數據進行備份。矮(哎3般) 絆打開相關文件開芭始記帳。暗(安4扮) 傲關閉所有文件結頒束記帳。2、帳簿查詢啊帳簿查詢所提供班的功能是按照一擺定的查詢條件對胺日記帳、明細帳盎和總帳進行查詢拌并將查詢結果顯罷示在屏幕上。四、報表處理百報表處理模塊所鞍提供的功能包括凹報表的設置、報柏表的編制和報表絆的查詢，其具體阿功能介紹如下：報表設置辦報表設置所提供吧的功能是設置財班務報表的各項參案數，為財務報表板的自動生成白做叭準備，通常包括皚：

26、報表格式的設安置、報表目錄的案設置、報表數據版的設置和報表參百數的設置。2、報表編制瓣報表編制所提供柏的功能是根據帳柏簿資料，按月自霸動生成財務報表把，通常包括：資隘產負債表、利潤扮表和現金流量表傲。3、報表查詢瓣報表查詢所提供拔的功能是按照一佰定的查詢條件對疤財務報表進行查阿詢，并將查詢的爸結果顯示在屏幕搬上。五、系統維護靶系統維護模塊所奧提供的功能有科安目維護、用戶管翱理和數據備份1、科目維護扳科目維護的功能隘是使財務人員可藹以根據需要設置暗適合自身業務特岸點的會計科目體叭系。2、用戶管理笆用戶管理提供的襖功能是實現對財昂務人員分工的設耙置和管理3、數據備份伴數據備份所提供骯的功能是定期為

27、昂該財務管理系統扳的數據庫文件皚做熬備份，確保系統襖使用的安全。襖3.2搬 數據庫設計壩3.2.1背 概念模型的設骯計扒根據數據流圖，敗設計概念模型板(E-R圖)如挨圖扮3.2暗所示。明細帳記帳憑證日記帳科目項總帳記帳記帳匯總記帳核對核對1n1nnn111nn圖3.2 概念模型m霸圖中各實體和骯聯系巴的屬性如下所示吧：埃明細帳(會計年斑，月份，日期，啊憑證編號拜，礙科目代碼白，摘要，科目名啊稱，借方金額，鞍貸方金額，余額版方向，余額)岸日記帳（會計年傲，月份，日期，擺憑證編號伴，案科目代碼奧，摘要，科目名襖稱，借方金額，骯貸方金額，余額翱）艾記帳憑證（日期哀，昂憑證編號唉，摘要，附件張熬數，科

28、目代碼，啊科目名稱，部門板，項目，記帳，把出納，審核，制癌單，借方金額，搬貸方金額，借方巴合計，貸方合計阿）扮科目項（叭科目代碼敗，科目名稱，科安目類別，科目性扳質，期初余額，班余額方向）搬匯總（會計年，艾月份，日期，憑艾證編號，科目代耙碼，摘要，科目搬名稱，借方盎金額，貸方金額靶，余額方向，余胺額把）佰3.2.2芭 數據庫邏輯結板構的設計爸根據概念模型，隘按照概念模型向捌邏輯結構轉換的跋相關規則并結合扮規范化理論設計柏數據庫邏輯結構白如表柏3.1斑、表白3.2矮、表跋3.3拜、表扳3.4佰、表疤3.5按、表唉3.6阿、表半3.7所示。 拌表埃3.1班 用戶記錄胺字段名稱捌字段類型伴長度擺備注

29、案用戶ID白文本瓣 3敖主鍵澳密碼藹文本伴 4襖不為空板表藹3.2稗 憑證記錄阿字段名稱頒字段類型白長度斑備注瓣日期拌日期/時間藹 8胺不為空矮憑證編號爸文本邦11耙主鍵半過帳否拔邏輯靶 2巴不為空扮附件張數熬整型骯 3壩可為空搬制單人挨文本鞍 4柏不為空拜審核人哀文本佰 4安不為空般記帳人敗文本奧 4耙不為空扳表氨3.3敗 憑證明細案字段名稱懊字段類型背長度爸備注澳日期藹時間/日期翱 8捌不為空半憑證編號斑文本奧11靶主鍵叭科目編號案文本斑 7百不為空哀科目名稱熬文本捌 6唉不為空搬摘要岸文本拔10邦不為空罷對方科目邦備注阿 6頒可為空愛借方金額拌貨幣懊 9熬不為零暗貸方金額敖貨幣昂 9叭不

30、為零跋借方合計瓣貨幣癌 9拜不為零背貸方合計扳貨幣柏 9埃不為零矮表八3.4啊 日記帳耙字段名稱跋字段類型氨長度芭備注胺日期阿時間/日期矮 8芭不為空胺憑證編號敖文本搬11阿主鍵頒科目編號阿文本啊 7芭主鍵皚科目名稱笆文本骯 6埃不為空凹摘要挨文本凹10矮不為空絆借方金額案貨幣矮 9艾不為零岸貸方金額柏貨幣哀 9邦不為零拔余額 疤貨幣敖 9哀可為零熬表昂3.5拌 明細帳稗字段名稱巴字段類型拔長度礙備注拜日期絆時間/日期哀 8扮不為空疤憑證編號骯文本霸11巴主鍵伴科目編號壩文本爸 7芭主鍵笆科目名稱爸文本爸 6拔不為空俺摘要唉文本扒10背不為空版借方金額背貨幣鞍 9跋不為零胺貸方金額扳貨幣澳 9

31、案不為零罷余額方向瓣文本白 1笆借、貸、平辦余額礙貨幣暗 9熬可為零疤表唉3.6 哎總帳辦字段名稱澳字段類型跋長度罷備注壩日期巴時間/日期俺 8壩不為空阿憑證編號耙文本芭11拌主鍵版科目編號稗文本般 7柏主鍵唉科目名稱拔文本岸 6稗不為空稗摘要叭文本把10百不為空頒借方金額凹貨幣拌 9邦不為零半貸方金額艾貨幣叭 9熬不為零把表骯3.7傲 科目項芭字段名熬類型版長度扒備注靶字段名澳類型扳長度板備注班科目編號案文本罷 7按主鍵白LJ06版貨幣藹 9扒6哀月借方發生額拔科目名稱礙文本挨 6安不為空俺LD06俺貨幣辦 9安6阿月貸方發生額半科目性質辦文本凹 4骯不為空瓣Ye06阿貨幣版 9白6絆月余額

32、藹科目類別扒文本伴 4百不為空愛LJ07辦貨幣把 9哎7阿月借方發生額壩末級吧邏輯板 1白是否八LD07胺貨幣哎 9擺7頒月貸方發生額哎過帳拜邏輯安 1艾是否伴Ye07芭貨幣熬 9版7吧月余額笆余額方向叭文本敖 1霸借、貸、平敖LJ08擺貨幣隘 9跋8背月借方發生額板Ye拔00背貨幣皚 9靶年初余額氨LD08愛貨幣骯 9凹8吧月貸方發生額暗LJ00奧貨幣哎 9按年初借方金額哀Ye08胺貨幣扳 9芭8鞍月余額邦LD00拔貨幣澳 9盎年初貸方金額霸LJ09哀貨幣皚 9柏9笆月借方發生額背LJ01艾貨幣艾 9八1叭月借方發生額柏LD09扒貨幣邦 9絆9擺月貸方發生額礙LD01阿貨幣絆 9辦1靶月貸方

33、發生額阿Ye09暗貨幣澳 9按9芭月余額岸Ye01敖貨幣八 9擺1笆月余額阿LJ10阿貨幣藹 9盎10笆月借方發生額啊LJ02吧貨幣白 9昂2捌月借方發生額敖LD10氨貨幣敗 9敖10版月貸方發生額拜LD02皚貨幣巴 9挨2板月貸方發生額澳Ye10啊貨幣絆 9骯10扒月余額襖Ye02耙貨幣耙 9奧2岸月余額壩LJ11把貨幣把 9笆11拜月借方發生額爸LJ03熬貨幣芭 9辦3翱月借方發生額壩LD11昂貨幣扒 9靶11胺月貸方發生額搬LD03叭貨幣巴 9扒3癌月貸方發生額隘Ye11班貨幣罷 9胺11捌月余額啊Ye03哎貨幣耙 9半3氨月余額熬LJ12版貨幣傲 9白12哎月借方發生額敗LJ04靶貨幣

34、背 9爸4敖月借方發生額翱LD12壩貨幣愛 9傲12拌月貸方發生額藹LD04笆貨幣爸 9叭4扮月貸方發生額扮Ye12哎貨幣笆 9俺12稗月余額扳Ye04半貨幣矮 9吧4捌月余額耙QCye敗貨幣按 9澳期初余額拔LJ05敗貨幣伴 9靶5懊月借方發生額般BQjf安貨幣吧 9氨本期借方發生額奧LD05癌貨幣疤 9敗5壩月貸方發生額唉BQdf愛貨幣扒 9熬本期貸方發生額擺Ye05百貨幣哎 9敖5骯月余額扳3.3扒 斑系統詳細設計敗3.3.1骯 憑證處理模塊凹的設計增加憑證熬增加憑證記錄過霸程流程圖如圖巴3.3巴所示。開始權限檢測打開憑證記錄庫表退出？顯示憑證填制界面輸入憑證編號編號正確？輸入憑證日期日

35、期正確？輸入附件張數保存憑證結束顯示編號錯顯示憑證日期錯誤YNYNYN圖3.3 增加憑證記錄過程流程圖 開始權限檢測打開憑證明細庫表顯示憑證填制界面退出？N輸入科目編碼是否存在？有下級科目？輸入金額金額0？追加空記錄更新記錄憑證刷新顯示結束顯示無此科目不是末級科目金額不能為零NNNYYYY圖3.4 增加憑證明細過程流程圖輸入摘要邦增加憑證明細過皚程流程圖如圖版3.4奧所示。疤 顯示憑證填制界面獲得未記帳的憑證的編號范圍產生憑證編號編號越界？顯示憑證審核通過？加審核標志返回刪除審核標志YYNN開始圖3.5 憑證審核過程流程圖二、憑證審核搬憑證審核過程流頒程圖如圖搬3.5耙所示。般3.3.2吧 帳

36、簿處理模塊芭的設計記帳翱記帳過程流程圖壩如圖3.6所示哎。開始打開憑證明細庫表輸入記帳月份月份非法有該月憑證？有未審核憑證？上月已結帳是否記帳記帳對記帳憑證按科目進行匯總用匯總數據更新底層科目發生額向上級科目逐級匯總返回提示無該月憑證提示有未審核憑證提示上月未結帳YNNYYNNYNY圖3.6 記帳過程流程圖二、帳簿輸出哀帳簿輸出過程流哀程圖如圖鞍3.霸7盎所示。百 開始輸入月份打開科目匯總庫表表輸入會計科目找到該科目？計算月初余額打開帳簿庫表寫入期初數據及內容打開記帳憑證庫表庫中記錄是否為空？是指定科目？打開帳簿庫表將指定科目的有關內容加到帳簿中計算余額并確定方向記帳憑證庫表記錄指針加1輸出帳

37、簿結束YNYNNY圖3.7 帳簿輸出過程流程圖頒翱胺挨白3.3.3爸 科目維護模塊皚的設計骯科目增加過程流哎程圖如圖隘3.8鞍所示。開始權限檢測打開科目匯總庫文件打開科目維護界面退出 ？類型正確位數正確重復嗎？輸入科目名稱等數據項更新數據庫結束顯示類型錯誤顯示位數錯誤顯示編碼重復NYNYNYYN圖3.8 科目增加過程流程圖輸入科目代碼4 系統實現阿4.1暗系統開發平臺介埃紹把開發工具：Mi胺crosoft翱 Visual暗 Basic 襖6.0 中文企笆業版芭數據庫管理系統熬(敖DBMS啊)：敗Microso埃ft Acce敗ss 2002奧4.2伴系統功能模塊介礙紹邦系統登錄界面如奧圖4.1

38、所示。胺圖4.1 系統襖登陸霸輸入用戶名、密藹碼，點擊半“岸確定芭”罷按鈕，進入系統懊主界面如圖4.爸2所示。襖圖4.2 系統壩主界面斑4.3班憑證處理模塊的氨實現阿在系統主界面中盎點擊芭“拌憑證填制暗”唉按鈕，進入如圖昂4.3頒所示的憑證填制把界面。百圖叭4.3翱笆憑證填制界面叭向憑證填制界面凹的各欄內填入相藹應內容，點擊班“擺憑證審核皚”凹按鈕，系統將執絆行審核程序。系壩統將審核通過的盎記帳憑證保存到壩憑證明細庫文件敗和憑證記錄庫文胺件中。憑證處理八模塊的實現代碼安如下：拔 疤 Privat斑e Sub C敖ommand1襖_Click(皚)胺 拌 霸 辦瓣Dim Con唉n As Ne愛

39、w ADODB敖.Connec跋tion 案設置ADODB般連接對象的變量敗 岸扳 愛版Dim Rs 拜As Ne版w ADODB敖.Record跋set 擺設置ADODB巴記錄集對象的變辦量俺 絆 巴艾Dim str暗DSN As 靶String熬 矮 半跋Dim str愛SQL As 耙String鞍 白 啊柏strDSN 暗= DSN=捌XzSystc襖w ADO柏DB俺數據源翱 伴 跋吧If 佰伴Text1.T把ext = 疤 Then 般憑證編號不為懊空百 絆 叭阿皚MsgBox 背憑證編號不可八為空！, v巴bCritic敗al敖 懊 阿柏佰Text1.S埃etFocus芭 把 案

40、扒罷Exit Su凹b礙 巴 跋扳End If翱 巴 罷拔If 藹叭Text27.哎Text = 半 Then跋 審核人不為奧空霸 胺 佰敗澳MsgBox 骯審核人不可為百空！, vb白Critica班l唉 巴 暗藹扳Text27.擺SetFocu澳s邦 伴 伴骯案Exit Su埃b懊 罷 扳絆End If罷 疤 哎澳If 挨礙Text28.拌Text = 安 Then拌 記帳人不為巴空奧 藹 瓣八擺MsgBox 頒記帳人不可為般空！, vb愛Critica辦l岸 皚 懊叭白Text28.捌SetFocu跋s版 百 扳芭霸Exit Su凹b扳 鞍 啊壩End If頒 藹 拌柏If 唉熬Text

41、29.白Text = 胺 Then敗 制單人不為唉空絆 哀 襖頒挨MsgBox 翱制單人不可為隘空！, vb芭Critica澳l班 白 扮搬斑Text29.傲SetFocu版s般 八 唉半擺Exit Su跋b隘 捌 扮霸End If邦 襖 安佰構建查詢語句扳，建立連接芭 扮 搬俺Conn.Op骯en strD靶SN奧 昂 挨巴strSQL 扒= sele頒ct * fr稗om pzjl哀拔 背 襖瓣Rs.Filt胺er = 霸 埃 板拌Rs.Open案 strSQL班, 把Conn骯, adOpe挨nDynami辦c, adLo邦ckPessi捌mistic拔 捌 搬拌Rs.AddN巴ew 增

42、加新頒記錄盎 斑 絆跋哀Rs(rq辦) = For吧m2.DTPi盎cker1.V班alue 唉憑證填寫日期壩 背 瓣壩佰Rs(pzb懊h) = T暗ext1.Te鞍xt 憑證編芭號扳 扳 拌愛愛Rs(fjz哀s) = T鞍ext4.Te瓣xt 附件張岸數俺 鞍 昂凹班Rs(shr把) = Te奧xt27.Te扒xt 審核人柏簽字百 扳 捌扳盎Rs(jzr芭) = Te版xt28.Te阿xt 記帳人辦簽字霸 氨 愛拌壩Rs(zdr安) = Te伴xt29.Te跋xt 制單人把簽字拌 骯 岸敗按Rs(Gz挨) = CBo凹ol(Text礙28.Text百) 判斷是板否過帳疤 癌 拌翱Rs.Upd

43、a頒te釋放資源班 拜 絆絆Rs.Clos襖e澳 凹 把熬Conn.Cl跋ose笆 頒 扒伴MsgBox 俺憑證通過審核案！End Sub靶 懊 哀Private捌 Sub Co芭mmand4_白Click()扒 柏 盎絆Dim Con拔n As Ne笆w ADODB唉.Connec柏tion 定耙義一個conn邦ection對把象搬 癌 叭唉Dim Rs 襖As New 傲ADODB.R瓣ecordse罷t 定義一個搬records熬et 對象芭 斑 般啊Dim str佰DSN As 扮String唉 霸 氨稗Dim str奧SQL As 翱String挨 頒 吧癌strDSN 矮= DSN

44、=背XzSystc敖w ADO昂DB數據源氨 阿 跋隘If 爸 八Text1.T敗ext = 靶 Then 藹憑證編號不為熬空唉 胺 頒把 俺百MsgBox 暗憑證編號不可熬為空！, v絆bCritic耙al骯 般 叭 疤疤Text1.S隘etFocus疤 胺 胺 半骯Exit Su扒b稗 澳 唉壩End If岸 癌 案暗構建查詢語句艾，建立連接白 白 跋拔Conn.Op襖en strD斑SN頒 斑 俺按strSQL 吧= sele敗ct * fr壩om pzmx哎皚Rs.Filt巴er = 搬 半 搬 案昂Rs.Open唉 strSQL伴, 佰Conn霸, adOpe板nDynami隘c,

45、adLo俺ckPessi伴mistic翱 斑 愛疤Rs.AddN敖ew 增加新皚記錄挨 拜 隘爸奧Rs(rq把) = For艾m2.DTPi拌cker1.V邦alue 憑礙證日期瓣 唉 盎挨氨Rs(pzb耙h) = T安ext1.Te頒xt 憑證編昂號柏 按襖敖吧Rs(kmb霸h) = T罷ext3.Te艾xt 科目編襖號隘 跋 罷芭背Rs(kmm哎c) = T白ext5.Te礙xt 科目名罷稱佰 版 絆芭鞍Rs(zy敗) = Tex耙t2.Text拜 摘要翱 俺 扒埃挨Rs(dfj擺e) = T鞍ext6.Te哀xt 貸方金芭額把 笆絆 隘安斑Rs(jfj襖e) = T昂ext7.Te扒xt

46、 借方按金額澳 巴 頒把絆Rs(hzd敗je) = 板Text6.T暗ext 貸方凹今額匯總哎 骯 拌稗稗Rs(hzJ白je) = 爸Text7.T氨ext 借方隘金額匯總扳 鞍 藹耙Rs.Upda絆te斑 岸 愛氨更新完畢，釋把放資源半 安 巴襖Rs.Clos邦e安 昂靶 捌笆Conn.Cl敖ose隘 哎 挨芭MsgBox 隘記錄添加成功藹！End Sub耙4.疤4班 帳簿記帳模塊拔的實現擺帳簿記帳模塊包邦括日記帳記帳、把明細帳記帳和總挨帳記帳。記帳程跋序的設計思想基哎本相同，這里只凹例舉明細帳記帳班程序的實現。在疤系統主界面帳暗簿記帳模塊中點懊擊艾“扒明細帳扮”啊按鈕，進入如圖矮4.4拌所

47、示的明細帳記版帳界面。按圖4.4明細盎帳記帳奧在界面中選中起拜始日期和截止日礙期，然后點擊罷“懊記帳般”扳按鈕，系統可自邦動完成記帳過程骯。明細帳記帳程案序代碼如下：愛Private百 Sub Co敖mmand1_壩Click()挨 熬板Dim ini挨tial As安 Curren奧cy 定義一扒個貨幣變量用于癌標識余額頒 鞍澳Dim Con啊n1 As N板ew ADOD藹B.Conne拜ction 奧定義第一個co稗nnectio凹n對象背 扳芭Dim Con礙n2 As N骯ew ADOD瓣B.Conne拔ction 昂定義第二個co案nnectio芭n對象隘 疤扒Dim Rs1扮 A

48、s New耙 ADODB.懊Records伴et 定義第扳一個recor爸dset對象哀 傲氨Dim Rs2絆 As New按 ADODB.版Records捌et 定義第爸二個recor拜dset對象俺 昂礙Dim str斑SQL1 As昂 String笆 般奧Dim str拌SQL2 As稗 String挨 跋哎Dim str藹DSN As 巴String矮 邦板strDSN 吧= DSN=熬XzSystc熬w懊 暗澳從憑證明細表翱中找出符合時間俺要求的記帳科目靶 哀奧Conn1.O背pen str愛DSN敖 般埃strSQL1艾 = sel哀ect * f扮rom pzm百x 盎 澳 版

49、叭& wher懊e & F哀orm13.D百TPicker哎1.Value背 & rq辦 and rq挨 0襖 按 愛 翱Rs2.Fie矮lds(fx安).Valu哀e = 借辦 半 埃 艾Rs2(ye般) = in熬itial藹 捌 阿 挨半Case Is把 0版 挨 俺 邦Rs2.Fie鞍lds(fx般).Valu啊e = 貸阿 安 昂 澳Rs2.Fie班lds(ye柏).Valu疤e = ini愛tial * 絆-1板 胺 扮 唉 擺哀End Sel扳ect班 昂 拔 佰皚Rs2.Upd板ate阿 擺 拔八Rs1.Mov岸eNext Loop拌 按 版奧記帳完畢釋放把資源扳 安 胺案Rs

50、1.Clo凹se擺 耙 跋凹Rs2.Clo矮se胺 辦 癌Conn1.C靶lose盎 邦 擺安Conn2.C襖lose拌 礙 巴捌MsgBox 扒明細帳記帳成版功！End Sub百4.懊5哀 矮帳簿查詢模塊的啊實現跋帳簿查詢模塊包礙括日記帳查詢、氨明細帳查詢和總跋帳查詢。查詢程辦序的設計思想基礙本相同，這里只敗例舉明細帳查詢佰程序的實現。在挨系統主界面帳哎簿查詢中點擊把“拜明細帳翱”隘按鈕，進入如圖跋4.5矮所示的明細帳查斑詢界面。斑圖昂4.5胺明細帳查詢背在查詢界面中輸搬入查詢期間，然昂后點擊矮“佰查詢板”傲按鈕，系統自動敖執行查詢過程并八顯示查詢結果。澳明細帳查詢程序版代碼如下：半Priv

51、ate拌 Sub Co艾mmand1_岸Click()瓣 Dim爸 Conn A把s New A壩DODB.Co拌nnectio拜n 聲名一個笆connect芭ion對象奧 Dim敗 Rs As 辦New ADO絆DB.Reco笆rdset 盎聲明一個rec矮ordset對靶象般 Dim壩 strDSN敗 As Str頒ing稗 Dim安 strSQL靶 As Str盎ing扒 Dim埃 i As I吧nteger扒 Dim敗 result俺count A佰s Long霸 判斷挨查詢條件的合法啊性半 If 笆Form4.D鞍TPicker愛1.Value白 Form翱4.DTPic搬ker2.

52、Va耙lue The佰n吧 矮MsgBox 翱起始日期不能巴大于截止日期！隘, vbIn拜formati凹on, For哀m4.Capt俺ion骯 板Form4.D靶TPicker唉1.SetFo吧cus翱 背End Sub矮 End靶 If柏 構造瓣查詢語句捌 str把SQL = 藹select 氨rq,pzbh昂,kmbh,k捌mmc,zy,昂jfje,df壩je,ye,f頒x & _搬 壩 fr捌om mxz唉 & _哎 絆 wh叭ere &絆 Form4.把DTPicke般r1.Valu愛e & r案q and r岸q & F愛orm4.DT白Picker2邦.Value 霸& 背 s

53、tr扳DSN = 昂DSN=XzS板ystcw暗 Con埃n.Open 皚strDSN稗 Rs.澳Open st絆rSQL, 澳Conn板, adOpe敗nDynami跋c, adLo皚ckPessi搬mistic盎 res氨ultcoun斑t = Rs.懊RecordC埃ount 返澳回記錄集中的記霸錄數安 設置案電子表格的表頭扳 For昂m10.Cls扳 For爸m10.MSF俺lexGrid板1.Cols 拜= 9邦 For扒m10.MSF稗lexGrid班1.Row =盎 result岸xount +叭 1翱 For巴m10.MSF背lexGrid熬1.Row =懊 0百 For盎m1

54、0.MSF扳lexGrid案1.Col =瓣 0八 For芭m10.MSF笆lexGrid辦1.Text 哎= 日期稗 For笆m10.MSF背lexGrid霸1.Col =暗 1伴 For頒m10.MSF辦lexGrid叭1.Text 鞍= 憑證編號拜霸 For耙m10.MSF隘lexGrid熬1.Col =瓣 2斑 For唉m10.MSF靶lexGrid芭1.Text 愛= 科目編號背叭 For伴m10.MSF敖lexGrid半1.Col =霸 3敖 For艾m10.MSF岸lexGrid班1.Text 挨= 科目名稱叭暗 For班m10.MSF白lexGrid啊1.Col =絆 4埃 F

55、or板m10.MSF俺lexGrid安1.Text 柏= 摘要霸 For瓣m10.MSF背lexGrid芭1.Col =柏 5板 For哎m10.MSF稗lexGrid哎1.Text 唉= 借方金額柏礙 For挨m10.MSF啊lexGrid捌1.Col =捌 6拔 For礙m10.MSF芭lexGrid柏1.Text 暗= 貸方金額頒半 For愛m10.MSF傲lexGrid拔1.Col =稗 7敖 For按m10.MSF芭lexGrid佰1.Text 般= 余額熬 For捌m10.MSF半lexGrid敗1.Col =鞍 8叭 For敗m10.MSF邦lexGrid斑1.Text 頒= 余

56、額方向背扒 將叭記錄信息填入電哀子表格皚 For拜 i = 1 爸To resu笆ltcount版 傲 Form10笆.MSFlex辦Grid1.R頒ow = i捌 吧 Form10奧.MSFlex白Grid1.C藹ol = 0叭 班 Form10骯.MSFlex骯Grid1.T安ext = R拜s(rq)斑 巴 Form10哎.MSFlex百Grid1.C岸ol = 1白 哀 Form10襖.MSFlex捌Grid1.T伴ext = R襖s(pzbh頒)哀 暗 Form10霸.MSFlex伴Grid1.C哀ol = 2搬 板 Form10稗.MSFlex扳Grid1.T案ext = R把s(

57、kmbh壩)埃 翱 Form10扒.MSFlex半Grid1.C斑ol = 3搬 氨 Form10背.MSFlex胺Grid1.T隘ext = R懊s(kmmc敗)巴 背 Form10骯.MSFlex鞍Grid1.C耙ol = 4凹 啊 Form10挨.MSFlex捌Grid1.T瓣ext = R把s(zy)爸 矮 Form10叭.MSFlex扳Grid1.C靶ol = 5稗 俺 Form10般.MSFlex叭Grid1.T罷ext = R吧s(jfje柏)擺 版 Form10啊.MSFlex熬Grid1.C頒ol = 6壩 扳 Form10柏.MSFlex哀Grid1.T襖ext = R拌s(dfje絆)安 佰 Form10把.MSFlex盎Grid1.C扮ol = 7扮 跋 Form10稗.MSFlex稗Grid1.T襖ext = R般