【正文】 相應(yīng)操作。在“系統(tǒng)主窗體”上方設(shè)置有一個(gè)主菜單，其中包含有“基礎(chǔ)數(shù)據(jù)管理”、“憑證管理”、“ 賬簿 查詢”、“ 結(jié)賬 及報(bào)表”、“用戶管理”和“退出系統(tǒng)”六個(gè)主菜單項(xiàng)。 安全機(jī)制的最終實(shí)現(xiàn)則考慮在系統(tǒng)啟動(dòng)過程中設(shè)置用戶登錄窗體中獲得 ， 通過驗(yàn)證用戶名和密湖南商學(xué)院畢業(yè)論文（設(shè)計(jì)） 第 40 頁 共 77 頁 碼 ， 由此確定用戶是否合法。_ data source= connectionstring （ 3） 設(shè)置 ODBC VB的 ADO 對(duì)象是通過 ODBC 來訪問數(shù)據(jù)庫，所以還要建立 ODBC 數(shù)據(jù)引擎接口。本項(xiàng)目 VB 通過 ADO 對(duì)象連接數(shù)據(jù)庫。輸入統(tǒng)計(jì)的會(huì)計(jì)區(qū)間 Dim db As database = New database Dim strsql As String 湖南商學(xué)院畢業(yè)論文（設(shè)計(jì)） 第 31 頁 共 77 頁 strsql = select 取值 from 系統(tǒng) 參數(shù)表 where 參數(shù)名稱 = strsql += 39。彈出對(duì)話框讓用戶確認(rèn)要?jiǎng)h除記錄 39。 ②審核憑證時(shí)若憑證借貸不平衡或者發(fā)生額為零則不能審核。判斷是否有更新的數(shù)據(jù) If = True Then (dataset11) End If Catch ex As Exception 湖南商學(xué)院畢業(yè)論文（設(shè)計(jì)） 第 26 頁 共 77 頁 (數(shù)據(jù)修改失??！ ) End Try End Sub 刪除 科目 函數(shù)： Public Overrides Sub deletedata() Try 39。 （ 8）本期明細(xì)帳簿包括內(nèi)部編號(hào)、分錄編號(hào)、會(huì)計(jì)期間、憑證字號(hào)、憑證編號(hào)、摘湖南商學(xué)院畢業(yè)論文（設(shè)計(jì)） 第 24 頁 共 77 頁 要、科目代碼、借方、貸方、余額方向、余額、數(shù)量、單價(jià)、結(jié)算方式、結(jié)算號(hào)、結(jié)算日期等字段，其中內(nèi)部編號(hào)是主鍵。 湖南商學(xué)院畢業(yè)論文（設(shè)計(jì)） 第 22 頁 共 77 頁 科 目 表P K 科 目 代 碼 科 目 名 稱 助 記 碼 科 目 類 別 是 否 存 貨 科 目 余 額 方 向 數(shù) 量 單 位憑 證 表 歷 史P K , U 1 憑 證 編 號(hào) 會(huì) 計(jì) 期 間 憑 證 字 號(hào) 日 期 附 單 據(jù) 制 單 借 方 合 計(jì) 貸 方 合 計(jì) 過 帳 狀 態(tài) 憑 證 狀 態(tài)分 錄 表 歷 史P K , U 1 編 號(hào) 憑 證 編 號(hào) 摘 要 科 目 代 碼 借 方 貸 方 數(shù) 量 單 價(jià) 結(jié) 算 方 式 結(jié) 算 號(hào) 結(jié) 算 日 期憑 證 表P K 憑 證 編 號(hào) 會(huì) 計(jì) 期 間 憑 證 字 號(hào) 日 期 附 單 據(jù) 制 單 借 方 合 計(jì) 貸 方 合 計(jì) 過 帳 狀 態(tài) 憑 證 狀 態(tài)分 錄 表P K 編 號(hào)I 1 憑 證 編 號(hào) 摘 要 科 目 代 碼 借 方 貸 方 數(shù) 量 單 價(jià) 結(jié) 算 方 式 結(jié) 算 號(hào) 結(jié) 算 日 期帳 簿 初 始 化 表P K , I 1 科 目 代 碼 科 目 名 稱 累 計(jì) 借 方 累 計(jì) 貸 方 期 初 余 額 余 額 方 向本 期 匯 總 帳 簿P K , I 1 科 目 代 碼 期 初 余 額 余 額 方 向 本 期 借 方 合 計(jì) 本 期 貸 方 合 計(jì) 本 年 借 方 累 計(jì) 本 年 貸 方 累 計(jì) 余 額科 目 余 額 表P K , U 1 科 目 代 碼 期 初 借 方 余 額 期 初 貸 方 余 額 本 期 借 方 發(fā) 生 額 本 期 貸 方 發(fā) 生 額 本 年 借 方 累 計(jì) 發(fā) 生 額 本 年 貸 方 累 計(jì) 發(fā) 生 額 本 期 借 方 余 額 本 期 貸 方 余 額 最 后 結(jié) 算 分 錄I 1 會(huì) 計(jì) 期 間 余 額 方 向 內(nèi) 部 編 號(hào)本 期 明 細(xì) 帳 簿P K 內(nèi) 部 編 號(hào) 分 錄 編 號(hào) 會(huì) 計(jì) 期 間 憑 證 字 號(hào) 憑 證 編 號(hào) 摘 要I 1 科 目 代 碼 借 方 貸 方 余 額 方 向 余 額 數(shù) 量 單 價(jià) 結(jié) 算 方 式 結(jié) 算 號(hào) 結(jié) 算 日 期 余 額 標(biāo) 記資 產(chǎn) 負(fù) 債 表P K 會(huì) 計(jì) 期 間 現(xiàn) 金 及 現(xiàn) 金 等 價(jià) 物 應(yīng) 收 帳 款 壞 帳 準(zhǔn) 備 應(yīng) 收 帳 款 凈 值 流 動(dòng) 資 產(chǎn) 總 計(jì) 固 定 資 產(chǎn) 原 值 累 計(jì) 折 舊 固 定 資 產(chǎn) 總 計(jì) 其 他 資 產(chǎn) 資 產(chǎn) 總 計(jì) 應(yīng) 付 帳 款 預(yù) 收 帳 款 應(yīng) 付 工 資 其 他 負(fù) 債 負(fù) 債 總 計(jì) 實(shí) 收 資 本 資 本 公 積 贏 余 公 積圖 24 數(shù)據(jù)庫表間 ER圖 湖南商學(xué)院畢業(yè)論文（設(shè)計(jì)） 第 23 頁 共 77 頁 數(shù)據(jù)定義 由上述分析可知，該系統(tǒng)共需要 12 張表，用途分別如表 10 所示。 （ 3）一張憑證可以被包含在多個(gè)分錄中，多個(gè)分錄可以同時(shí)對(duì)應(yīng)一張憑證，因此憑證表和分錄表間存在一對(duì)多的關(guān)系。 (3)如果輸入的舊密碼正確， 則判斷新密碼和確認(rèn)新密碼是 否一致，如果密碼不一致，提示錯(cuò)誤，并要求重新輸入；如果密碼一致，根據(jù)用戶輸入的新密碼，在數(shù)據(jù)庫用戶清單表中修改當(dāng)前用戶的密碼。 (3)如果不存在相應(yīng)的記錄，則提示錯(cuò)誤。 （ 3）如果不存在相應(yīng)的記錄，則提示錯(cuò)誤。 （ 3）如果不存在相應(yīng)的記錄，則提示錯(cuò)誤。 （ 3）如果存在相應(yīng)的記錄，則提示錯(cuò)誤。 （ 5） 如果正確，則 打開系統(tǒng)歡迎窗體 。它包括 客戶機(jī) 、數(shù)據(jù)庫服務(wù)器層 ，如圖 15 所示 。 查詢條件 科目匯總表 記帳憑證 憑證、余額、總帳、明細(xì)帳 帳簿、科目余額表 用戶 憑證處理 用戶 轉(zhuǎn)帳結(jié)帳 總帳余額 查詢與打印 科目 明細(xì)科目發(fā)生額匯總 湖南商學(xué)院畢業(yè)論文（設(shè)計(jì)） 第 10 頁 共 77 頁 圖 11 對(duì)“ 日常帳務(wù) ”中“憑證處理”細(xì)化后的第二層數(shù)據(jù)流程圖 ②“轉(zhuǎn)賬結(jié)賬”的分解。 圖 8 系統(tǒng)零層數(shù)據(jù)流程圖 （ 3）一層數(shù)據(jù)流程圖 ① “初始設(shè)置” 的 分解 。 ⑤根據(jù)科目發(fā)生額余額表登記總分類賬 ⑥月末，現(xiàn)金、銀行存款日記賬和明細(xì)分類賬分別與總分類賬相核對(duì)。 圖 1 小型企業(yè)財(cái)務(wù)管理信息系統(tǒng) 的 任務(wù)樹 進(jìn)度安排 全部開發(fā)過程預(yù)計(jì)用時(shí) 12 周，具體用時(shí)分配如下圖 2 所示。對(duì)相關(guān)子系統(tǒng)不同的硬件平臺(tái)、操作系統(tǒng)、實(shí)現(xiàn)技術(shù)、數(shù)據(jù)庫數(shù)據(jù)格式等要求要有兼容性，能進(jìn)行統(tǒng)一用戶管理與權(quán)限集中管理，并且提供詳細(xì)的系統(tǒng)技術(shù)手冊(cè)。 我國(guó)財(cái)務(wù)管理軟件經(jīng)過多年的發(fā)展，正在逐步走向成熟，初步形成了一定的產(chǎn)業(yè)規(guī)模。 對(duì) 小型企業(yè) 來說 ，財(cái)務(wù)管理是一項(xiàng)日常性的工作，企 業(yè)的各級(jí)管理人員需要及時(shí)了解、掌握企業(yè)的運(yùn)營(yíng)狀況，以便心中有數(shù)，合理安排企業(yè)的經(jīng)營(yíng)策略，因而財(cái)務(wù)管理是現(xiàn)代小型企業(yè) 的一項(xiàng)非常重要的工作。 2. 項(xiàng)目規(guī)劃 項(xiàng)目資源 硬件設(shè)備 CPU：至少 Pentium400 以上，建議使用 Pentium800 以上； 內(nèi)存：至少 128M 以上，建議使用 256M 以上； 硬盤：至少 20G 硬盤空間； 湖南商學(xué)院畢業(yè)論文（設(shè)計(jì)） 第 2 頁 共 77 頁 顯示器： 14″顯示器； 其它：鍵盤、鼠標(biāo)、打印機(jī)等。其用例圖 如圖 4 所示。 圖 5 企業(yè)財(cái)務(wù)管理業(yè)務(wù) 流程圖 功能需求 功能組成 由上 可知， 該 財(cái)務(wù)管理信息系統(tǒng) 的 功能 結(jié)構(gòu)設(shè)計(jì) 如 圖 6 所示 。圖中“科目結(jié)構(gòu)”用于校驗(yàn)科目的合法性。 憑證信息 正確數(shù)據(jù) 錯(cuò)誤信息 科目匯總表 記帳憑證 用戶 輸入憑證 用戶 憑證 科目 審核憑證 修改 憑證 憑證 記帳 查詢 憑證 科目匯總 輸出科目表 科目匯總表 科目余額 總帳 明細(xì)帳 輔助帳 湖南商學(xué)院畢業(yè)論文（設(shè)計(jì)） 第 11 頁 共 77 頁 圖 12 對(duì)“ 日常帳務(wù) ”中“轉(zhuǎn)帳結(jié) 帳”細(xì)化后的第二層數(shù)據(jù)流程圖 ③“查詢打印賬簿”的分解。 圖 16 軟件結(jié)構(gòu)圖 會(huì)計(jì)科目模塊 （科目初始化） 憑證模塊 賬簿模塊 報(bào)表模塊 結(jié)賬模塊 科目添加 打印總賬，明細(xì)賬，現(xiàn)金日記賬，銀行存款日記賬 輸出 資產(chǎn)負(fù)債表，損益表 期末結(jié)轉(zhuǎn) 修改密碼 用戶管理模塊 科目修改 科目查詢 科目刪除 科目余額設(shè)置 憑證輸入 /維護(hù) 憑證 審核 憑證 登帳（四個(gè)帳） 查看總賬，明細(xì)賬，現(xiàn)金日記賬，銀行存款日記賬 打印 資產(chǎn)負(fù)債表，損益表 年末結(jié)轉(zhuǎn) 添加用戶 小型企業(yè)財(cái)務(wù)管理信息系統(tǒng) 用戶登錄模塊 湖南商學(xué)院畢業(yè)論文（設(shè)計(jì)） 第 17 頁 共 77 頁 模塊定義 根據(jù)本系統(tǒng)的項(xiàng)目規(guī)劃、需求分析、系統(tǒng)結(jié)構(gòu)設(shè)計(jì)等，可以得出系統(tǒng)的各個(gè)模塊：用戶 登錄 模塊、 會(huì)計(jì)科目（系統(tǒng)初始化） 模塊、憑證模塊、帳簿模塊、報(bào)表模塊、 結(jié) 轉(zhuǎn)模塊 、用戶管理模塊 。 （ 2）從憑證表中 根據(jù) 科目代碼 、科目名稱和科目類別 搜索 是否有相應(yīng)的記錄。 （ 2）從憑證表中根據(jù)科目代碼、科目名稱和科目類別搜索是否有相應(yīng)的記錄。 （ 2）從憑證表中根據(jù)科目代碼、科目名稱和科目類別搜索是否有相應(yīng)的記錄。 (2)從本期明細(xì)表或本期總帳表根據(jù) 會(huì)計(jì)期間 搜索是否有相應(yīng)的記錄。 (2)從科目余額表根據(jù)會(huì)計(jì)期間搜索是否有相應(yīng)的 記錄。 （ 3） 如果密碼和確認(rèn)密碼一致，則 根據(jù) 用戶 輸入的用戶名判斷用戶是否存在，如果存在，提示錯(cuò)誤，并要求重新輸入 ； 如果用戶不存在，根據(jù) 用戶 輸入的用戶名 和 密碼 ，在數(shù)據(jù)庫 用戶 清單 表中添加新 記錄 。 （ 6）本期匯總實(shí)際上是對(duì)期間發(fā)生的每個(gè)科目進(jìn)行匯總操作，因此本期匯總賬簿和科目表間存在一對(duì)一的關(guān)系。 （ 3）憑證表包括憑證編號(hào)、會(huì)計(jì)期間、憑證字號(hào)、日期、附單據(jù)、制單、借方合計(jì)、貸方合計(jì)、過帳狀態(tài)、憑證狀態(tài)等字段 ， 其中憑證編號(hào)是主鍵。 （ 11）系統(tǒng)參數(shù)表包括 參數(shù)名稱、取值、編號(hào)，其中參數(shù)名稱是主鍵。 憑證模塊算法設(shè)計(jì)要求如下： （ 1）輸入憑證分錄時(shí)的輸入控制 ①憑證分 錄的發(fā)生科目必須已經(jīng)在科目表中存在。判斷數(shù)據(jù)格式 If validatedata() = False Then (數(shù)據(jù)格式不正確！ ) Return End If Try Dim dr As DataRow = dr(摘要 ) = dr(科目代碼 ) = dr(科目名稱 ) = dr(借方 )= dr(貸方 ) = 39。 總 分類 賬 查詢 函數(shù)： Private Sub loaddata() Dim strfilter As String If = 0 Then If = True Then strfilter = where 本期借方合計(jì) 0 or 本期貸方合計(jì) 0 End If Else strfilter = where 科目代碼 = + If = True Then strfilter += and(本期借方合計(jì) 0 or 本期貸方合計(jì) 0) End If End If 39。計(jì)算 (exec sf_計(jì)算資產(chǎn)負(fù)債表 + strtemp) () 39。 圖 25 建立數(shù)據(jù)庫 湖南商學(xué)院畢業(yè)論文（設(shè)計(jì)） 第 33 頁 共 77 頁 （ 2） 連接數(shù)據(jù)源 在 Visual Basic