【導讀】化”或承包租賃與社會人員經(jīng)營。料、肉類儲藏間）、原料初加工間、操作間、更衣與守護間。“一洗二清三消毒”的設施；用于保鮮與食品留樣的保鮮設施。19號文件相關程序辦理。各校食堂管理應遵照教育局統(tǒng)一印發(fā)的17種管理制度執(zhí)行。名領導負責食堂管理的指導與檢查、監(jiān)督。不留用人上的后患。物鮮；集中采購時盡可能索要正規(guī)的發(fā)票與檢驗、檢疫合格證。學校制發(fā)統(tǒng)一的購貨單據(jù)用于零時采購。月庫存盤點制度，做到原料不過期、變質(zhì)，采購有計劃，不浪費。工、家長公布一次。利，確保為學生服務的宗旨。和腐爛和食品，果斷不預采購，以防食品中毒。務主任批準后方可采購。菜質(zhì)量，保證無毛病，安全無事故。會客，工作時間嚴禁吸煙以及與工作無關的其他事宜。

　　

【正文】 界面端應用程序設計 公共模塊的設計 在創(chuàng)建用戶界面端應用程序時，向?qū)б呀?jīng)為我們生成了一個名為mdlMain 的模塊，我 們對這個模塊稍微修改即可使用。 添加成員變量 修改 Main 過程 用戶登入對話框設計 用戶登入界面設計 修改 [確定 ]按鈕的處理代碼 Private Sub cmdOK_Click() ToDo: 創(chuàng)建測試密碼是否正確 檢查正確密碼 Dim Account As String Dim Pwd As String Account = RealString() Pwd = RealString() 判斷密碼是否正確 If Not (Account, Pwd) Then m_nErrCount = m_nErrCount + 1 If m_nErrCount = 3 Then MsgBox MsgBox 密碼區(qū)分大小寫 = Len() Else OK = True g_Account = Account End If End Sub 系統(tǒng)主界面的設計 設計選項卡 sstabView 給 sstabView 控件添加 5 個選項卡，選項卡標題分別設置為“食品庫存”、“進貨記錄”、“銷售記錄”、“報損記錄”和“供應商”，分別對應 5 個 ListView。 添加菜單 添加主界面模塊 界面設計 其他代碼 Private Sub Form_Load() LoadResStrings Me = GetSetting(, = Val(GetSetting(, 初始化數(shù)據(jù) Call InitMain End Sub Private Sub Form_Unload(Cancel As Integer) Dim i As Integer close all sub forms For i = 1 To 1 Step 1 Unload Forms(i) Next If vbMinimized Then SaveSetting , SaveSetting , Private Sub Form_Resize() On Error Resume Next If 3000 Then = 3000 SizeControls End Sub 用戶管理模塊 用戶管理對話框界面設計 用戶管理對話框代碼設計 Option Explicit Dim opAdmin As New clsOpAdmin Private Sub CancelButton_Click() Unload Me End Sub Private Sub cmdAdd_Click() lvAdmin End Sub Private Sub cmdDel_Click() lvAdmin End Sub Private Sub cmdModify_Click() lvAdmin End Sub Private Sub Form_Load() lvAdmin End Sub 經(jīng)營分析模塊 經(jīng)營分析模塊用來對學校食堂的運作情況進行分析，具有以下功能： 庫存量排行。 進貨總量與登記次數(shù)排行。 銷售總量與登記次數(shù)排行。 報損總量與登記次數(shù)排行。 1） 經(jīng)營分析對話框界面設計 界面設計 代碼分析 Option Explicit Private Sub cmdClose_Click() End Sub Private Sub cmdSearch_Click() Dim nCount As Integer Dim IsDesc As Boolean Dim opMerch As New clsOpMerch Dim opBuy As New clsOpBuy Dim opSell As New clsOpSell Dim opDispose As New clsOpDispose nCount = Val() If nCount = 0 Then nCount = 10 IsDesc = IIf( = 0, True, False) Select Case Case 0 庫存分析 lvAna, IsDesc, nCount Case 1 進貨分析 lvAna, IsDesc, nCount Case 2: 銷售分析 lvAna, IsDesc, nCount Case 3 報損分析 lvAna, IsDesc, nCount Case Else End Select End Sub Private Sub Form_Load() = 0 = 0 = 10 End Sub 7 測試分析 強制變量聲明 選擇菜單 [工具 ]— [選項 ]命令，打開“選項“對話框”，在 “編輯器”屬性頁中，把“要求變量聲明”復選框選上，或者手工在每個文件的開頭加上關鍵字： option Explicit 這樣在編譯時會對沒有聲明的變量報錯，從而減少很多不必要的調(diào)試。 常見錯誤的避免 數(shù)據(jù)類型不匹配 數(shù)據(jù)類型的判斷錯誤，比如一個功能模塊，接受傳入的數(shù)據(jù)為 id，要求其值必須是正數(shù)。如果寫程序時傳入的是小數(shù)，或者是非數(shù)字的字符串，那么程序?qū)霈F(xiàn)錯誤。又如查詢數(shù)據(jù)表時，使用了 WHERE 子句，但是數(shù)據(jù)類型不匹配，數(shù)據(jù)庫中字段類型為數(shù)字的值，卻使用了字符串去查詢，就會出現(xiàn)錯誤。 數(shù)據(jù)與數(shù)據(jù)庫限制相沖突 數(shù)據(jù)與數(shù)據(jù)庫限制相沖突，可能是其值超過了數(shù)據(jù)庫的上限和下限。比如在數(shù)據(jù)庫中，用戶名稱字符數(shù)量上限是 20 個字符，而在程序中沒有對此進行判別，如果一個添加新食品時名字有 21 個字符，那么在使用 SQL 語句插入數(shù)據(jù)與記錄的時候就會出 錯。 變量聲明錯誤 最后是一些常識性錯誤，比如在 If? Else? End If 過程中，認為判斷只會執(zhí)行其中的一段代碼，于是在兩段中都使用了 Dim obj as clsMerch，事實上，編譯器在語法分析階段，是首先將一個函數(shù)內(nèi)聲明的全部變量都放符號表 中，而不管這個變量的聲明是在這個函數(shù)的什么位置。 又如在 Select Case 中， Case 的條件是字符串，但是沒有加引號，就變成了 Case 一個空變量。 資源的建立與釋放 在將類實例化時，必須使用 New 關鍵字，未實例化類無法使用，例： 誤： Dim obj as clsMerch 正： Dim obj as clsMerch Set obj=New clsMerch 同理，在調(diào)用 Set obj=Nothing 后，資源已經(jīng)釋 放，無法再調(diào)用類內(nèi)的方法。 系統(tǒng)的編譯和發(fā)行 3 個工程的項目屬性在前面創(chuàng)建項目時均已設置完畢，由于在本系統(tǒng)中生成了名為 和 的組件，當移植到其他機器使用時，需要先注冊此組件。另外系統(tǒng)中默認的數(shù)據(jù)庫的路徑是與 同目錄下的 DB文件夾，因此當移植到其他機器時，這個路徑關系依然不能改變。 總結(jié) 一個完整的多層結(jié)構學校食堂管理系統(tǒng)就創(chuàng)建完畢了。對學校食堂管理系統(tǒng)的設計與實現(xiàn)，重點介紹了多 層結(jié)構的開發(fā)思想，在完成系統(tǒng)搭建的同時還可以體會 到軟件工程在項目開發(fā)中各個環(huán)節(jié)的具體應用，并對使用 Visual Basic 開發(fā)數(shù)據(jù)庫應用程序的方法和技巧有了更一步的掌握。 在整個設計過程中，出現(xiàn)過很多的問題，得到了老師和同學的幫助，在不斷學習的過程中我體會到： 作是一個不斷學習的過程，從設計初的模糊認識到最后能夠順利完成，我體會到在實踐中學習的重要性。 由于開始時對系統(tǒng)缺乏整體認識，不具備軟件開發(fā)思想，對系統(tǒng)的功能需求分析的要求認識不夠清楚，使得后續(xù)的工作不得不經(jīng)常返回去修改數(shù)據(jù)表 和個別代碼。使我體會到在設計中的每一步的重要性，如果上一個步驟不能很好的完成，在后續(xù)的設計將會付出幾倍的代價。 在設計過程中，遇到很多困難，我學會通過別人的代碼理解語言的含義但這并不是抄襲，然后根據(jù)自己的設計要求編寫代碼。 設計過程中，由于要實現(xiàn)某些功能，網(wǎng)上資源解決了我的問題。 總之，通過這次設計 ,我深刻體會到要做好一個完整的事情，需要有系統(tǒng)的思維方式和方法，對待一個新的問題，要耐心、要善于運用已有的資源來充實自己。同時我也深刻的認識到，在對待一個新事物時，一定要從整體考慮，完成一步之后再作 下一步，這樣對于系統(tǒng)而言才能更加有效。就比如說在這次的設計，我不但對 ASP 和 Access 有了深刻的認識，積累了使用軟件工程的思想來開發(fā)軟件的經(jīng)驗，同時最重要的是摸索出了一套考慮問題和解決問題的方法，這對于我以后的學習受益匪淺。 致謝 本次畢業(yè)設計的開發(fā)，使我對計算機軟件開發(fā)有了更進一步的認識，也從中學到了許多寶貴的知識。并且加強了自己動腦和動手的能力，加深了自己對軟件工程、對程序設計的熱愛。 在這里首先要感謝我的導師老師。老師平日里工作繁多，他在百忙之中抽出大量的時間在我整個設計的過程中都給予了 我悉心的指導，他的教導和不拘一格的思路給予了我很大啟迪；對我的畢業(yè)設計的完成起著決定性的作用，除了敬老師的專 學校食堂財務管理學校食堂財務管理制度 (試行 ) 為健全食堂管理制度，規(guī)范食堂財務收支行為，使食堂工作更好 地為教學服務、 為師生員工生活服務， 按照財務管理的要求， 結(jié)合 《中 小學會計制度》及我市中小學食堂管理的實際，制定本制度。 第一部分 食堂工作人員崗位職責 一、人員配備 1 、學校食堂管理 實行校長負責制，學校必須明確一名副校級以 上干部分管食堂工作。審批食堂收支、往來、采購等事宜。 2 、學校食堂按照不相容崗位分設的要求，設置會計、出納、采 購、保管等工作崗位，建立食堂工作人員崗位責任制，明確責任，各 司其職，相互監(jiān)督。 3 、學校必須配備有一定專業(yè)技能的食堂財務人員，出納由學校 行政報賬員兼任。食堂會計人員業(yè)務上接受學校會計的指導和監(jiān)督。 4 、財會人員因故調(diào)離本崗位，按有關規(guī)定辦理交接手續(xù)。 二、崗位職責 （一）會計 1 、會計必須依據(jù)《食堂會計核算細則》 （試行）的要求設置“總 分類賬”、“三欄式明細賬”、“多欄式明細賬”、“固定資產(chǎn)備查 賬”等賬簿進行核算。 、每月 5 日前向食堂主管、財務室、校長報送上月“學校食堂 資產(chǎn)負債表”、 “學校食堂損益表”。每學期期末應對食堂主要經(jīng)濟 指標進行分析。 3 、會計依法履行會計制度，對會計資料的真實性進行監(jiān)督。 4 、妥善保管會計資料，并把原始憑證裝訂成冊。食堂的會 計檔 案資料，應視同學校行政會計檔案進行管理。 （二）出納 1 、出納必須依據(jù)《食堂會計核算細則》 （試行）的要求設置“現(xiàn) 金日記賬”、“銀行存款日記賬”、按時登賬，做到賬款、賬證、賬 賬相符。 2 、每筆現(xiàn)金的收取，出納員必須開具三聯(lián)單并蓋“現(xiàn)金收訖” 章，如有錯誤要作廢需三聯(lián)齊全。收款收據(jù)由學校財務室統(tǒng)一管理， 由伙食會計到學校財務室領取。 開完的收據(jù)應全部送交財務室核實注 銷。對涂改、變更、毀壞和遺失收款收據(jù)等要 追查當事人責任，根據(jù) 情節(jié)輕重進行處罰。 3 、付款時，出納根據(jù)會計審核填制的憑證付款，并在付款憑證 上加蓋“現(xiàn)金付訖”章。 4 、所有現(xiàn)金清查的長款歸公，記作營業(yè)外收入，短款賠償。 （三）保管員 1 、保管員對所有食堂物資進行收發(fā)及驗質(zhì)工作，保證食堂日常 運作的物資及時、安全供應到位。 2 、對購進貨物開四聯(lián)入庫單，一聯(lián)為存根聯(lián)，一聯(lián)為會計記賬 聯(lián)，一聯(lián)為保管聯(lián)，一聯(lián)作為結(jié)算聯(lián)給供應商，并對貨物的品名、規(guī) 格、數(shù)量、 單價、質(zhì)量等進行驗收。如發(fā)現(xiàn)質(zhì)量或數(shù)量問題不能入庫 的，應上報食堂管理人員處理。