倉(cāng)庫(kù)管理系統(tǒng)與數(shù)據(jù)庫(kù)設(shè)計(jì)論文

1、 . . 78/79前言隨著企業(yè)管理信息化的發(fā)展，網(wǎng)絡(luò)與計(jì)算機(jī)的引入使管理躍上了一個(gè)新的發(fā)展平臺(tái)。企業(yè)的各項(xiàng)管理都將向信息化方向擴(kuò)展，倉(cāng)庫(kù)的管理對(duì)于企業(yè)來(lái)說(shuō)尤為重要，也正是基于這個(gè)原因我把畢業(yè)設(shè)計(jì)的方向定在了企業(yè)的倉(cāng)庫(kù)管理上。倉(cāng)庫(kù)管理系統(tǒng)是一個(gè)企業(yè)不可缺少的部分,它的容對(duì)于企業(yè)的決策者和管理者來(lái)說(shuō)都至關(guān)重要,所以倉(cāng)庫(kù)管理系統(tǒng)應(yīng)該能夠?yàn)橛脩籼峁┏渥愕男畔⒑涂旖莸牟樵兪侄巍５恢币詠?lái)人們使用傳統(tǒng)人工的方式管理產(chǎn)品，這種管理方式存在著許多缺點(diǎn),如:效率低、性差等。另外，由于時(shí)間一長(zhǎng)，將產(chǎn)生大量的文件和數(shù)據(jù)，這對(duì)于查找、更新和維護(hù)產(chǎn)品都帶來(lái)了不少的困難。作為計(jì)算機(jī)應(yīng)用的一部分,使用計(jì)算機(jī)對(duì)倉(cāng)庫(kù)信息進(jìn)行

2、管理，有著手工管理所無(wú)法比擬的優(yōu)點(diǎn)。例如:檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、性好、壽命長(zhǎng)、成本低等。這些優(yōu)點(diǎn)能夠極提高倉(cāng)庫(kù)管理的效率。由于時(shí)間緊迫，加之水平有限，設(shè)計(jì)中的缺點(diǎn)和不足之處在所難免，敬請(qǐng)導(dǎo)師批評(píng)指正，不勝感激。摘要倉(cāng)庫(kù)管理系統(tǒng)是為了實(shí)現(xiàn)企業(yè)產(chǎn)品管理的系統(tǒng)化、規(guī)化和自動(dòng)化，從而提高企業(yè)管理效率而設(shè)計(jì)的。它完全取代了原來(lái)一直用人工管理的工作方式，避免了由于管理人員的工作疏忽以與管理質(zhì)量問(wèn)題所造成的各種錯(cuò)誤，為與時(shí)、準(zhǔn)確、高效的完成倉(cāng)庫(kù)管理提供了強(qiáng)有力的工具和管理手段。倉(cāng)庫(kù)管理系統(tǒng)是一個(gè)中小型數(shù)據(jù)庫(kù)管理系統(tǒng)，它界面美觀、操作簡(jiǎn)單、安全性高，基本滿足了倉(cāng)庫(kù)管理的要求。整個(gè)系統(tǒng)由基本信

3、息、單據(jù)中心、查詢統(tǒng)計(jì)、報(bào)表打印、維護(hù)設(shè)置、幫助等模塊組成。本系統(tǒng)是在以ACCESS2000作為后臺(tái)數(shù)據(jù)庫(kù)，以Visual Basic為編程語(yǔ)言來(lái)開(kāi)發(fā)的。倉(cāng)庫(kù)管理系統(tǒng)在運(yùn)行階段，效果好，數(shù)據(jù)準(zhǔn)確性高，提高了工作效率，同時(shí)也實(shí)現(xiàn)了倉(cāng)庫(kù)管理計(jì)算機(jī)化。關(guān)鍵字 ：倉(cāng)庫(kù)，管理系統(tǒng)，數(shù)據(jù)庫(kù)AbstractThe administrative system of the warehouse is designed for realizing the systematization , standardization and automization of enterprises products manag

4、ement and improving efficiency of enterprises management. It completely replaces the working way of artificial management originally , prevents from various kinds of mistakes because of administrative staff neglect and the quality problem of management and offeres powerful tool and management way to

5、 complet storehouse management for prompt , accurate , high-efficient . The administrative system of the warehouse is a medium and small-scale database management system,it has not only beautiful interface, but also the high security and the simply operation , and meet the demand for storehouse mana

6、gement basically. Whole system is made up by basic information, document in the center, inquire statistics , report form type ,set up to maintain and module of helping etc.The Warehouse administrative system is designed with regarding ACCESS2000 as the backstage database and regarding Visual Basic a

7、s programming language . The administrative system is effectual, the high data accuracy during the course of operating , improves working efficiency and realizes computerization for storehouse management at the same time .Key word: The Warehouse , Administrative System, The Database目錄 TOC o h z HYPE

8、RLINK l _Toc106383499前言 PAGEREF _Toc106383499 h 1HYPERLINK l _Toc106383500摘要 PAGEREF _Toc106383500 h 2HYPERLINK l _Toc106383501Abstract PAGEREF _Toc106383501 h 3HYPERLINK l _Toc106383502目錄 PAGEREF _Toc106383502 h 4HYPERLINK l _Toc1063835031 倉(cāng)庫(kù)管理系統(tǒng)開(kāi)發(fā)環(huán)境簡(jiǎn)介 PAGEREF _Toc106383503 h 6HYPERLINK l _Toc10638

9、35041.1 中文Visual Basic 6.0 簡(jiǎn)介 PAGEREF _Toc106383504 h 6HYPERLINK l _Toc1063835051.2 ACCESS2000簡(jiǎn)介 PAGEREF _Toc106383505 h 7HYPERLINK l _Toc1063835062 系統(tǒng)可行性分析 PAGEREF _Toc106383506 h 8HYPERLINK l _Toc1063835073 系統(tǒng)總體設(shè)計(jì) PAGEREF _Toc106383507 h 10HYPERLINK l _Toc1063835083.1 系統(tǒng)目標(biāo)設(shè)計(jì) PAGEREF _Toc106383508

10、h 10HYPERLINK l _Toc1063835093.2 開(kāi)發(fā)設(shè)計(jì)思想 PAGEREF _Toc106383509 h 10HYPERLINK l _Toc1063835103.3 系統(tǒng)功能需求分析 PAGEREF _Toc106383510 h 11HYPERLINK l _Toc1063835113.4 系統(tǒng)功能模塊設(shè)計(jì) PAGEREF _Toc106383511 h 11HYPERLINK l _Toc1063835124 數(shù)據(jù)庫(kù)設(shè)計(jì) PAGEREF _Toc106383512 h 12HYPERLINK l _Toc1063835134.1 數(shù)據(jù)庫(kù)需求分析 PAGEREF _T

11、oc106383513 h 12HYPERLINK l _Toc1063835144.2 數(shù)據(jù)庫(kù)概念結(jié)構(gòu)設(shè)計(jì) PAGEREF _Toc106383514 h 14HYPERLINK l _Toc1063835154.3 數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì) PAGEREF _Toc106383515 h 18HYPERLINK l _Toc1063835165 系統(tǒng)主窗體設(shè)計(jì) PAGEREF _Toc106383516 h 24HYPERLINK l _Toc1063835175.1 創(chuàng)建工程項(xiàng)目倉(cāng)庫(kù)管理系統(tǒng) PAGEREF _Toc106383517 h 24HYPERLINK l _Toc106383518

12、5.2 創(chuàng)建系統(tǒng)主窗體 PAGEREF _Toc106383518 h 24HYPERLINK l _Toc1063835195.3 創(chuàng)建主窗體菜單 PAGEREF _Toc106383519 h 25HYPERLINK l _Toc1063835205.4 創(chuàng)建主窗體工具欄 PAGEREF _Toc106383520 h 51HYPERLINK l _Toc1063835215.4.1 工具欄控件常用屬性和事件 PAGEREF _Toc106383521 h 51HYPERLINK l _Toc1063835225.4.2 設(shè)置工具欄屬性 PAGEREF _Toc106383522 h 52

13、HYPERLINK l _Toc1063835235.5 設(shè)置主窗體狀態(tài)欄 PAGEREF _Toc106383523 h 56HYPERLINK l _Toc1063835246 系統(tǒng)模塊設(shè)計(jì) PAGEREF _Toc106383524 h 57HYPERLINK l _Toc1063835256.1 基本信息模塊設(shè)計(jì) PAGEREF _Toc106383525 h 57HYPERLINK l _Toc1063835266.1.1 創(chuàng)建貨物信息窗體 PAGEREF _Toc106383526 h 57HYPERLINK l _Toc1063835276.1.2 創(chuàng)建倉(cāng)庫(kù)信息窗體 PAGERE

14、F _Toc106383527 h 58HYPERLINK l _Toc1063835286.1.3 創(chuàng)建庫(kù)存狀況信息窗體 PAGEREF _Toc106383528 h 59HYPERLINK l _Toc1063835296.2 單據(jù)中心模塊設(shè)計(jì) PAGEREF _Toc106383529 h 60HYPERLINK l _Toc1063835306.2.1 創(chuàng)建新增入庫(kù)單窗體 PAGEREF _Toc106383530 h 61HYPERLINK l _Toc1063835316.2.2 創(chuàng)建入庫(kù)單管理窗體 PAGEREF _Toc106383531 h 62HYPERLINK l _T

15、oc1063835326.2.3 創(chuàng)建月盤(pán)點(diǎn)窗體 PAGEREF _Toc106383532 h 63HYPERLINK l _Toc1063835336.3 查詢統(tǒng)計(jì)模塊設(shè)計(jì) PAGEREF _Toc106383533 h 63HYPERLINK l _Toc1063835346.3.1 創(chuàng)建單據(jù)查詢窗體 PAGEREF _Toc106383534 h 64HYPERLINK l _Toc1063835356.3.2 創(chuàng)建庫(kù)存查詢窗體 PAGEREF _Toc106383535 h 64HYPERLINK l _Toc1063835366.3.3 創(chuàng)建貨物出入統(tǒng)計(jì)窗體 PAGEREF _To

16、c106383536 h 65HYPERLINK l _Toc1063835376.3.4 創(chuàng)建職員操作統(tǒng)計(jì)窗體 PAGEREF _Toc106383537 h 66HYPERLINK l _Toc1063835386.4 報(bào)表打印模塊設(shè)計(jì) PAGEREF _Toc106383538 h 67HYPERLINK l _Toc1063835396.4.1創(chuàng)建打印入庫(kù)單窗體 PAGEREF _Toc106383539 h 67HYPERLINK l _Toc1063835406.4.2 創(chuàng)建打印月盤(pán)點(diǎn)窗體 PAGEREF _Toc106383540 h 68HYPERLINK l _Toc1063

17、835416.5 維護(hù)設(shè)置模塊設(shè)計(jì) PAGEREF _Toc106383541 h 69HYPERLINK l _Toc1063835426.5.1 公司和職員信息 PAGEREF _Toc106383542 h 70HYPERLINK l _Toc1063835436.5.2 查看日志 PAGEREF _Toc106383543 h 70HYPERLINK l _Toc1063835446.5.3 數(shù)據(jù)清除 PAGEREF _Toc106383544 h 71HYPERLINK l _Toc1063835456.5.4 系統(tǒng)初始化 PAGEREF _Toc106383545 h 71HYPE

18、RLINK l _Toc1063835466.5.5 備份數(shù)據(jù)庫(kù) PAGEREF _Toc106383546 h 71HYPERLINK l _Toc1063835476.5.6 還原數(shù)據(jù)庫(kù)和還原到昨天數(shù)據(jù)庫(kù) PAGEREF _Toc106383547 h 72HYPERLINK l _Toc1063835486.5.7 用戶管理 PAGEREF _Toc106383548 h 72HYPERLINK l _Toc1063835496.7 幫助模塊設(shè)計(jì) PAGEREF _Toc106383549 h 72HYPERLINK l _Toc106383550總結(jié) PAGEREF _Toc10638

19、3550 h 74HYPERLINK l _Toc106383551致 PAGEREF _Toc106383551 h 75HYPERLINK l _Toc106383552參考文獻(xiàn) PAGEREF _Toc106383552 h 761 倉(cāng)庫(kù)管理系統(tǒng)開(kāi)發(fā)環(huán)境簡(jiǎn)介本倉(cāng)庫(kù)管理系統(tǒng)是在以Visual Basic為編程語(yǔ)言，以ACCESS2000作為后臺(tái)數(shù)據(jù)庫(kù)而開(kāi)發(fā)的一個(gè)數(shù)據(jù)庫(kù)管理系統(tǒng)。下面簡(jiǎn)要介紹一下中文Visual Basic 6.0和Access 2000。1.1 中文Visual Basic 6.0 簡(jiǎn)介Visual Basic提供了開(kāi)發(fā)Windows應(yīng)用程序最迅速、最簡(jiǎn)潔的方法，它提供了一

20、整套工具，供用戶開(kāi)發(fā)應(yīng)用程序。Visual 指的是開(kāi)發(fā)圖形用戶界面（GUI）的方法，在圖形用戶界面下，不需要編寫(xiě)大量代碼去描述界面元素的外觀和位置，而只需要把預(yù)先建立的對(duì)象加到屏幕上的適當(dāng)位置再進(jìn)行簡(jiǎn)單設(shè)置即可；Basic指的是BASIC(Beginners All-Purpose Symbol Instruction Code)語(yǔ)言，是一種應(yīng)用十分廣泛的計(jì)算機(jī)語(yǔ)言。Visual Basic 在原有BASIC語(yǔ)言的基礎(chǔ)上進(jìn)一步發(fā)展，至今包含了數(shù)百條語(yǔ)句、函數(shù)和關(guān)鍵詞，其中很多和Windows GUI有直接關(guān)系，專業(yè)人員可以用Visual Basic實(shí)現(xiàn)其他任何Windows編程語(yǔ)言的功能，而初

21、學(xué)者只要掌握幾個(gè)關(guān)鍵詞就可以建立簡(jiǎn)單的應(yīng)用程序。Visual Basic還是一個(gè)快速可視化程序開(kāi)發(fā)工具，是極有特色和功能強(qiáng)大的軟件。它使用了面向?qū)ο蟮某绦蛟O(shè)計(jì)方法，大大的增強(qiáng)了程序的可重用性，進(jìn)而簡(jiǎn)化了程序設(shè)計(jì)。Visual Basic提供了眾多的ActiveX控件，提高了軟件開(kāi)發(fā)人員的編程效率。它有其獨(dú)特的特點(diǎn)，主要特點(diǎn)如下：1 可視化設(shè)計(jì)。VB具有所見(jiàn)即所得的功能，在程序設(shè)計(jì)時(shí)，頭腦中所想象的應(yīng)用程序界面，完全可以通過(guò)鍵盤(pán)和鼠標(biāo)完成，而不用編制大量代碼，如果需要修改也可利用鍵盤(pán)或鼠標(biāo)完成，而底層的一些程序代碼，可由VB自動(dòng)生成或修改。VB為用戶提供了大量“控件”，這些“控件”對(duì)于熟悉“Wi

22、ndows應(yīng)用成序”的用戶而言，也許是一點(diǎn)也不陌生，如“標(biāo)簽”,“組合框”,“命令按扭”“文本框”,“單選框”等等，用戶只需要用鼠標(biāo)或鍵盤(pán)把這些“控件”拖到所需的位置并設(shè)置他們的大小形狀屬性等，即可得到所需要的應(yīng)用程序界面。2 事件驅(qū)動(dòng)編程，在VB中把“窗體”與“控件”稱為對(duì)象。這些對(duì)象組成了與用戶交互的圖形界面（也稱為用戶接口用戶界面）再設(shè)計(jì)應(yīng)用程序時(shí)必須考慮到用戶如何與程序進(jìn)行交互，用戶通過(guò)鼠標(biāo)和鍵盤(pán)與應(yīng)用程序進(jìn)行交互是最直接最方便的，這時(shí)那些對(duì)象必須對(duì)鼠標(biāo)鍵盤(pán)操作所引起的事件做出響應(yīng)。響應(yīng)是指執(zhí)行一段應(yīng)用程序，它不沿預(yù)定的路線執(zhí)行而是在響應(yīng)不同事件時(shí)執(zhí)行不同的代碼，因此VB編程重點(diǎn)是在編

23、寫(xiě)事件驅(qū)動(dòng)過(guò)程的代碼。3 面向?qū)ο蟮某绦蛟O(shè)計(jì)，VB是面向?qū)ο蟮某绦蛟O(shè)計(jì)語(yǔ)言，他將代碼和數(shù)據(jù)結(jié)合在一個(gè)對(duì)象中，用戶只需要了解每個(gè)對(duì)象能完成何種任務(wù)而不需要知道對(duì)象是如何工做作的。軟件開(kāi)發(fā)人員主要編寫(xiě)事件驅(qū)動(dòng)過(guò)程的代碼，使對(duì)象對(duì)用戶的操作做出反映。但因VB沒(méi)有多態(tài)等面向?qū)ο蟮奶匦裕砸灿腥朔QVB是一種準(zhǔn)面向?qū)ο蟮某绦蛟O(shè)計(jì)語(yǔ)言。4 易學(xué)易用，開(kāi)發(fā)周期短。VB簡(jiǎn)單易學(xué)，界面友好，容易使用。VB提供了大量功能強(qiáng)大的“控件”，能幫助開(kāi)發(fā)人員在較短的時(shí)間用少量語(yǔ)句編寫(xiě)出應(yīng)用程序，縮短了開(kāi)發(fā)周期。 1.2 ACCESS2000簡(jiǎn)介ASSESS是一個(gè)數(shù)據(jù)庫(kù)管理系統(tǒng)，它簡(jiǎn)單易學(xué)，一個(gè)普通的計(jì)算機(jī)用戶可以很快的掌

24、握它。ACCESS2000的功能也十分強(qiáng)大，利用它可以方便的實(shí)現(xiàn)對(duì)信息保存、維護(hù)、查詢、統(tǒng)計(jì)等，而且它可以十分方便地與OFFICE其他組件交流數(shù)據(jù)，這些功能對(duì)一個(gè)普通用戶來(lái)說(shuō)已經(jīng)足夠了。本系統(tǒng)就是在以ACCESS2000作為后臺(tái)數(shù)據(jù)庫(kù)，以Visual Basic為編程語(yǔ)言為中小型企業(yè)管理倉(cāng)庫(kù)而開(kāi)發(fā)的一個(gè)數(shù)據(jù)庫(kù)管理系統(tǒng)。2 系統(tǒng)可行性分析可行性分析的任務(wù),并不是所有問(wèn)題都有簡(jiǎn)單明顯的解決辦法，事實(shí)上，許多問(wèn)題不可能在預(yù)定的系統(tǒng)規(guī)模之解決。如果問(wèn)題沒(méi)有可行的解，那么花費(fèi)這項(xiàng)開(kāi)發(fā)工程上的任何時(shí)間、資源、人力和經(jīng)費(fèi)都是無(wú)謂的浪費(fèi)?？尚行匝芯康哪康木褪怯米钚〉拇鷥r(jià)在盡可能短的時(shí)間確定問(wèn)題是否能夠解決。必

25、須記住，可行性研究的目的不是解決問(wèn)題，而是確定問(wèn)題是否值得去解。怎樣達(dá)到這個(gè)目的呢？當(dāng)然不能靠主觀猜想，而只能靠客觀分析。必須分析幾種主要的可能解法的利弊，從而判斷原定的系統(tǒng)目標(biāo)和規(guī)模是否現(xiàn)實(shí)，系統(tǒng)完成后所能帶來(lái)的效益是否大到值得投資開(kāi)發(fā)這個(gè)系統(tǒng)的程度。因此，可行性研究實(shí)質(zhì)上是要進(jìn)行一次大大壓縮簡(jiǎn)化了的系統(tǒng)分析和設(shè)計(jì)的過(guò)程，也就是在較高層次上以較抽象的方式進(jìn)行的系統(tǒng)分析和設(shè)計(jì)的過(guò)程。所以從以上的分析原則來(lái)看，我所設(shè)計(jì)的倉(cāng)庫(kù)信息管理系統(tǒng)是一個(gè)規(guī)模不太大的系統(tǒng)，但是目標(biāo)明確，清晰的描述了對(duì)目標(biāo)系統(tǒng)的一切限制和約束。本系統(tǒng)幾乎在所有的企業(yè)、公司使用，當(dāng)然它需要進(jìn)一步的完善和更新。在使用過(guò)程中，要看它

26、能不能帶來(lái)效益，畢竟在現(xiàn)今社會(huì)效率是第一位的。從現(xiàn)實(shí)看，這還是有一定的實(shí)用價(jià)值的，從另一個(gè)角度看，現(xiàn)實(shí)社會(huì)發(fā)展飛速，尊重科技勢(shì)在必行，因此這也是開(kāi)發(fā)本系統(tǒng)的一個(gè)非常重要的原因。21世紀(jì)是計(jì)算機(jī)的時(shí)代，它必然取代一部分人的工作，高科技的監(jiān)控系統(tǒng)進(jìn)入社會(huì)生活的方方面面是發(fā)展的趨勢(shì)。本設(shè)計(jì)從一下三個(gè)方面進(jìn)行可行性研究：1. 技術(shù)可行性。本設(shè)計(jì)“倉(cāng)庫(kù)管理系統(tǒng)”是為企業(yè)倉(cāng)庫(kù)管理人員開(kāi)發(fā)的。鑒于本人在上學(xué)期數(shù)據(jù)庫(kù)課程設(shè)計(jì)中已用Visual Basic6.0Access2000開(kāi)發(fā)過(guò)網(wǎng)上圖書(shū)銷售管理信息系統(tǒng)，而且通過(guò)三個(gè)月畢業(yè)實(shí)習(xí)中的學(xué)習(xí)和實(shí)踐，對(duì)開(kāi)發(fā)管理信息系統(tǒng)又有了新的認(rèn)識(shí)和提高，使自己在開(kāi)發(fā)管理信息系

27、統(tǒng)方面的技術(shù)更加成熟。由于本設(shè)計(jì)最重要體現(xiàn)的是實(shí)用性，所以，通過(guò)大量的社會(huì)調(diào)查和分析，結(jié)合自己現(xiàn)有的技術(shù)水平加上導(dǎo)師的指導(dǎo)，還是能按期完成本畢業(yè)設(shè)計(jì)。 2. 經(jīng)濟(jì)可行性。成本方面：由于本畢業(yè)設(shè)計(jì)屬于計(jì)算機(jī)科學(xué)(本科)教學(xué)的最后一個(gè)環(huán)節(jié)，所以人力消耗免費(fèi)，資源學(xué)校提供，指導(dǎo)老師義務(wù)指導(dǎo)。所以成本計(jì)算只需計(jì)算開(kāi)發(fā)期間開(kāi)發(fā)者的生活消費(fèi)，學(xué)校資源的消耗，所以開(kāi)發(fā)本軟件的成本是非常低的。效益方面：為企業(yè)開(kāi)發(fā)一個(gè)完整、合理的倉(cāng)庫(kù)管理系統(tǒng)，可大大節(jié)余人力，以前需要多人干的工作，使用本系統(tǒng)只需一個(gè)人或幾個(gè)人就能完成，且工作量和勞動(dòng)強(qiáng)度大大降低。所以開(kāi)發(fā)本軟件可以為社會(huì)帶來(lái)很好的經(jīng)濟(jì)效益。 從以上分析看開(kāi)發(fā)本軟

28、件在經(jīng)濟(jì)上是可行的。 3. 操作可行性。本軟件是為企業(yè)倉(cāng)庫(kù)的管理者開(kāi)發(fā)的，所有本軟件的用戶對(duì)象是企業(yè)倉(cāng)庫(kù)的工作人員，由于本軟件要設(shè)計(jì)成友好的界面，寫(xiě)出詳細(xì)的使用說(shuō)明，用戶只需懂得簡(jiǎn)單的計(jì)算機(jī)操作知識(shí)，就能自由應(yīng)用本軟件。 所以從以上幾個(gè)方面的分析來(lái)看，開(kāi)發(fā)本軟件是完全可行的。3 系統(tǒng)總體設(shè)計(jì)3.1 系統(tǒng)目標(biāo)設(shè)計(jì)系統(tǒng)開(kāi)發(fā)的總體任務(wù)是實(shí)現(xiàn)企業(yè)產(chǎn)品管理的系統(tǒng)化、規(guī)化和自動(dòng)化，從而達(dá)到提高企業(yè)管理效率的目的。3.2 開(kāi)發(fā)設(shè)計(jì)思想倉(cāng)庫(kù)管理主要是企業(yè)各種商品的管理。進(jìn)貨時(shí)經(jīng)檢查合同確認(rèn)為有效托收后，進(jìn)行驗(yàn)收入庫(kù)，填寫(xiě)入庫(kù)單，進(jìn)行入庫(kù)登記。企業(yè)各個(gè)部門根據(jù)需要提出產(chǎn)品請(qǐng)求，計(jì)劃員根據(jù)整個(gè)企業(yè)的需求開(kāi)出產(chǎn)品出

29、庫(kù)單，倉(cāng)庫(kù)管理人員根據(jù)出庫(kù)單核對(duì)發(fā)放產(chǎn)品。根據(jù)需要按照月進(jìn)行統(tǒng)計(jì)分析，產(chǎn)生相應(yīng)報(bào)表。倉(cāng)庫(kù)管理的特點(diǎn)是信息處理量比較大，所管理的產(chǎn)品種類繁多，而且由于入庫(kù)單、出庫(kù)單、盤(pán)點(diǎn)單等單據(jù)發(fā)生量特別大，關(guān)聯(lián)信息多，查詢和統(tǒng)計(jì)的方式各不一樣。因此在管理上實(shí)現(xiàn)起來(lái)有一定的困難。在管理的過(guò)程中經(jīng)常會(huì)出現(xiàn)信息的重復(fù)傳遞；單據(jù)、報(bào)表種類繁多，各個(gè)部門管理規(guī)格不統(tǒng)一等問(wèn)題。 在本系統(tǒng)的設(shè)計(jì)過(guò)程中，為了克服這些困難，滿足計(jì)算機(jī)管理工作的需要，我們采取了下面的一些原則。統(tǒng)一各種原始單據(jù)的格式，統(tǒng)一報(bào)表的格式。刪除不必要的管理冗余，實(shí)現(xiàn)管理規(guī)化、科學(xué)化。程序代碼標(biāo)準(zhǔn)化，軟件統(tǒng)一化，確保軟件的可維護(hù)性和實(shí)用性。界面盡量簡(jiǎn)單化

30、，做到實(shí)用、方便，盡量滿足企業(yè)中不同層次員工的需要。建立操作日志，系統(tǒng)自動(dòng)記錄所進(jìn)行和各種操作。3.3 系統(tǒng)功能需求分析系統(tǒng)開(kāi)發(fā)的總體任務(wù)是實(shí)現(xiàn)各種信息的系統(tǒng)化、規(guī)化和自動(dòng)化。系統(tǒng)功能分析是在系統(tǒng)開(kāi)發(fā)的總體任務(wù)的基礎(chǔ)上完成。本倉(cāng)庫(kù)管理系統(tǒng)需要完成功能主要有：倉(cāng)庫(kù)管理各種信息的輸入，包括貨物、供應(yīng)商、客戶、倉(cāng)庫(kù)信息的輸入等。倉(cāng)庫(kù)管理各種信息的查詢、統(tǒng)計(jì)、修改和維護(hù)，包括貨物、單據(jù)查詢，貨物出入、職員操作統(tǒng)計(jì)，各種信息的修改和維護(hù)等。打印報(bào)表的生成。在貨物管理中加入最高儲(chǔ)備和最低儲(chǔ)備字段，對(duì)倉(cāng)庫(kù)中的產(chǎn)品實(shí)現(xiàn)監(jiān)控和報(bào)警。操作日志的管理。倉(cāng)庫(kù)管理系統(tǒng)的使用幫助。3.4 系統(tǒng)功能模塊設(shè)計(jì)在系統(tǒng)功能分析的

31、基礎(chǔ)上，考慮到Visual Basic程序編制的特點(diǎn)，得到如圖3-1所示的系統(tǒng)功能模塊圖。倉(cāng)庫(kù)管理系統(tǒng)基本信息單據(jù)中心查詢統(tǒng)計(jì)報(bào)表打印維護(hù)設(shè)置系統(tǒng)幫助新增單據(jù)單據(jù)管理查詢模塊統(tǒng)計(jì)模塊圖3-1 系統(tǒng)功能模塊圖。4 數(shù)據(jù)庫(kù)設(shè)計(jì)4.1 數(shù)據(jù)庫(kù)需求分析用戶的需求具體體現(xiàn)在各種信息的提供、保存、更新和查詢，這就要求數(shù)據(jù)庫(kù)結(jié)構(gòu)能充分滿足各種信息的輸出和輸入。收集基本數(shù)據(jù)、數(shù)據(jù)結(jié)構(gòu)以與數(shù)據(jù)處理的流程，組成一份詳盡的數(shù)據(jù)字典，為后面的具體設(shè)計(jì)打下基礎(chǔ)。仔細(xì)分析調(diào)查有關(guān)倉(cāng)庫(kù)管理信息需求的基礎(chǔ)上，得到如圖41所示的本系統(tǒng)所處理的數(shù)據(jù)流程。倉(cāng)庫(kù)現(xiàn)有庫(kù)存匯總、處理各種單據(jù)產(chǎn)品入庫(kù)產(chǎn)品出庫(kù)報(bào)表打印圖4-1 倉(cāng)庫(kù)管理系統(tǒng)

32、數(shù)據(jù)流程圖通過(guò)對(duì)企業(yè)倉(cāng)庫(kù)管理的容和數(shù)據(jù)流程分析，設(shè)計(jì)數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)如下：貨物信息，包括的數(shù)據(jù)項(xiàng)有編號(hào)、貨物名稱、貨物類別、貨物規(guī)格、計(jì)量單位、最高限量、最低限量、備注等。倉(cāng)庫(kù)信息，包括的數(shù)據(jù)項(xiàng)有編號(hào)、倉(cāng)庫(kù)名稱、倉(cāng)庫(kù)地點(diǎn)、保管員編號(hào)、備注等。庫(kù)存狀況信息，包括的數(shù)據(jù)項(xiàng)有編號(hào)、貨物編號(hào)、庫(kù)存數(shù)量、倉(cāng)庫(kù)編號(hào)等。入庫(kù)單信息，包括的數(shù)據(jù)項(xiàng)有編號(hào)、貨物編號(hào)、經(jīng)辦人編號(hào)、入庫(kù)時(shí)間、入庫(kù)單價(jià)、入庫(kù)數(shù)量、供應(yīng)商編號(hào)、倉(cāng)庫(kù)編號(hào)、定單狀況、其它金額、備注等。出庫(kù)單信息，包括的數(shù)據(jù)項(xiàng)有編號(hào)、貨物編號(hào)、經(jīng)辦人編號(hào)、出庫(kù)時(shí)間、出庫(kù)單價(jià)、出庫(kù)數(shù)量、客戶編號(hào)、倉(cāng)庫(kù)編號(hào)、定單狀況、其它金額、備注等。進(jìn)行月盤(pán)點(diǎn)信息，包括的數(shù)據(jù)

33、項(xiàng)有編號(hào)、倉(cāng)庫(kù)編號(hào)、盤(pán)點(diǎn)時(shí)間、經(jīng)辦人編號(hào)、盤(pán)點(diǎn)數(shù)據(jù)等。系統(tǒng)日志信息，包括的數(shù)據(jù)項(xiàng)有用戶名、操作時(shí)間、操作容等。用戶管理信息，包括的數(shù)據(jù)項(xiàng)有用戶名、用戶密碼、用戶權(quán)限等。另外，還有借入單、借出單、報(bào)損單、調(diào)撥單信息等。它們與入庫(kù)單、出庫(kù)單信息基本類似，這里不再一一例舉。4.2 數(shù)據(jù)庫(kù)概念結(jié)構(gòu)設(shè)計(jì)得到上面的數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)以后，就可以設(shè)計(jì)出能夠滿足用戶需求的各種實(shí)體結(jié)構(gòu)，以與他們之間的關(guān)系，為以后的邏輯結(jié)構(gòu)設(shè)計(jì)打下基礎(chǔ)。根據(jù)上面的設(shè)計(jì)規(guī)劃出的實(shí)體有：現(xiàn)有庫(kù)存信息實(shí)體、入庫(kù)信息實(shí)體、出庫(kù)信息實(shí)體、借入信息實(shí)體、借出信息實(shí)體、調(diào)撥信息實(shí)體圖和報(bào)損信息實(shí)體圖。各個(gè)實(shí)體具體的描述E-R圖如下：現(xiàn)有庫(kù)存信息

34、實(shí)體E-R圖如圖4-2所示。現(xiàn)有庫(kù)存信息實(shí)體編號(hào)貨物名稱最低限量最高限量圖4-2 現(xiàn)有庫(kù)存信息實(shí)體E-R圖入庫(kù)單信息實(shí)體E-R圖如圖4-3所示。入庫(kù)信息實(shí)體編號(hào)經(jīng)辦人編號(hào)入庫(kù)時(shí)間、單價(jià)、數(shù)量供應(yīng)商編號(hào)圖4-3 入庫(kù)單信息實(shí)體E-R圖出庫(kù)單信息實(shí)體E-R圖如圖4-4所示。出庫(kù)信息實(shí)體編號(hào)經(jīng)辦人編號(hào)入庫(kù)時(shí)間、單價(jià)、數(shù)量客戶編號(hào)圖4-4 出庫(kù)信息實(shí)體E-R圖借入信息實(shí)體E-R圖如圖4-3所示。借入信息實(shí)體編號(hào)經(jīng)辦人編號(hào)借入時(shí)間、單價(jià)、數(shù)量貨物編號(hào)圖4-5 借入信息實(shí)體E-R圖借出信息實(shí)體E-R圖如圖4-6所示。借出信息實(shí)體編號(hào)經(jīng)辦人編號(hào)借出時(shí)間、數(shù)量貨物編號(hào)圖4-6 借出信息實(shí)體E-R調(diào)撥信息實(shí)體E

35、-R圖如圖4-7所示。調(diào)撥信息實(shí)體編號(hào)經(jīng)辦人編號(hào)目標(biāo)倉(cāng)庫(kù)編號(hào)原倉(cāng)庫(kù)編號(hào)圖4-7 調(diào)撥信息實(shí)體E-R報(bào)損信息實(shí)體E-R圖如圖4-4所示。報(bào)損信息實(shí)體編號(hào)經(jīng)辦人編號(hào)報(bào)損時(shí)間、單價(jià)、數(shù)量倉(cāng)庫(kù)編號(hào)圖4-8 報(bào)損信息實(shí)體E-R實(shí)體和實(shí)體之間的關(guān)系E-R圖如圖4-9所示。現(xiàn)有庫(kù)存入庫(kù)出庫(kù)借入借出調(diào)撥報(bào)損圖4-9 實(shí)體之間關(guān)系E-R圖4.3 數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì) 現(xiàn)在需要將在上面的數(shù)據(jù)庫(kù)概念結(jié)構(gòu)轉(zhuǎn)化為ACCESS 2000 數(shù)據(jù)庫(kù)系統(tǒng)所支持的實(shí)際數(shù)據(jù)模型，也就是數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)。倉(cāng)庫(kù)管理信息系統(tǒng)數(shù)據(jù)庫(kù)中各個(gè)表格的設(shè)計(jì)結(jié)果如下面表格所示。每個(gè)表格所示在數(shù)據(jù)庫(kù)中的一個(gè)表。表4-1為貨物基本信息表。表4-1 貨物基

36、本信息表字段名稱數(shù)據(jù)類型字段大小可否為空編號(hào)數(shù)字長(zhǎng)整型不可貨物名稱文本64不可貨物類別文本50可貨物規(guī)格文本50可計(jì)量單位文本50可最高限量數(shù)字長(zhǎng)整型不可最低限量數(shù)字長(zhǎng)整型不可備注備注可 表4-2為倉(cāng)庫(kù)信息表表4-2 倉(cāng)庫(kù)信息表字段名稱數(shù)據(jù)類型字段大小可否為空編號(hào)數(shù)字長(zhǎng)整型不可倉(cāng)庫(kù)名稱文本50不可倉(cāng)庫(kù)地點(diǎn)文本255可保管理員編號(hào)數(shù)字長(zhǎng)整型可備注備注可 表4-3為庫(kù)存狀況信息表表4-3 庫(kù)存狀況信息表字段名稱數(shù)據(jù)類型字段大小可否為空編號(hào)數(shù)字長(zhǎng)整型不可貨物編號(hào)數(shù)字長(zhǎng)整型不可庫(kù)存數(shù)量數(shù)字長(zhǎng)整型不可倉(cāng)庫(kù)編號(hào)數(shù)字長(zhǎng)整型不可 表4-4為入庫(kù)單信息表表4-4 入庫(kù)單信息表字段名稱數(shù)據(jù)類型字段大小可否為空編號(hào)

37、數(shù)字長(zhǎng)整型不可貨物編號(hào)數(shù)字長(zhǎng)整型不可經(jīng)辦人編號(hào)數(shù)字長(zhǎng)整型不可入庫(kù)時(shí)間日期/時(shí)間不可入庫(kù)單價(jià)貨幣不可入庫(kù)數(shù)量數(shù)字長(zhǎng)整型不可供應(yīng)商編號(hào)數(shù)字長(zhǎng)整型可倉(cāng)庫(kù)編號(hào)數(shù)字長(zhǎng)整型不可訂單狀況文本50不可其它金額貨幣可備注備注可表4-5為出庫(kù)單信息表表4-5 出庫(kù)單信息表字段名稱數(shù)據(jù)類型字段大小可否為空編號(hào)數(shù)字長(zhǎng)整型不可貨物編號(hào)數(shù)字長(zhǎng)整型不可經(jīng)辦人編號(hào)數(shù)字長(zhǎng)整型不可出庫(kù)時(shí)間日期/時(shí)間不可出庫(kù)單價(jià)貨幣不可出庫(kù)數(shù)量數(shù)字長(zhǎng)整型不可客戶編號(hào)數(shù)字長(zhǎng)整型可倉(cāng)庫(kù)編號(hào)數(shù)字長(zhǎng)整型不可訂單狀況文本50不可其它金額貨幣可備注備注可表4-6為借入單信息表表4-6 借入單信息表字段名稱數(shù)據(jù)類型字段大小可否為空編號(hào)數(shù)字長(zhǎng)整型不可貨物編號(hào)數(shù)字

38、長(zhǎng)整型不可經(jīng)辦人編號(hào)數(shù)字長(zhǎng)整型不可借入時(shí)間日期/時(shí)間不可借入數(shù)量數(shù)字長(zhǎng)整型不可供應(yīng)商編號(hào)數(shù)字長(zhǎng)整型可倉(cāng)庫(kù)編號(hào)數(shù)字長(zhǎng)整型不可訂單狀況文本50不可其它金額貨幣可備注備注可表4-7為借出單信息表表4-6 借出單信息表字段名稱數(shù)據(jù)類型字段大小可否為空編號(hào)數(shù)字長(zhǎng)整型不可貨物編號(hào)數(shù)字長(zhǎng)整型不可經(jīng)辦人編號(hào)數(shù)字長(zhǎng)整型不可借出時(shí)間日期/時(shí)間不可借出數(shù)量數(shù)字長(zhǎng)整型不可供應(yīng)商編號(hào)數(shù)字長(zhǎng)整型可倉(cāng)庫(kù)編號(hào)數(shù)字長(zhǎng)整型不可訂單狀況文本50不可其它金額貨幣可備注備注可表4-8為調(diào)撥單信息表表4-8 調(diào)撥單信息表字段名稱數(shù)據(jù)類型字段大小可否為空編號(hào)數(shù)字長(zhǎng)整型不可貨物編號(hào)數(shù)字長(zhǎng)整型不可經(jīng)辦人編號(hào)數(shù)字長(zhǎng)整型不可調(diào)撥時(shí)間日期/時(shí)間不可

39、調(diào)撥數(shù)量數(shù)字長(zhǎng)整型不可原倉(cāng)庫(kù)編號(hào)數(shù)字長(zhǎng)整型不可目標(biāo)倉(cāng)庫(kù)編號(hào)數(shù)字長(zhǎng)整型不可其它金額貨幣可備注備注可表4-9為報(bào)損單信息表表4-9 報(bào)損單信息表字段名稱數(shù)據(jù)類型字段大小可否為空編號(hào)數(shù)字長(zhǎng)整型不可貨物編號(hào)數(shù)字長(zhǎng)整型不可經(jīng)辦人編號(hào)數(shù)字長(zhǎng)整型不可報(bào)損時(shí)間日期/時(shí)間不可報(bào)損單價(jià)貨幣不可報(bào)損數(shù)量數(shù)字長(zhǎng)整型不可倉(cāng)庫(kù)編號(hào)數(shù)字長(zhǎng)整型不可其它金額貨幣可備注備注可 表4-10為盤(pán)點(diǎn)單信息表 表4-10 盤(pán)點(diǎn)單信息表字段名稱數(shù)據(jù)類型字段大小可否為空編號(hào)數(shù)字長(zhǎng)整型不可倉(cāng)庫(kù)編號(hào)數(shù)字長(zhǎng)整型不可盤(pán)點(diǎn)時(shí)間日期/時(shí)間不可經(jīng)辦人編號(hào)數(shù)字長(zhǎng)整型不可盤(pán)點(diǎn)數(shù)據(jù)備注不可表4-11為系統(tǒng)日志信息表表4-11 系統(tǒng)日志信息表字段名稱數(shù)據(jù)類型字段

40、大小可否為空用戶名文本50不可操作時(shí)間日期/時(shí)間不可操作容備注不可表4-12為用戶管理信息表表4-11 用戶管理信息表字段名稱數(shù)據(jù)類型字段大小可否為空用戶名文本64不可用戶密碼文本50不可用戶權(quán)限數(shù)字長(zhǎng)整型不可5 系統(tǒng)主窗體設(shè)計(jì)5.1 創(chuàng)建工程項(xiàng)目倉(cāng)庫(kù)管理系統(tǒng)打開(kāi)Visual Basic 后，單擊File - New Project 菜單，在工程模板中選擇Standard ExE,Visual Basic將自動(dòng)產(chǎn)生一個(gè)Form窗體，屬性都是缺省設(shè)置。這里我們刪除這個(gè)窗體，單擊File-Save Projiect菜單，將這個(gè)工程項(xiàng)目命名為倉(cāng)庫(kù)管理系統(tǒng)。5.2 創(chuàng)建系統(tǒng)主窗體Visual Basi

41、c 創(chuàng)建的應(yīng)用程序可以是SDI（單文檔界面）和MDI（多文檔界面）。在SDI的程序中，每個(gè)窗體之間是獨(dú)立的。而MDI的程序中，有一個(gè)窗體是主窗體，可以包含其他窗體，他的類型是MDI Form 。本設(shè)計(jì)采用多文檔界面，這樣可以使程序更加美觀、整齊有序。單擊工具欄中的ADD MDI Form 按鈕，生成一個(gè)窗體。窗體的屬性設(shè)置見(jiàn)表51。表51 主窗體屬性設(shè)置 屬性 屬性取值NameFrmMainCaption倉(cāng)庫(kù)管理系統(tǒng)StartUpPositionCenterScreenWindowStateMaximized主窗體界面設(shè)計(jì)如圖5-1所示。圖51 系統(tǒng)主窗體5.3 創(chuàng)建主窗體菜單 熟悉Windo

42、ws下應(yīng)用程序的用戶對(duì)菜單一定有比較深的印象。所謂菜單，即是指應(yīng)用程序中為用戶提供的一組命令，這些命令出現(xiàn)在應(yīng)用程序界面的頂部。每項(xiàng)菜單有多項(xiàng)子菜單，具有一定的專門功能，用戶容易通過(guò)主菜單來(lái)訪問(wèn)其下的子菜單。增加菜單可以增強(qiáng)應(yīng)用程序的功能。下面將介紹菜單與菜單的編輯和使用。1. 菜單簡(jiǎn)介 菜單欄在窗體欄的標(biāo)題欄下面，包含一個(gè)或多個(gè)菜單標(biāo)題。當(dāng)單擊一個(gè)菜單標(biāo)題，包含菜單項(xiàng)目的列表就被拉下來(lái)。菜單項(xiàng)可以包含命令、分隔條和子菜單標(biāo)題。用戶看到的每個(gè)菜單項(xiàng)和在“Menu Editor”中定義的一個(gè)菜單控件相對(duì)應(yīng)。 為了使應(yīng)用程序簡(jiǎn)單好用，應(yīng)該將菜單相按功能進(jìn)行分組。菜單控件使一個(gè)對(duì)象，與其他對(duì)象一樣，

43、它具有定義它的外觀與行為的屬性。在設(shè)計(jì)或運(yùn)行時(shí)可以設(shè)置Caption 屬性、Enabled和Visible屬性、Checked屬性以與其他屬性。菜單控件只包含一個(gè)事件，即Click事件，當(dāng)用鼠標(biāo)或鍵盤(pán)選中該菜單控件時(shí)，將調(diào)用該事件。2. Visual Basic菜單編輯器 菜單編輯器可以創(chuàng)建新的菜單和菜單欄，也可以向現(xiàn)存的菜單中增加新的命令、用自己的命令替代現(xiàn)存的菜單命令、產(chǎn)生新的菜單和菜單欄，改變和刪除現(xiàn)存菜單和菜單欄。 要打開(kāi)菜單編輯器，在“Tools”菜單中選擇“Menu Editor”選項(xiàng)?；驌羰髽?biāo)右鍵，選擇彈出式菜單中的“Menu Editor”。彈出菜單編輯器窗口如圖52所示。 5

44、2 菜單編輯器菜單編輯器的基本屬性如下：Caption出現(xiàn)在控件上的文本。 Name代碼中用來(lái)引用菜單控件的名字。shortcut可以訪問(wèn)菜單的鍵盤(pán)按鍵組合。以上介紹了菜單編輯器的基本情況和屬性，接下來(lái)將來(lái)介紹利用菜單編輯器創(chuàng)建菜單的過(guò)程。選取待創(chuàng)建菜單的窗體，激活該窗體。從菜單欄的“Tools”菜單中，選取“Menu Editor”并單擊（或在“工具欄”上單擊“Menu Editor”按鈕）。在菜單編輯器的“Caption”文本框中，為第一個(gè)菜單標(biāo)題鍵入希望在菜單欄上顯示的文本。如果希望某一字符成為該菜單項(xiàng)的訪問(wèn)鍵，也可以在該字符前加上一個(gè)（&）字符。在菜單中，這一字符會(huì)自動(dòng)加上一條下劃線。

45、在菜單編輯器的“Name”文本框中，鍵入將用來(lái)在代碼中引用該菜單控件的名字。命名菜單控件的規(guī)則如下：菜單中項(xiàng)目名稱應(yīng)當(dāng)唯一，但不同菜單中相似動(dòng)作項(xiàng)目可以重名。每一個(gè)項(xiàng)目名稱應(yīng)當(dāng)有一個(gè)用鍵盤(pán)選取命令的唯一的記憶訪問(wèn)字符。訪問(wèn)字符通常是菜單標(biāo)題的第一個(gè)字母；每個(gè)菜單標(biāo)題不能用同一個(gè)字符。如果命令在完成之前還需要附加信息，則在其名稱后面應(yīng)當(dāng)有一個(gè)省略號(hào)（）。單擊向左或向右箭頭按鈕，可以改變?cè)摽丶目s進(jìn)級(jí)。如果需要，還可以設(shè)置控件的其他屬性。創(chuàng)建新的菜單控件時(shí)，選取“Next”命令。單擊“Insert”可以在現(xiàn)有的控件之間增加一個(gè)菜單控件。單擊向上與向下的箭頭按鈕，可以在現(xiàn)有菜單控件之中移動(dòng)控件。菜單

46、控件創(chuàng)建好后，選取“OK”可關(guān)閉菜單編輯器。創(chuàng)建的菜單標(biāo)題將顯示在窗體上。在設(shè)計(jì)時(shí)，單擊一個(gè)菜單標(biāo)題可下拉其相應(yīng)的菜項(xiàng)。創(chuàng)建分隔符，如果在設(shè)計(jì)的菜單中創(chuàng)建分隔符條，只需在想要分隔開(kāi)來(lái)的菜單項(xiàng)之間插入一個(gè)菜單控件。單擊左、右箭頭按鈕使新菜單項(xiàng)縮進(jìn)到與它要隔開(kāi)的菜單項(xiàng)同級(jí)。然后在“Caption”文本框中鍵入一個(gè)連字符（）。設(shè)置“Name”屬性?！癘K”,關(guān)閉菜單編輯器。創(chuàng)建賦值訪問(wèn)鍵和快捷鍵 為了提高應(yīng)用程序的性能，為用戶提供最方便、快捷的操作，可以定義菜單的訪問(wèn)鍵和快捷鍵，改進(jìn)鍵盤(pán)對(duì)菜單命令的訪問(wèn)。 訪問(wèn)鍵，要在菜單編輯器中給菜單控件賦值訪問(wèn)鍵，先選取要賦值訪問(wèn)鍵的菜單項(xiàng)，在該菜單項(xiàng)“Capt

47、ion”框中，要在作為訪問(wèn)鍵字符的前面鍵入一個(gè)（&）字符?？旖萱I，快捷鍵提供了一種鍵盤(pán)單步的訪問(wèn)方法，按下時(shí)會(huì)立刻運(yùn)行一個(gè)菜單項(xiàng)?？旖萱I的賦值包括功能鍵與控制鍵的組合，如CTRL+F1鍵或CTRL+A鍵。他們出現(xiàn)在菜單中相應(yīng)菜單項(xiàng)的右邊。根據(jù)以上介紹的方法創(chuàng)建本設(shè)計(jì)的菜單結(jié)構(gòu)如圖53所示 基本信息(&A).貨物信息 Ctrl+A.倉(cāng)庫(kù)信息 Ctrl+B.供應(yīng)商信息 Ctrl+C.往來(lái)客戶 Ctrl+D.庫(kù)存狀況信息 Ctrl+E.退出 Ctrl+F單據(jù)中心(&B).新增入庫(kù)單 Ctrl+G.新增出庫(kù)單 Ctrl+H.新增借入單 Ctrl+I.新增借出單 Ctrl+J.新增調(diào)撥單 Ctrl+K.

48、新增報(bào)損單 Ctrl+L.入庫(kù)單管理 Ctrl+M.出庫(kù)單管理 Ctrl+N.借入單管理 Ctrl+O.借出單管理 Ctrl+P.調(diào)撥單管理 Ctrl+Q.報(bào)損單管理 Ctrl+R.進(jìn)行月盤(pán)點(diǎn) Ctrl+S查詢統(tǒng)計(jì)(&C).單據(jù)查詢 Ctrl+T.庫(kù)存查詢 Ctrl+U.貨物出入統(tǒng)計(jì) Ctrl+V.職員操作統(tǒng)計(jì) Ctrl+W打印報(bào)表.打印入庫(kù)單 Ctrl+X.打印出庫(kù)單 Ctrl+Y.打印借入單 Ctrl+Z.打印借出單 Ctrl+F1.打印調(diào)撥單 Ctrl+F2.打印報(bào)損單 Ctrl+F3.打印月盤(pán)點(diǎn) Ctrl+F4.頁(yè)面設(shè)置 Ctrl+F5視圖(&D).工具欄 Ctrl+F6.狀態(tài)欄 Ct

49、rl+F7維護(hù)設(shè)置(&E).公司信息 Ctrl+F8.職員信息 Ctrl+F9.查看日志 Ctrl+F11.數(shù)據(jù)清除 Ctrl+F12.系統(tǒng)初始化 Shift+F1.備份數(shù)據(jù)庫(kù) Shift+F2.還原數(shù)據(jù)庫(kù) Shift+ F3.修改密碼 Shift+F5.用戶管理 Shift+F6幫助(&H).關(guān)于倉(cāng)庫(kù)管理系統(tǒng) F1圖5-3 倉(cāng)庫(kù)管理系統(tǒng)菜單結(jié)構(gòu) 系統(tǒng)初始化菜單的代碼如下：Private Declare Function GetWindow Lib user32 (ByVal hwnd As Long, ByVal wCmd As Long) As LongPublic Sub InitPur

50、view() 初始化17種權(quán)限狀態(tài) Dim i As Integer For i = 16 To 0 Step -1 If GetBit(Purview, i + 1) = 0 Then 權(quán)限類別(16 - i) = 0 Else 權(quán)限類別(16 - i) = 1 End If NextEnd SubPrivate Sub InitMenu() 根據(jù)用戶權(quán)限來(lái)初始化菜單 If 權(quán)限類別(3) = 0 Then M月盤(pán)點(diǎn).Enabled = False tbToolBar.Buttons(4).Enabled = FalseEnd If If 權(quán)限類別(4) = 0 Then M供應(yīng)商.Enab

51、led = False 登記新供應(yīng)商.MouseIcon = Picture1.MouseIcon End If If 權(quán)限類別(5) = 0 Then M往來(lái)客戶.Enabled = False 登記新客戶.MouseIcon = Picture1.MouseIcon End If If 權(quán)限類別(6) = 0 Then M單據(jù)查詢.Enabled = False M庫(kù)存查詢.Enabled = False M貨物出入統(tǒng)計(jì).Enabled = False M職員操作統(tǒng)計(jì).Enabled = False L貨物出入統(tǒng)計(jì).MouseIcon = Picture1.MouseIconL職員操作統(tǒng)計(jì)

52、.MouseIcon = Picture1.MouseIcon L單據(jù)查詢.MouseIcon = Picture1.MouseIcon L庫(kù)存查詢.MouseIcon = Picture1.MouseIcon tbToolBar.Buttons(5).Enabled = False tbToolBar.Buttons(8).Enabled = False End If If 權(quán)限類別(8) = 0 Then M打印入庫(kù)單.Enabled = False M打印出庫(kù)單.Enabled = False M打印借入單.Enabled = False M打印借出單.Enabled = False M

53、打印調(diào)拔單.Enabled = False M打印報(bào)損單.Enabled = False M打印月盤(pán)點(diǎn).Enabled = False tbToolBar.Buttons(10).Enabled = False End If If 權(quán)限類別(9) = 0 Then M公司信息.Enabled = False 修改公司信息.MouseIcon = Picture1.MouseIcon End If If 權(quán)限類別(10) = 0 Then M職員信息.Enabled = False 登記新職員.MouseIcon = Picture1.MouseIcon End If If 權(quán)限類別(11) =

54、 0 Then M倉(cāng)庫(kù)信息.Enabled = False 創(chuàng)建新倉(cāng)庫(kù).MouseIcon = Picture1.MouseIcon End If If 權(quán)限類別(12) = 0 Then M貨物信息.Enabled = False 登記新貨物.MouseIcon = Picture1.MouseIcon End If If 權(quán)限類別(13) = 0 Then M數(shù)據(jù)清除.Enabled = False M系統(tǒng)初始化.Enabled = False End If If 權(quán)限類別(14) = 0 Then M備份數(shù)據(jù)庫(kù).Enabled = False M還原數(shù)據(jù)庫(kù).Enabled = False

55、 M還原到昨天數(shù)據(jù)庫(kù).Enabled = False 備份數(shù)據(jù)庫(kù).MouseIcon = Picture1.MouseIcon 還原數(shù)據(jù)庫(kù).MouseIcon = Picture1.MouseIcon End If If 權(quán)限類別(15) = 0 Then M查看日志.Enabled = False 查看日志.MouseIcon = Picture1.MouseIcon tbToolBar.Buttons(12).Enabled = False End If If 權(quán)限類別(16) = 0 Then mnuUserManage.Enabled = False L用戶管理.MouseIcon =

56、 Picture1.MouseIcon End IfEnd Sub“菜單”中的各個(gè)“子菜單”的程序代碼如下：?jiǎn)?dòng)主窗體時(shí)的需要的代碼Private Sub Form_Load() 初始化m_checkado m_checkado.ConnectionString = DataConnectString m_checkado.Visible = False 每天首次運(yùn)行自動(dòng)備份數(shù)據(jù)庫(kù) fMainForm.m_checkado.RecordSource = select 操作時(shí)間 from 系統(tǒng)日志 order by 操作時(shí)間 desc fMainForm.m_checkado.Refresh I

57、f fMainForm.m_checkado.Recordset.RecordCount 0 Then fMainForm.m_checkado.Recordset.MoveFirst Dim t As String t = fMainForm.m_checkado.Recordset.Fields(操作時(shí)間).Value 如果今天從未有人登陸,備份數(shù)據(jù)庫(kù) If InStr(1, t, Str(Date) 1 Then BackupData DataPath, App.Path + everyday.bkp End If Else BackupData DataPath, App.Path +

58、 everyday.bkp End IffMainForm.WriteLog (登陸系統(tǒng)) 寫(xiě)入系統(tǒng)日志 InitPurview 初始化各種權(quán)限類別InitMenu 初始化菜單 加載圖片 Picture1.Picture = LoadPicture(App.Path + dataground1.jpg)End Sub“基本信息”菜單下的“退出”子菜單的Click事件的程序代碼如下。點(diǎn)擊“退出”會(huì)退出系統(tǒng)，但在此之前系統(tǒng)首先會(huì)寫(xiě)入系統(tǒng)日志。Private Sub Form_Unload(Cancel As Integer) fMainForm.WriteLog (退出系統(tǒng)) 寫(xiě)入系統(tǒng)日志End

59、SubPrivate Sub mnuFileExit_Click() Unload MeEnd Sub“維護(hù)設(shè)置”菜單下的“修改密碼”子菜單的Click事件的程序代碼如下。點(diǎn)擊“修改密碼”會(huì)彈出修改當(dāng)前用戶密碼窗口。Private Sub mnuModifyPassword_Click() PasModify.Show vbModalEnd Sub“維護(hù)設(shè)置”菜單下的“用戶管理”子菜單的Click事件的程序代碼，如下。點(diǎn)擊“用戶管理”會(huì)彈出用戶管理窗口。Private Sub mnuUserManage_Click() 用戶管理.Show vbModalEnd Sub“幫助”菜單下的“關(guān)于倉(cāng)庫(kù)

60、管理系統(tǒng)”子菜單的Click事件的程序代碼如下。點(diǎn)擊“關(guān)于倉(cāng)庫(kù)管理系統(tǒng)”會(huì)彈出系統(tǒng)幫助窗口。Private Sub mnuHelpAbout_Click() frmAbout.Show vbModal, MeEnd Sub“打印報(bào)表”菜單下的“頁(yè)面設(shè)置”子菜單的Click事件的程序代碼如下。點(diǎn)擊“頁(yè)面設(shè)置”會(huì)彈出頁(yè)面設(shè)置對(duì)話框。Private Sub mnuFilePageSetup_Click() On Error Resume Next With dlgCommonDialog .DialogTitle = 頁(yè)面設(shè)置 .CancelError = True .ShowPrinter End