某師范學(xué)院食堂財(cái)務(wù)管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)

1、PAGE 2編號(hào)：106案忻 州 師 范扒 學(xué) 院背計(jì)算機(jī)系本科阿畢業(yè)骯（設(shè)計(jì)）盎論文扮課題名稱(chēng)背忻州師范學(xué)院食胺堂財(cái)務(wù)管理系統(tǒng)百的設(shè)計(jì)與實(shí)現(xiàn)礙專(zhuān) 業(yè)襖計(jì) 算 機(jī) 科班 學(xué) 與 技 伴術(shù)芭姓 名凹蔣扮鋒岸學(xué) 號(hào)埃2 0 0 3八 0 8 1 白1 1 0 2壩 1胺指導(dǎo)教師伴鄭志扳榮二零零七年六月 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 胺業(yè)務(wù)分析癌 PAGEREF _Toc170204709 h 佰3 HYPERLINK l _Toc170204710 皚2.3 巴數(shù)據(jù)分析埃 PAGEREF _Toc170204710 h 扮3 HYPERLINK l _Toc170204711 骯2.4 藹數(shù)據(jù)字典擺 PAGEREF _Toc170204711 h 澳3 HYPERLINK l _Toc170204712 芭3 艾系統(tǒng)設(shè)計(jì)辦 P

3、AGEREF _Toc170204712 h 骯9 HYPERLINK l _Toc170204713 癌3.1 跋系統(tǒng)功能模擺塊襖設(shè)計(jì)叭 PAGEREF _Toc170204713 h 阿9 HYPERLINK l _Toc170204714 敖3.2 愛(ài)數(shù)據(jù)庫(kù)設(shè)計(jì)拌 PAGEREF _Toc170204714 h 壩11 HYPERLINK l _Toc170204715 安3.2.1 巴概念模型的設(shè)計(jì)巴 PAGEREF _Toc170204715 h 礙11 HYPERLINK l _Toc170204716 半3.2.2 襖數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)斑的設(shè)計(jì)癌 PAGEREF _Toc170204

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

5、 HYPERLINK l _Toc170204721 笆4鞍 翱系統(tǒng)實(shí)現(xiàn)芭 PAGEREF _Toc170204721 h 壩22 HYPERLINK l _Toc170204722 懊4.1安系統(tǒng)開(kāi)發(fā)平臺(tái)介笆紹啊 PAGEREF _Toc170204722 h 板22 HYPERLINK l _Toc170204723 柏4.2啊系統(tǒng)功能模塊介伴紹笆 PAGEREF _Toc170204723 h 阿22 HYPERLINK l _Toc170204724 背4.3吧憑證處理模塊的巴實(shí)現(xiàn)皚 PAGEREF _Toc170204724 h 百23 HYPERLINK l _Toc1702047

6、25 凹4.版4霸 霸帳簿記帳模塊的骯實(shí)現(xiàn)拜 PAGEREF _Toc170204725 h 岸25 HYPERLINK l _Toc170204726 佰4.埃5岸 氨帳簿查詢(xún)模塊的啊實(shí)現(xiàn)鞍 PAGEREF _Toc170204726 h 芭27 HYPERLINK l _Toc170204727 擺5 敖系統(tǒng)測(cè)試邦 PAGEREF _Toc170204727 h 骯30 HYPERLINK l _Toc170204728 藹5.1斑 擺測(cè)試環(huán)境阿 PAGEREF _Toc170204728 h 傲30 HYPERLINK l _Toc170204729 巴5.2 背測(cè)試步驟按 PAGERE

7、F _Toc170204729 h 拌30 HYPERLINK l _Toc170204730 矮5.3 霸測(cè)試結(jié)果襖 PAGEREF _Toc170204730 h 斑30 HYPERLINK l _Toc170204731 翱6 敗結(jié)束語(yǔ)昂 PAGEREF _Toc170204731 h 笆31 HYPERLINK l _Toc170204732 致謝 PAGEREF _Toc170204732 h 32 HYPERLINK l _Toc170204733 參考文獻(xiàn) PAGEREF _Toc170204733 h 33忻州師范學(xué)院計(jì)算機(jī)系學(xué)士學(xué)位論文忻州師范學(xué)院計(jì)算機(jī)系學(xué)士學(xué)位論文 PAG

8、E 1擺忻州師范學(xué)院食礙堂財(cái)務(wù)管理系統(tǒng)板的設(shè)計(jì)與實(shí)現(xiàn)皚 摘要：翱通過(guò)對(duì)忻州師范吧學(xué)院食堂財(cái)務(wù)管叭理部門(mén)財(cái)務(wù)管理罷的需求調(diào)查和需拌求分析,為忻州芭師范學(xué)院食堂財(cái)隘務(wù)管理部門(mén)設(shè)計(jì)扒了拜“鞍食堂財(cái)務(wù)管理系耙統(tǒng)扳”懊。該系統(tǒng)包括憑敖證管理、帳簿記岸帳、帳簿查詢(xún)、辦報(bào)表管理、系統(tǒng)爸維護(hù)五個(gè)功能模板塊。其中憑證管八理模塊提供憑證哎的填制、查詢(xún)和疤匯總功能；帳簿昂記帳模塊提供按罷照記帳憑證登記襖帳簿的功能，包傲括日記帳記帳、壩明細(xì)帳記帳和總扒帳記帳；帳簿查岸詢(xún)模塊提供按月叭查詢(xún)帳簿的功能艾，包括日記帳查敖詢(xún)、明細(xì)帳查詢(xún)敖和總帳查詢(xún)；報(bào)百表管理模塊提供柏按照帳簿記錄生隘成財(cái)務(wù)報(bào)表的功扒能；系統(tǒng)維護(hù)模佰塊包括用

9、戶(hù)管理俺、科目維護(hù)和數(shù)安據(jù)備份功能。盎并用Micro八soft Vi笆sual Ba霸sic 6.0八實(shí)現(xiàn)了該系統(tǒng)。搬熬關(guān)鍵字：拜信息系統(tǒng)財(cái)務(wù)案管理會(huì)計(jì)電算白化笆巴Abstrac暗t：澳This ar奧ticle板 敗investi拌gates a巴nd anal安yzes th埃e皚 埃needs o百f the c把a(bǔ)nteens白翱 癌 financ翱ial man埃agement胺 in 擺Xinzhou八 巴Teach扳ers Col鞍l(fā)ege辦 and de藹signs t稗he can頒teens f按inancia班l(xiāng) 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百u(mài)t, che靶cking a襖ccounts盎 and ga骯t

11、hering叭 the vo罷uchers.巴 The ac把count r翱egister般 functi隘ons the耙 regist愛(ài)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襖 引 言哀忻州師范學(xué)院食敖堂財(cái)務(wù)管理現(xiàn)在板所采取的方式是胺傳統(tǒng)的手工管理阿方式。忻州師范學(xué)院食堂財(cái)務(wù)管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)忻州師范學(xué)院計(jì)算機(jī)系學(xué)士學(xué)位論文 PAGE 42 PAGE

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

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

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

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

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

19、本期擺貸方發(fā)生額+佰期末余額翱期初余額翱爸=叭1皚數(shù)字百9伴本期借方發(fā)生絆額襖懊=白1捌數(shù)字敖9拌本期貸方發(fā)生骯額矮俺=背1暗數(shù)字稗9伴期末余額罷扮=扒1耙數(shù)字愛(ài)9暗用戶(hù)名礙稗=耙1癌數(shù)字扒4笆密碼白癌=1數(shù)字|字壩符4白 科目霸性質(zhì)奧隘=銀行|巴外幣|數(shù)量拌|往來(lái)|芭部門(mén)|個(gè)昂人|項(xiàng)目會(huì)計(jì)人員原始憑證填制憑證記帳憑證原始憑證審核憑證記帳憑證原始憑證記日記帳記明細(xì)帳匯總憑證記帳憑證原始憑證記總帳日記帳總帳明細(xì)帳編制報(bào)表會(huì)計(jì)報(bào)表會(huì)計(jì)人員帳目核對(duì)帳目核對(duì)圖2.1忻州師范學(xué)院食堂財(cái)務(wù)管理業(yè)務(wù)流程圖財(cái)務(wù)管理系統(tǒng)圖2.2 忻州師范學(xué)院食堂財(cái)務(wù)管理系統(tǒng)頂級(jí)數(shù)據(jù)流圖會(huì)計(jì)人員會(huì)計(jì)人員1 帳務(wù)準(zhǔn)備2 憑證編輯科

20、目代碼、屬性記帳憑證3 日記帳核算4 明細(xì)帳核算5 匯總憑證記帳憑證記帳憑證科目代碼、屬性科目代碼、屬性記帳憑證記帳憑證6 總帳核算記帳憑證記帳憑證記帳憑證記帳憑證憑證匯總記帳憑證記帳憑證7 編制報(bào)表日記帳會(huì)計(jì)報(bào)表總帳明細(xì)帳日記帳會(huì)計(jì)報(bào)表總帳會(huì)計(jì)報(bào)表總帳明細(xì)帳日記帳明細(xì)帳圖2.3 忻州師范學(xué)院食堂財(cái)務(wù)管理系統(tǒng)一級(jí)數(shù)據(jù)流圖會(huì)計(jì)會(huì)計(jì)辦 傲 記帳憑證憑證匯總3.1 日記帳建帳3.1 日記帳記帳3.1 日記帳結(jié)帳日記帳4.1 明細(xì)帳建帳4.2 明細(xì)帳記帳4.3 明細(xì)帳結(jié)帳明細(xì)帳6.1 總帳建帳6.2 總帳記帳6.3 總帳結(jié)帳總 帳8 帳簿查詢(xún)查詢(xún)結(jié)果記帳憑證日記帳記帳憑證日記帳日記帳明細(xì)帳明細(xì)帳明細(xì)帳

21、總帳總帳總帳日記帳總帳明細(xì)帳圖2.5 忻州師范學(xué)院食堂財(cái)務(wù)管理系統(tǒng)帳簿處理二級(jí)數(shù)據(jù)流圖5 匯總憑證2.2 憑證審核記帳憑證2.3 憑證查詢(xún)記帳憑證記帳憑證記帳憑證未通過(guò)審核的記帳憑證記帳憑證記帳憑證匯總憑證記帳憑證記帳憑證審核后的記帳憑證查詢(xún)結(jié)果2.1 憑證錄入科目代碼、屬性圖2.4 忻州師范學(xué)院食堂財(cái)務(wù)管理系統(tǒng)憑證編輯二級(jí)數(shù)據(jù)流圖日記帳明細(xì)帳總帳報(bào)表參數(shù)報(bào)表數(shù)據(jù)報(bào)表目錄報(bào)表格式7.1 報(bào)表設(shè)置7.2 報(bào)表編制9 報(bào)表查詢(xún)?nèi)沼泿っ骷?xì)帳報(bào)表格式報(bào)表目錄報(bào)表數(shù)據(jù)報(bào)表參數(shù)總帳明細(xì)帳日記帳會(huì)計(jì)報(bào)表查詢(xún)結(jié)果會(huì)計(jì)報(bào)表查詢(xún)結(jié)果會(huì)計(jì)報(bào)表會(huì)計(jì)報(bào)表圖2.6 忻州師范學(xué)院食堂財(cái)務(wù)管理系統(tǒng)報(bào)表處理二級(jí)數(shù)據(jù)流圖會(huì)計(jì) 3

22、 系統(tǒng)設(shè)計(jì)頒3.1半 系統(tǒng)功能模塊搬設(shè)計(jì)財(cái)務(wù)管理系統(tǒng)帳務(wù)準(zhǔn)備憑證處理帳簿處理報(bào)表處理系統(tǒng)維護(hù)憑證審核憑證匯總憑證查詢(xún)帳簿核算日記帳核算明細(xì)帳核算總帳核算結(jié)帳記帳建帳帳簿查詢(xún)報(bào)表查詢(xún)報(bào)表編制報(bào)表設(shè)置圖3.1 忻州師范學(xué)院食堂財(cái)務(wù)管理系統(tǒng)功能模塊圖憑證填制科目維護(hù)用戶(hù)管理數(shù)據(jù)備份哎根據(jù)數(shù)據(jù)流圖，巴設(shè)計(jì)系統(tǒng)功能模壩塊如圖啊3.巴1芭所示。把系統(tǒng)各功能模塊靶簡(jiǎn)介哀：帳務(wù)準(zhǔn)備罷帳務(wù)準(zhǔn)備模塊的佰功能是完成對(duì)忻哀州師范學(xué)院食堂搬財(cái)務(wù)管理系統(tǒng)的昂初始化工作，通艾常包括：科目編岸碼規(guī)則的設(shè)置、伴科目屬性的設(shè)置頒、憑證類(lèi)別的設(shè)暗置、帳套屬性的扮設(shè)置、會(huì)計(jì)期間芭的選擇、和數(shù)據(jù)阿庫(kù)參數(shù)的設(shè)置。二、憑證處理班憑證處理模

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

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

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

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

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

28、目代碼，啊科目名稱(chēng)，部門(mén)板，項(xiàng)目，記帳，把出納，審核，制癌單，借方金額，搬貸方金額，借方巴合計(jì)，貸方合計(jì)阿）扮科目項(xiàng)（叭科目代碼敗，科目名稱(chēng)，科安目類(lèi)別，科目性扳質(zhì)，期初余額，班余額方向）搬匯總（會(huì)計(jì)年，艾月份，日期，憑艾證編號(hào)，科目代耙碼，摘要，科目搬名稱(chēng)，借方盎金額，貸方金額靶，余額方向，余胺額把）佰3.2.2芭 數(shù)據(jù)庫(kù)邏輯結(jié)板構(gòu)的設(shè)計(jì)爸根據(jù)概念模型，隘按照概念模型向捌邏輯結(jié)構(gòu)轉(zhuǎn)換的跋相關(guān)規(guī)則并結(jié)合扮規(guī)范化理論設(shè)計(jì)柏?cái)?shù)據(jù)庫(kù)邏輯結(jié)構(gòu)白如表柏3.1斑、表白3.2矮、表跋3.3拜、表扳3.4佰、表疤3.5按、表唉3.6阿、表半3.7所示。 拌表埃3.1班 用戶(hù)記錄胺字段名稱(chēng)捌字段類(lèi)型伴長(zhǎng)度擺備注

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

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

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

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

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

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

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

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

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

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

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

40、扒罷Exit Su凹b礙 巴 跋扳End If翱 巴 罷拔If 藹叭Text27.哎Text = 半 Then跋 審核人不為奧空霸 胺 佰敗澳MsgBox 骯審核人不可為百空！, vb白Critica班l(xiāng)唉 巴 暗藹扳Text27.擺SetFocu澳s邦 伴 伴骯案Exit Su埃b懊 罷 扳絆End If罷 疤 哎澳If 挨礙Text28.拌Text = 安 Then拌 記帳人不為巴空奧 藹 瓣八擺MsgBox 頒記帳人不可為般空！, vb愛(ài)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邦 襖 安佰構(gòu)建查詢(xún)語(yǔ)句扳，建立連接芭 扮 搬俺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 唉憑證填寫(xiě)日期壩 背 瓣壩佰Rs(pzb懊h) = T暗ext1.Te鞍xt 憑證編芭號(hào)扳 扳 拌愛(ài)愛(ài)Rs(fjz哀s) = T鞍ext4.Te瓣xt 附件張岸數(shù)俺 鞍 昂凹班Rs(shr把) = Te奧xt27.Te扒xt 審核人柏簽字百 扳 捌扳盎Rs(jzr芭) = Te版xt28.Te阿xt 記帳人辦簽字霸 氨 愛(ài)拌壩Rs(zdr安) = Te伴xt29.Te跋x(chóng)t 制單人把簽字拌 骯 岸敗按Rs(Gz挨) = CBo凹o(jì)l(Text礙28.Text百) 判斷是板否過(guò)帳疤 癌 拌翱Rs.Upd

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

44、=背XzSystc敖w ADO昂DB數(shù)據(jù)源氨 阿 跋隘If 爸 八Text1.T敗ext = 靶 Then 藹憑證編號(hào)不為熬空唉 胺 頒把 俺百M(fèi)sgBox 暗憑證編號(hào)不可熬為空！, v絆bCritic耙al骯 般 叭 疤疤Text1.S隘etFocus疤 胺 胺 半骯Exit Su扒b稗 澳 唉壩End If岸 癌 案暗構(gòu)建查詢(xún)語(yǔ)句艾，建立連接白 白 跋拔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翱 斑 愛(ài)疤Rs.AddN敖ew 增加新皚記錄挨 拜 隘爸奧Rs(rq把) = For艾m2.DTPi拌cker1.V邦alue 憑礙證日期瓣 唉 盎挨氨Rs(pzb耙h) = T安ext1.Te頒xt 憑證編昂號(hào)柏 按襖敖吧Rs(kmb霸h) = T罷ext3.Te艾xt 科目編襖號(hào)隘 跋 罷芭背Rs(kmm哎c) = T白ext5.Te礙xt 科目名罷稱(chēng)佰 版 絆芭鞍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斑 岸 愛(ài)氨更新完畢，釋把放資源半 安 巴襖Rs.Clos邦e安 昂靶 捌笆Conn.Cl敖ose隘 哎 挨芭MsgBox 隘記錄添加成功藹！End Sub耙4.疤4班 帳簿記帳模塊拔的實(shí)現(xiàn)擺帳簿記帳模塊包邦括日記帳記帳、把明細(xì)帳記帳和總挨帳記帳。記帳程跋序的設(shè)計(jì)思想基哎本相同，這里只凹例舉明細(xì)帳記帳班程序的實(shí)現(xiàn)。在疤系統(tǒng)主界面帳暗簿記帳模塊中點(diǎn)懊擊艾“扒明細(xì)帳扮”啊按鈕，進(jìn)入如圖矮4.4拌所

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

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

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

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

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

52、Va耙lue The佰n吧 矮MsgBox 翱起始日期不能巴大于截止日期！隘, vbIn拜formati凹o(jì)n, For哀m4.Capt俺ion骯 板Form4.D靶TPicker唉1.SetFo吧cus翱 背End Sub矮 End靶 If柏 構(gòu)造瓣查詢(xún)語(yǔ)句捌 str把SQL = 藹select 氨rq,pzbh昂,kmbh,k捌mmc,zy,昂jfje,df壩je,ye,f頒x & _搬 壩 fr捌om mxz唉 & _哎 絆 wh叭ere &絆 Form4.把DTPicke般r1.Valu愛(ài)e & r案q and r岸q & F愛(ài)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 返澳回記錄集中的記霸錄數(shù)安 設(shè)置案電子表格的表頭扳 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 鞍= 憑證編號(hào)拜霸 For耙m10.MSF隘lexGrid熬1.Col =瓣 2斑 For唉m10.MSF靶l(wèi)exGrid芭1.Text 愛(ài)= 科目編號(hào)背叭 For伴m10.MSF敖lexGrid半1.Col =霸 3敖 For艾m10.MSF岸lexGrid班1.Text 挨= 科目名稱(chēng)叭暗 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愛(ài)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般