庫存管理系統(tǒng)設計說明書

第一章概述1.1庫存管理的必要性大多數(shù)庫存管理理論認為，庫存是物理上和邏輯上庫房庫位的所有有形和無形物料極其價值的總和，具體包括成品、原材料、在制品、在途品、生產(chǎn)前物料、備品備件等。雖然持有一些庫存是必要的，過量的庫存卻非但沒有用處而且占用了資金。占用的資金對于公司開展、新產(chǎn)品開發(fā)等都是非常需要的；減少資金占用還可以大大減少來自銀行貸款的利息和風險。對那些采購量特別大、采購件市場價格有波動的物料庫存，加強庫存管理效果更為明顯。因此，平衡公司庫存投資與其它資金需求至關重要。1.2庫存分類企業(yè)怎樣管理庫存，是庫存管理的最大難點和挑戰(zhàn)。因此，通過MRPII物料主方案模塊和采購模塊建立方案與控制系統(tǒng)以有效地實施庫存管理和采購補償成為題中應有之義。通過調查，我們得知任何庫存均可分為如下三類：Ａ類物品：高值──價值占庫存總值７０-８０％的相對少數(shù)物品。通常為物品的１５-２０％。Ｂ類物品：中值──總值占庫存總值的１５-２０％。物品數(shù)居中，通常占物品的３０-４０％。Ｃ類物品：低值──庫存總值幾乎可以忽略不計，只占５-１０％。是物品的大多數(shù)，通常占６０-７０％。顯然，Ａ類物品是關鍵；如果我們把精力集中于Ａ類物品，使其庫存壓縮10-50％，就是總庫存的相當可觀的一筆壓縮。關于ＡＢＣ分類方法有幾條根本法那么：a.控制的程度：對Ａ類物品嚴加控制，包括做完備、準確的記錄，高層監(jiān)督和經(jīng)常評審，從供給商按大合同訂單頻繁交貨，對車間緊密跟蹤以壓縮提前期。對Ｂ類物品做正常控制，包括良好的記錄與常規(guī)的關注。對Ｃ類物品盡可能使用簡便的控制，諸如定期目視檢查庫存實物、簡要記錄或以簡便標志法說明補充存貨已經(jīng)訂貨，采用大庫存量與訂貨量以防止缺貨，安排車間日程方案時給以低優(yōu)先級。在一切活動中給Ａ類物品以高優(yōu)先級以壓縮其提前期與庫存。對Ｂ類物品予以正常處理，僅在關鍵時給以高優(yōu)先級。予Ｃ類物品以最低優(yōu)先級。對Ａ類物品提供及時、準確的采購信息和狀態(tài)查詢。計算機數(shù)據(jù)需要人工加以核對，進行階段性盤點，以及頻繁的評審以壓縮庫存。對Ｂ類物品，按一定周期或當發(fā)生重大變化時評審一次庫存數(shù)據(jù)和訂貨點，MRPII操作按例行公事處理。對Ｃ類物品可以盤點處理或訂貨點計算。訂貨往往不用MRPII作方案?？梢詰{業(yè)務人員的經(jīng)驗加以控制。由上可以看出庫存管理的重要性。因此，庫存管理是企業(yè)管理的重要組成局部。市場需要庫存商品提供給用戶，企業(yè)的經(jīng)營需要庫存保證各種藥品的供給以進行藥品的銷售，庫存對生產(chǎn)效率的提高有著極其重要的影響。因此，庫存管理系統(tǒng)是計算機管理系統(tǒng)的中心。因為，所有企業(yè)的經(jīng)營活動都離不開物流的活動。1.3

庫存管理的目標庫存管理的主要目標就是通過對倉庫所有入出庫活動的管理和控制及對庫存數(shù)據(jù)有效的統(tǒng)計和分析，以保證企業(yè)生產(chǎn)中暢通的物流，使決策人員及早發(fā)現(xiàn)問題，采取相應措施，調整庫存結構,縮短儲藏周期，加速資金周轉，最大限度地降低庫存占用，同時，通過周期性的倉庫盤點，及時補救管理中的漏洞，使庫存管理系統(tǒng)實時地反映企業(yè)中各個倉庫的現(xiàn)時情況，為各類管理人員從不同側面提供所需信息，以便協(xié)調企業(yè)經(jīng)營收到更大效益，庫存管理系統(tǒng)是協(xié)調企業(yè)生產(chǎn)經(jīng)營的根底，其數(shù)據(jù)的準確性、方便的查詢、有效的分析是整個計算機管理系統(tǒng)順利運行的關鍵。第二章開發(fā)背景 企業(yè)的庫存物資管理往往是很復雜、很繁瑣的。由于所掌握的物資種類眾多，訂貨、管理、發(fā)放的渠道各有差異，各個企業(yè)之間的管理體制不盡相同，各類統(tǒng)計報表繁多，因此倉庫的庫存管理必須編制一套庫存管理信息系統(tǒng)，實現(xiàn)計算機化操作，而且必須根據(jù)企業(yè)的具體情況制定相應的方案。 根據(jù)當前的企業(yè)管理體制，一般的庫存管理系統(tǒng)，總是根據(jù)所掌握的物資類別，相應分成幾個科室來進行物資的方案，訂貨，核銷托收，驗收入庫，根據(jù)企業(yè)各個部門的需求來發(fā)送物資設備，并隨時按期進行庫存盤點，作臺帳，根據(jù)企業(yè)領導和自身管理的需要按月、季度、年度進行統(tǒng)計分析，產(chǎn)生相應報表。為了加強關鍵物資、設備的管理，要定期掌握其儲藏，消耗情況，根據(jù)方案定額和實際纖毫定額的比擬，進行定額管理，使得資金使用合理，物資設備的儲藏最正確。 一個完整的企業(yè)物資供給管理系統(tǒng)應包括采購方案管理，合同收托管理、倉庫庫存管理、定額管理、統(tǒng)計管理、財務管理等模塊。其中倉庫的庫存管理是整個物資供給管理系統(tǒng)的核心。因此有必要開發(fā)一套獨立的庫存管理系統(tǒng)來提高企業(yè)工作效率,而所使用的這套庫存管理系統(tǒng)是企業(yè)生產(chǎn)經(jīng)營管理活動中的核心，此系統(tǒng)必須可以用來控制合理的庫存費用、適時適量的庫存數(shù)量，使企業(yè)生產(chǎn)活動效率最大化。通過對這些情況的仔細調查，我開發(fā)了下面的倉庫庫存管理系統(tǒng)。第三章系統(tǒng)分析 本系統(tǒng)采用了結構化生命周期法，結構化生命周期法是最常用的管理信息系統(tǒng)開發(fā)方法，分為四個步驟，即系統(tǒng)調研分析、數(shù)據(jù)庫設計實現(xiàn)、界面設計實現(xiàn)和系統(tǒng)功能設計實現(xiàn)。其中系統(tǒng)調研分析階段是最根底、也是最容易被開發(fā)人員無視的環(huán)節(jié)。在整個系統(tǒng)分析階段，我在圖書館認真查看了很多關于倉庫庫存管理方面的書籍，收集到了相應的入庫單、領料單、臺賬、物料卡、報表等資料，這些資料可以用作數(shù)據(jù)庫設計的依據(jù),具體如下： 序號提綱1零件倉庫劃分成多少個區(qū)域？2每個區(qū)域有多少個貨架？3每個貨架上分多少層？4架子上的每一層有多少個格子？5零部件是如何進行物料編碼的？6倉庫管理人員人數(shù)有多少？7日均處理入庫單數(shù)量大約有多少？8日均處理出庫單數(shù)量大約有多少？9領料退回的處理方法？10是否每天都要登記庫存臺賬？11庫存臺賬有多少類型？12倉庫之間是否可以進行調撥？13每次盤點間隔時間多長？14如何處理零部件盤虧？15如何處理零部件盤盈？16是否有零部件物料缺貨警戒線？17統(tǒng)計報表的種類和填報頻率？入庫單是入庫單位在把相應的零部件送人倉庫時必須填寫的單據(jù)；領料單是領料人員從倉庫中領取零部件時必須填寫的單據(jù)〔即出庫〕；零部件臺賬〔相當于本系統(tǒng)中的操作日志〕實際是一個流水賬，用于記錄每天發(fā)生的入庫、出庫信息；物料卡〔在本系統(tǒng)中用現(xiàn)有庫存信息來表示〕的作用是記錄某一種零部件的數(shù)量變化，以便庫管員盤查；報表是倉庫向有關領導和部門定期提交的零部件庫存匯總信息。收集到的入庫單、領料單、零部件庫存臺賬、零部件物料卡等單據(jù)和報表的實物樣式在此略去，有興趣者請參考有關類似企業(yè)的樣本即可。財務處采購科車間驗收財務處供給科缺件單領料單入庫單報表庫存臺帳登帳入庫處出庫處統(tǒng)計盤點在某公司的調研過程中，已了解到所涉及的業(yè)務主要是入庫和出庫，系統(tǒng)入庫、出庫業(yè)務流程圖。財務處采購科車間驗收財務處供給科缺件單領料單入庫單報表庫存臺帳登帳入庫處出庫處統(tǒng)計盤點財務處財務處退貨退貨不合格領料入合庫格圖3.1庫存管理系統(tǒng)業(yè)務流程圖業(yè)務流程圖說明外部環(huán)境處理過程決策過程數(shù)據(jù)存檔數(shù)據(jù)流向圖業(yè)務流程圖符號說明用戶需求分析就是在用戶需求調研的根底上，確定系統(tǒng)的總體結構方案，完成相應的需求分析報告。在確定系統(tǒng)的總體結構方案過程中，包括確定應用程序的結構、系統(tǒng)開發(fā)環(huán)境和系統(tǒng)的功能模塊。用戶需求調研結束之后，應該立即進行用戶需求分析。應用程序結構確定從用戶應用角度來看，可把應用程序系統(tǒng)的組成局部分成數(shù)據(jù)存儲層、業(yè)務處理層和界面表示層等3個層次，而應用程序結構可歸納為：集中式應用程序結構、單用戶應用程序結構、多層效勞器應用程序結構、瀏覽器／效勞器應用程序結構、客戶機／效勞器應用程序結構等5種類型。

本庫存管理系統(tǒng)就采用了當前最流行的客戶機／效勞器應用程序結構〔即C/S結構〕，此時，客戶機提出請求，效勞器對客戶機的請求作出回應。通過對效勞功能的分布實現(xiàn)了分工效勞。數(shù)據(jù)存儲層放在效勞器上，業(yè)務處理層和界面表示層放在客戶機上，因此又被稱為“靈敏的客戶機〞結構。許多操作可以在本地的客戶機上執(zhí)行，只是當需要數(shù)據(jù)時，才向效勞器發(fā)出請求。并使應用程序的處理更接近用戶，使整個系統(tǒng)具有較好的性能，可以并行地處理應用程序的請求、減少了數(shù)據(jù)傳輸量、降低了效勞器的負荷。由于條件所限，將此系統(tǒng)所有程序都置于一臺計算機上，以便調試運行。

確定系統(tǒng)開發(fā)環(huán)境由于大多數(shù)公司內部使用的計算機平臺都是基于Windows環(huán)境的。為了降低系統(tǒng)本錢，應最大程度地利用現(xiàn)有的資源、兼容現(xiàn)有的環(huán)境，可確定使用下面的開發(fā)環(huán)境：

★網(wǎng)絡操作系統(tǒng)：Windows2000；★數(shù)據(jù)庫效勞器：MicrosoftAccessr2000；

★效勞器平臺：Windows2000；★客戶機平臺：Windows95／98／NT／2000；

★前端開發(fā)工具：visualBasic6.0(企業(yè)版)；★數(shù)據(jù)訪問對象：ADO〔本系統(tǒng)使用ADO控件，簡化編程〕。

確定系統(tǒng)的功能模塊

通過分析確定庫存系統(tǒng)將包含6個主要功能模塊，即系統(tǒng)模塊、入庫業(yè)務管理模塊、出庫業(yè)務管理模塊、退料業(yè)務管理模塊〔還庫業(yè)務管理模塊〕、盤點業(yè)務管理模塊〔報表輸出〕、需求管理模塊。對于每一個功能模塊，都包含了數(shù)據(jù)錄入、編輯、查詢、統(tǒng)計、打印、應急、幫助等功能。第四章系統(tǒng)設計1總體設計系統(tǒng)目標設計系統(tǒng)開發(fā)的總體任務是實現(xiàn)企業(yè)物資設備管理的系統(tǒng)化、標準化和自動化，從而到達企業(yè)倉庫庫存管理效率的目的。開發(fā)設計思想庫存管理的物資主要是企業(yè)生產(chǎn)中所需要的各種設備、原材料及零部件。進貨時經(jīng)檢查合同確認為有效托收后，進行驗收入庫，填寫入庫單，進行入庫登記。企業(yè)各個部門根據(jù)所需要的物資設備總額和部門生產(chǎn)活動需要提出物資需求申請。方案員根據(jù)整個企業(yè)的需求開出物資設備出庫單，倉庫管理員根據(jù)出庫單核對發(fā)放設備、原材料及零部件。有些設備使用完畢需要及時歸還入庫，填寫還庫單。根據(jù)需要按照月、季、年進行統(tǒng)計分析，產(chǎn)生相應報表。倉庫庫存管理的特點是信息處理量比擬大。所管理的物資設備、原材料及零部件種類繁多，而且由于入庫單、出庫單、需求單等單據(jù)發(fā)生量特別大，關聯(lián)信息多，查詢和統(tǒng)計的方式各不相同，因此在管理上實現(xiàn)起來有一定的困難。在管理的過程中經(jīng)常會出現(xiàn)信息的重復傳遞；單據(jù)、報表種類繁多，各個部門規(guī)格不統(tǒng)等問題。在本系統(tǒng)的設計過程中，為了克服這些困難，滿足計算機管理的需要，我們采取了下面的一些原那么：統(tǒng)一各種原始單據(jù)的格式，統(tǒng)一帳目和報表的格式。刪除不必要的管理冗余，實現(xiàn)管理標準化、科學化。程序代碼標準化，軟件統(tǒng)一化，確保軟件的可維護性和實用性。界面盡量簡單化，做到實用、方便，盡量滿足企業(yè)中不同層次員工的需要。建立操作日志，系統(tǒng)自動記錄所進行的各種操作。系統(tǒng)功能分析本系統(tǒng)需要完成的功能主要有以下幾點。庫存管理的各種信息的輸入，包括入庫、出庫、還庫、需求信息的輸入等。庫存管理的各種信息的查詢、修改和維護。設備采購報表的生成。在材料庫存中參加所允許的最大庫存合最小庫存字段，對所有庫存物資實現(xiàn)監(jiān)控和報警。企業(yè)各個部門的物資需求管理。操作日志的管理庫存管理系統(tǒng)的使用幫助。詳細設計系統(tǒng)功能模塊設計 在系統(tǒng)功能分析的根底上，考慮VB和Access的特點，設計出如下圖的系統(tǒng)功能模塊圖。需求模塊還庫模塊出庫模塊入庫模塊日志管理打印設置幫助模塊報表模塊查看模塊維護模塊輸入模塊系統(tǒng)模塊庫存管理系統(tǒng)需求模塊還庫模塊出庫模塊入庫模塊日志管理打印設置幫助模塊報表模塊查看模塊維護模塊輸入模塊系統(tǒng)模塊庫存管理系統(tǒng)用戶管理用戶管理圖4.1系統(tǒng)功能模塊圖系統(tǒng)模塊包括報表的打印及設置，操作日志的管理。管理員可以通過管理界面添加或刪除用戶，添加新管理員或刪除原有管理員,驗證用戶的合法性，阻止非法用戶登錄。管理員或其他用戶可以修改自己的密碼。入庫模塊 包括填寫入庫單，更新，刪除入庫記錄，查看現(xiàn)有庫存信息，入庫記錄的查詢及打印出庫模塊 包括填寫出庫單，更新，刪除出庫記錄，查看現(xiàn)有庫存信息，出庫記錄的查詢及打印還庫模塊 包括填寫還庫單，更新，刪除還庫記錄，還庫記錄的查詢及打印需求模塊 包括填寫需求方案表，更新，刪除采購方案信息，查看現(xiàn)有采購信息，采購信息的查詢及打印，以及預測短期內的需求方案。庫存管理庫存管理處理輸出輸入處理輸出輸入采購單報表刪除修改統(tǒng)計查尋入庫單出庫單還庫單采購方案采購單報表刪除修改統(tǒng)計查尋入庫單出庫單還庫單采購方案圖4.2庫存管理HIPO圖數(shù)據(jù)庫設計數(shù)據(jù)庫需求分析在仔細調查企業(yè)庫存物資材料管理過程的根底上，設計出本系統(tǒng)所處理的數(shù)據(jù)流程圖(圖4.2)匯總處理企業(yè)總體生產(chǎn)方案設備還庫設備出庫設備入庫設備采購各部門需求倉庫現(xiàn)有庫存匯總處理企業(yè)總體生產(chǎn)方案設備還庫設備出庫設備入庫設備采購各部門需求倉庫現(xiàn)有庫存圖4.3庫存系統(tǒng)數(shù)據(jù)流程圖通過對企業(yè)倉庫管理內容和數(shù)據(jù)流程分析，設計的數(shù)據(jù)項合數(shù)據(jù)結構如下：設備代碼信息。包括的數(shù)據(jù)項有設備號、設備名稱?，F(xiàn)有庫存信息。包括的數(shù)據(jù)項有現(xiàn)有設備、現(xiàn)有數(shù)目、最大庫存、最小庫存等。設備使用信息。包括的數(shù)據(jù)項有使用的設備、使用部門。數(shù)目。使用時間、出庫時狀態(tài)等。設備采購信息。包括的數(shù)據(jù)項有采購的設備、采購員、供給商、采購數(shù)目、采購時間等。設備歸還信息。包括的數(shù)據(jù)項有歸還設備、歸還部門、歸還數(shù)目、歸還時間、經(jīng)手人等。設備需求信息。包括的數(shù)據(jù)項有需求的部門、需求設備、需求數(shù)目、需求時間等。有了上面的數(shù)據(jù)結構、數(shù)據(jù)項和數(shù)據(jù)流程，就可以進行下面的數(shù)據(jù)庫設計。數(shù)據(jù)庫概念結構設計這一設計階段是在需求分析的根底上，設計出能夠滿足用戶需求的各種實體，以及它們之間的關系，為后面的邏輯結構設計打下根底。根據(jù)上面的設計規(guī)劃出的實體有庫存實體、出庫實體、入庫實體、采購實體、還庫實體、需求實體。各個實體的E-R圖及其關系描述如下：最小庫存最大庫存設備號現(xiàn)有庫存現(xiàn)有庫存最小庫存最大庫存設備號現(xiàn)有庫存現(xiàn)有庫存圖4.4庫存實體E-R圖設備號供給商信息入庫設備號供給商信息入庫采購價格、數(shù)量采購員采購價格、數(shù)量采購員圖4.5入庫實體E-R圖經(jīng)手人數(shù)量、時間設備號使用部門出庫經(jīng)手人數(shù)量、時間設備號使用部門出庫圖4.6出庫實體E-R圖需求時間需求數(shù)量設備號需求部門部門需求需求時間需求數(shù)量設備號需求部門部門需求圖4.7部門需求實體E-R圖經(jīng)手人還庫數(shù)量設備號設備還庫經(jīng)手人還庫數(shù)量設備號設備還庫還庫時間、人還庫時間、人圖4.8庫存實體E-R圖時間供給信息設備號庫存信息方案采購時間供給信息設備號庫存信息方案采購圖4.9方案采購實體E-R圖實體與實體間的關系E-R圖如下所示：出庫現(xiàn)有庫存入庫出庫現(xiàn)有庫存入庫設備采購部門需求還庫設備采購部門需求還庫圖4.10實體之間關系E-R圖數(shù)據(jù)庫邏輯結構設計在上面的實體以及實體之間關系的根底上，形成各個表格之間的關系。庫存管理系統(tǒng)數(shù)據(jù)庫中的各個表的設計結果如下面的幾個表格所示，，每個表格表示數(shù)據(jù)庫中的一個表。表4.1設備代碼表字段名稱數(shù)據(jù)類型可否為空說明設備號文本NOTNULL字段大小為6設備名稱文本NULL字段大小為20表4.2權限表字段名稱數(shù)據(jù)類型可否為空說明用戶名文本NULL字段大小為10密碼文本NULL字段大小為15權限文本NULL字段大小為10表4.3設備入庫表字段名稱數(shù)據(jù)類型可否為空說明設備號文本NOTNULL字段大小為6入庫時間日期/時間NULL無供給商文本NULL字段大小為20供給商文本NULL字段大小為15入庫數(shù)量數(shù)字NULLINTEGER價格數(shù)字NULLINTEGER采購員文本NULL字段大小為10表4.4設備出庫表字段名稱數(shù)據(jù)類型可否為空說明設備號文本NOTNULL字段大小為6使用部門文本NULL字段大小為20出庫時間日期/時間NULL無出庫狀況文本NULL字段大小為20經(jīng)手人文本NULL字段大小為10出庫數(shù)量數(shù)字NULLINTEGER領取人文本NULL字段大小為10用途文本NULL字段大小為20表4.5現(xiàn)有庫存庫表字段名稱數(shù)據(jù)類型可否為空說明設備號文本NOTNULL字段大小為6主鍵現(xiàn)有庫存文本NULLINTEGER最大庫存文本NULLINTEGER最小庫存文本NULLINTEGER表4.6部門需求表字段名稱數(shù)據(jù)類型可否為空說明設備號文本NOTNULL字段大小為6部門名稱文本NOTNULL字段大小為10需要數(shù)量數(shù)字NULLINTEGER需求開始時間日期/時間NULL無需求結束時間日期/時間NULL無表4.7設備還庫表字段名稱數(shù)據(jù)類型可否為空說明設備號文本NOTNULL字段大小為6還庫時間日期/時間NULL無倉庫管理員文本NULL字段大小為10歸還數(shù)量數(shù)字NULLINTEGER歸還人文本NULL字段大小為10表4.8操作日志表字段名稱數(shù)據(jù)類型可否為空說明操作員文本NOTNULL字段大小為10操作內容文本NOTNULL字段大小為100操作時間日期/時間NOTNULL無表4.9設備采購方案表字段名稱數(shù)據(jù)類型可否為空說明設備號文本NOTNULL字段大小為6主鍵現(xiàn)有庫存數(shù)字NULLINTEGER總庫存數(shù)字NULLINTEGER最大庫存數(shù)字NULLINTEGER購置數(shù)量數(shù)字NULLINTEGER供給商文本NULL字段大小為10價格數(shù)字NULLINTEGER方案采購時間日期/時間NULL無4.3代碼設計任何庫存均可分為如下三類：Ａ類物品：高值──價值占庫存總值７０-８０％的相對少數(shù)物品。通常為物品的１５-２０％。Ｂ類物品：中值──總值占庫存總值的１５-２０％。物品數(shù)居中，通常占物品的３０-４０％。Ｃ類物品：低值──庫存總值幾乎可以忽略不計，只占５-１０％。是物品的大多數(shù)，通常占６０-７０％。因此設計編碼如下：設備號或零件號××××××自定義自定義自定義例如設備號或零件號A0102A類消耗性物資常用零件4．4輸入輸出設計本系統(tǒng)界面標準Windows形式，鍵盤輸入(也可以用條形碼讀取)，人機交互，容易使用。輸入輸出的設計考慮美觀實用和通俗易懂，圖文并茂。4．5系統(tǒng)平安性設計系統(tǒng)數(shù)據(jù)庫中包含多個二維表，所以在系統(tǒng)與數(shù)據(jù)庫的連接上，并沒有把數(shù)據(jù)庫和系統(tǒng)的連接直接寫入代碼，而是通過對效勞器端進行系統(tǒng)設置，使數(shù)據(jù)庫名及路徑不可見，并通過ACCESS的數(shù)據(jù)庫平安設置，保證了數(shù)據(jù)庫的平安性。系統(tǒng)根據(jù)用戶身份不同賦予不同權限，用戶用密碼登陸，同樣也保證了系統(tǒng)數(shù)據(jù)的平安性。第五章系統(tǒng)實施5．1系統(tǒng)實現(xiàn)5.1.1 系統(tǒng)管理菜單修改用戶密碼程序PrivateSubCommand1_Click()Adodc1.RecordSource=frmLogiSetText4.DataSource=Adodc1Text4.DataField="密碼"IfText1=""ThenMsgBox"請輸入原密碼！",,"修改密碼"ExitSubElseIfText1.Text<>Adodc1.Recordset.Fields("密碼")ThenMsgBox"原密碼錯誤！",,"修改密碼"ExitSubElseIfText2=""OrText3=""ThenMsgBox"請輸入新密碼??！",,"修改密碼"ExitSubElseIfText2<>Text3ThenMsgBox"密碼不一致！！",,"修改密碼"ExitSubElseMsgBox"密碼修改成功??！",,"修改密碼"UnloadMeEndIfEndSub5.15入庫模塊的實現(xiàn)PrivateSubCommand1_Click()設備入庫程序DimI,JAsIntegerDimSTRAsStringIfText1.Text=""OrText2=""OrCombo1.Text=""OrText4=""OrText5=""OrText6=""OrText7=""ThenMsgBox"請輸入完整信息！"ExitSubElse將記錄存入入庫記錄表MsgBox"已經(jīng)成功入庫！"EndIf設備入庫表.Adodc1.RecordSource="select*from現(xiàn)有庫存表where設備號='"&Text1.Text&"'"If設備入庫表.Adodc1.Recordset.RecordCount>0Then將記錄參加現(xiàn)有庫存表中設備入庫表.Text9.Text=CInt(設備入庫表.Text9.Text)+CInt(Text2.Text)MsgBox"現(xiàn)有庫存量為："&JElseSTR="現(xiàn)有庫存表中無此設備！"&vbCrLf&"請在設備代碼表和現(xiàn)有庫存表中手動添加記錄??！"MsgBoxSTRLoadfrm現(xiàn)有庫存表Loadfrm設備代碼表EndIfEndSubPrivateSubcmdDelete_Click()刪除入庫表中記錄OnErrorGoToDeleteErrDimYesNoAsStringYesNo=MsgBox("刪除",vbYesNo,"刪除記錄")IfYesNo=vbYesThen.Delete.MoveNextIf.EOFThen.MoveLastEndWithElseExitSubEndIfDeleteErr:EndSubPrivateSubcmdUpdate_Click()更新紀錄程序OnErrorGoToUpdateErrdatPrimaryRS.Recordset.UpdateBatchadAffectAllExitSubUpdateErr:EndSub5.PrivateSubCommand1_Click()設備出庫程序Dimi,J,kAsIntegerDimSTRAsStringfrm設備出庫表.Adodc1.RecordSource="select*from現(xiàn)有庫存表where設備號='"&Text1.Text&"'"IfIsNumeric(Text2)=FalseThenMsgBox"數(shù)量必須是數(shù)字！"ExitSubEndIfIfText1.Text=""OrText2=""OrCombo1.Text=""OrText4=""OrText5=""OrText6=""OrText7=""ThenMsgBox"請輸入完整信息！"ExitSubElseIffrm設備出庫表.Adodc1.Recordset.RecordCount<=0ThenSTR="現(xiàn)有庫存表中無此設備！請檢查輸入是否正確?。?MsgBoxSTRExitSubElseMsgBox"已經(jīng)成功存入設備出庫表庫！"EndIfIffrm設備出庫表.Adodc1.Recordset.RecordCount>0Thenk=CInt(frm設備出庫表.Text9.Text)-CInt(Text2.Text)Ifk>=0Thenfrm設備出庫表.Text9.Text=CInt(frm設備出庫表.Text9.Text)-CInt(Text2.Text)MsgBox"現(xiàn)有庫存量為："&JElseMsgBox"現(xiàn)有庫存量缺乏！請輸入適宜數(shù)量?。?ExitSubEndIfElseSTR="現(xiàn)有庫存表中無此設備！請檢查輸入是否正確?。?MsgBoxSTREndIfEndSubPrivateSubcmdDelete_Click()刪除出庫記錄OnErrorGoToDeleteErrDimYesNoAsStringYesNo=MsgBox("刪除",vbYesNo,"刪除記錄")IfYesNo=vbYesThen.Delete.MoveNextIf.EOFThen.MoveLastEndWithElseExitSubEndIfDeleteErr:EndSub更新記錄程序同入庫的更新程序相同，在此略5.15現(xiàn)有模塊實現(xiàn)，程序略5.主要程序PrivateSubcmdAdd_Click()添加設備OnErrorGoToAddErrExitSubAddErr:EndSub5.1主要程序PrivateSubCommand1_Click()顯示高于最大警戒庫存的設備datPrimaryRS.RecordSource="select*from現(xiàn)有庫存表where現(xiàn)有庫存>最大庫存"IfdatPrimaryRS.Recordset.RecordCount>0ThenBeepMsgBox"表中設備已過量！"ElseMsgBox"沒有設備庫存過量！"EndIfEndSubPrivateSubCommand2_Click()顯示低于于最小警戒庫存的設備datPrimaryRS.RecordSource="select*from現(xiàn)有庫存表where現(xiàn)有庫存<最小庫存"IfdatPrimaryRS.Recordset.RecordCount>0ThenBeepMsgBox"表中設備庫存量已過警戒線！請采購??！"ElseMsgBox"沒有設備庫存量過少！"End