倉(cāng)庫(kù)管理系統(tǒng)分析與設(shè)計(jì)

××××學(xué)院課程設(shè)計(jì)報(bào)告課程名稱：學(xué)院：專業(yè)班級(jí)：姓名：學(xué)號(hào)：指導(dǎo)教師:完成時(shí)刻：報(bào)告成績(jī):評(píng)閱意見(jiàn)：評(píng)閱意見(jiàn)：評(píng)閱教師日期倉(cāng)庫(kù)治理系統(tǒng)設(shè)計(jì) 目

錄前言第一章系統(tǒng)需求分析1、現(xiàn)行系統(tǒng)存在問(wèn)題的分析2、解決方案3、可行性分析4、繪制業(yè)務(wù)流程圖第二章系統(tǒng)分析與設(shè)計(jì)1、現(xiàn)系統(tǒng)中存在的問(wèn)題2、新系統(tǒng)的目標(biāo)3、系統(tǒng)功能模塊設(shè)計(jì)4、應(yīng)用需求分析5、系統(tǒng)數(shù)據(jù)庫(kù)設(shè)計(jì)第三章系統(tǒng)開(kāi)發(fā)背景1、計(jì)算機(jī)倉(cāng)庫(kù)治理的意義

2、為今后企業(yè)上網(wǎng)做好預(yù)備

3、通用倉(cāng)庫(kù)治理的設(shè)計(jì)分析4、數(shù)據(jù)庫(kù)需求分析第四章通用倉(cāng)庫(kù)治理系統(tǒng)實(shí)現(xiàn)的環(huán)境

1、開(kāi)發(fā)工具的選擇

2、Access2000數(shù)據(jù)庫(kù)簡(jiǎn)介

3、二者的結(jié)合（DBA）第五章系統(tǒng)總體規(guī)劃

系統(tǒng)功能第六章系統(tǒng)設(shè)計(jì)各功能模塊結(jié)構(gòu)與實(shí)現(xiàn)系統(tǒng)要緊界面的實(shí)現(xiàn)系統(tǒng)使用講明第七章結(jié)束語(yǔ)參考文獻(xiàn)前言伴隨著企業(yè)規(guī)模的不斷擴(kuò)大,原始的、手工的進(jìn)行治理工作差不多不能適應(yīng)工業(yè)企業(yè)進(jìn)展的現(xiàn)狀，更無(wú)法滿足企業(yè)對(duì)治理工作的快速、準(zhǔn)確的要求。而計(jì)算機(jī)信息治理技術(shù)的迅速進(jìn)展恰恰解決了那個(gè)問(wèn)題，它使計(jì)算機(jī)技術(shù)與現(xiàn)代的治理技術(shù)相互配合，來(lái)更加準(zhǔn)確、高速的完成工業(yè)企業(yè)日常的倉(cāng)庫(kù)治理工作。使企業(yè)能夠以最少的人員來(lái)完成更多的工作。倉(cāng)庫(kù)治理信息系統(tǒng)要緊采納MicrosoftVisual6.0

做為開(kāi)發(fā)工具，應(yīng)用面向?qū)ο蟮某绦蛟O(shè)計(jì)方法，進(jìn)行開(kāi)發(fā)與設(shè)計(jì)的。它是一個(gè)典型的信息治理系統(tǒng)。本系統(tǒng)能夠依照各應(yīng)用單位情況，適當(dāng)加以修改，以便更好應(yīng)用。VisualBasic是近幾年來(lái)在國(guó)內(nèi)外得到迅速推廣應(yīng)用的可視化程序?qū)崿F(xiàn)語(yǔ)言，具有簡(jiǎn)單易學(xué)、功能強(qiáng)大、軟件費(fèi)用支出低、見(jiàn)效快等特點(diǎn)。它提供了開(kāi)發(fā)Windows應(yīng)用程序最迅速、最簡(jiǎn)捷的方法，不然而專業(yè)人員得心應(yīng)手的開(kāi)發(fā)工具，而且易于被非專業(yè)人員掌握。倉(cāng)庫(kù)治理信息系統(tǒng)是依照某企業(yè)所屬倉(cāng)庫(kù)的實(shí)際治理情況進(jìn)行編寫(xiě)的，要緊目的是為了方便企業(yè)對(duì)倉(cāng)庫(kù)來(lái)往業(yè)務(wù)及倉(cāng)庫(kù)情況進(jìn)行集中的查詢與治理工作。在社會(huì)主義經(jīng)濟(jì)高速進(jìn)展的今天，假如企業(yè)對(duì)倉(cāng)庫(kù)的各項(xiàng)治理運(yùn)做仍然停滯在以紙、筆為要緊工具的時(shí)期，就會(huì)因?yàn)樾畔⒘康目焖僭鲩L(zhǎng)而無(wú)法迅速、準(zhǔn)確的完成各項(xiàng)治理工作，如此，必將成為企業(yè)各方面進(jìn)展的一個(gè)瓶頸。而在當(dāng)代那個(gè)以信息時(shí)代為主題的社會(huì)里，將信息技術(shù)應(yīng)用于對(duì)現(xiàn)代企業(yè)的治理，不但能夠提高信息的處理速度和提高信息處理的準(zhǔn)確性，更重要的是，能夠解放勞動(dòng)力，將他們分配到更需要人力資源的崗位上去，從而加快其現(xiàn)代化、綜合化的建設(shè)步伐。如此，不但為企業(yè)治理部門(mén)節(jié)約了不必要的開(kāi)支，更重要的是提高了它的工作效率。第一章系統(tǒng)需求分析1、現(xiàn)行系統(tǒng)存在問(wèn)題的分析現(xiàn)在多數(shù)企業(yè)的倉(cāng)庫(kù)治理工作大部分依舊進(jìn)行著手工治理，工作起來(lái)效率專門(mén)低，同時(shí)不能及時(shí)了解倉(cāng)庫(kù)容量，需求的倉(cāng)庫(kù)信息等等，不便于動(dòng)態(tài)及時(shí)地調(diào)整倉(cāng)庫(kù)結(jié)構(gòu)，以便更好地適應(yīng)當(dāng)前學(xué)生的借閱需求。手工治理還存在這許多弊端，由于不可幸免的人為因素，經(jīng)常造成數(shù)據(jù)的遺漏、誤報(bào)。計(jì)算機(jī)信息化治理有著儲(chǔ)存信息量大、速度快等許多優(yōu)點(diǎn)，提供給我們的處理信息及時(shí)快捷，同時(shí)也提高了我們工作人員的自身素養(yǎng)。2、解決方案基于以上的對(duì)問(wèn)題的分析，利用計(jì)算機(jī)給我們提供信息，及時(shí)地調(diào)整倉(cāng)庫(kù)結(jié)構(gòu)，同時(shí)對(duì)倉(cāng)庫(kù)過(guò)程形成一整套動(dòng)態(tài)的治理就十分必要了。通用倉(cāng)庫(kù)系統(tǒng)的建立，需要進(jìn)行用戶的需求調(diào)查與分析，以確定系統(tǒng)目標(biāo)，提出解決問(wèn)題的詳細(xì)方案，這是系統(tǒng)建設(shè)的重要環(huán)節(jié)。企業(yè)倉(cāng)庫(kù)規(guī)模要有著完善的倉(cāng)庫(kù)信息，對(duì)入庫(kù)每一件物品要有詳細(xì)的記錄信息，功能上對(duì)系統(tǒng)的需求是全面的。因此對(duì)用戶的需求可分為四個(gè)方面：一方面是工作人員通過(guò)計(jì)算機(jī)來(lái)治理倉(cāng)庫(kù)信息，分類編號(hào)，調(diào)整倉(cāng)庫(kù)結(jié)構(gòu)，增加倉(cāng)庫(kù)，適應(yīng)工作人員的需求；二方面是工作人員能通過(guò)計(jì)算機(jī)來(lái)查詢倉(cāng)庫(kù)中的物品，來(lái)確定自已需要的出庫(kù)的相就物品，為出庫(kù)做好預(yù)備；三方面是工作人員對(duì)倉(cāng)庫(kù)中得到每個(gè)物品相關(guān)記錄；四方面也是倉(cāng)庫(kù)的核心工作，對(duì)入庫(kù)物品治理。這四個(gè)方面形成了倉(cāng)庫(kù)的一個(gè)工作整體，采納計(jì)算機(jī)自動(dòng)化信息處理，可方便快捷地共享信息、交流信息，高效地協(xié)同工作。在軟、硬件方面對(duì)系統(tǒng)的需求，軟件要求易學(xué)，界面友好，容易掌握，能夠?qū)ｉT(mén)簡(jiǎn)單方便的治理各種倉(cāng)庫(kù)信息。硬件的配置要求不能太高，如此能夠?qū)ｉT(mén)好的適應(yīng)當(dāng)前的企業(yè)以及各個(gè)單位的倉(cāng)庫(kù)需要。在開(kāi)發(fā)方式上對(duì)系統(tǒng)的需求，系統(tǒng)設(shè)計(jì)開(kāi)發(fā)的周期要短，在短時(shí)刻內(nèi)完成，減少開(kāi)發(fā)成本，提高開(kāi)發(fā)效率，方便、簡(jiǎn)單、有用作為系統(tǒng)開(kāi)發(fā)的指導(dǎo)思想。3、可行性分析通過(guò)對(duì)倉(cāng)庫(kù)治理各個(gè)方面進(jìn)行了具體的了解之后，現(xiàn)對(duì)通用倉(cāng)庫(kù)治理系統(tǒng)的可行性進(jìn)行分析。技術(shù)上可行：該系統(tǒng)所需硬件設(shè)備，市場(chǎng)上銷(xiāo)售且價(jià)格較低，甚至能夠使用原有的設(shè)備，軟件上，操作系統(tǒng)采納Windows系列操作系統(tǒng)，數(shù)據(jù)庫(kù)治理系統(tǒng)采納VisualBasic，這些軟件在MIS開(kāi)發(fā)中已被大量應(yīng)用，技術(shù)上都比較成熟。因此在技術(shù)上是可行的。經(jīng)濟(jì)上可行：由于各個(gè)急需采納計(jì)算機(jī)來(lái)進(jìn)行倉(cāng)庫(kù)的治理，因此對(duì)開(kāi)發(fā)通用倉(cāng)庫(kù)系統(tǒng)大力支持，開(kāi)發(fā)經(jīng)費(fèi)沒(méi)有問(wèn)題。治理上可行：通用倉(cāng)庫(kù)治理有專門(mén)多的治理體制，每位入庫(kù)物品都要有相應(yīng)的記錄，出庫(kù)進(jìn)也要對(duì)相應(yīng)入庫(kù)的物品進(jìn)入刪減，同時(shí)入和出庫(kù)必須對(duì)每個(gè)物品的相應(yīng)數(shù)量和單價(jià)進(jìn)入錄入。因此治理上可行。另外，倉(cāng)庫(kù)治理對(duì)開(kāi)發(fā)該系統(tǒng)也是大力支持的，同時(shí)制定了培訓(xùn)打算，并進(jìn)行了實(shí)施MIS的物質(zhì)預(yù)備和工作預(yù)備。4、繪制業(yè)務(wù)流程圖財(cái)務(wù)處采購(gòu)科車(chē)間驗(yàn)收財(cái)務(wù)處供應(yīng)科缺件單領(lǐng)料單入庫(kù)單報(bào)表庫(kù)存臺(tái)帳登帳入庫(kù)處出庫(kù)處統(tǒng)計(jì)盤(pán)點(diǎn)在某公司的調(diào)研過(guò)程中，已了解到所涉及的業(yè)務(wù)要緊是入庫(kù)和出庫(kù)，下圖是系統(tǒng)入庫(kù)、出庫(kù)業(yè)務(wù)流程圖。財(cái)務(wù)處采購(gòu)科車(chē)間驗(yàn)收財(cái)務(wù)處供應(yīng)科缺件單領(lǐng)料單入庫(kù)單報(bào)表庫(kù)存臺(tái)帳登帳入庫(kù)處出庫(kù)處統(tǒng)計(jì)盤(pán)點(diǎn)財(cái)務(wù)處財(cái)務(wù)處退貨退貨不合格領(lǐng)料入合庫(kù)格庫(kù)存治理系統(tǒng)業(yè)務(wù)流程圖業(yè)務(wù)流程圖講明外部環(huán)境處理過(guò)程決策過(guò)程數(shù)據(jù)存檔數(shù)據(jù)流向業(yè)務(wù)流程圖符號(hào)講明第二章系統(tǒng)分析與設(shè)計(jì)1、現(xiàn)系統(tǒng)中存在的問(wèn)題現(xiàn)行的通用倉(cāng)庫(kù)治理系統(tǒng)只是單一治理系統(tǒng)，現(xiàn)已不能滿足快速準(zhǔn)確的通用倉(cāng)庫(kù)治理需要。系統(tǒng)輸入繁瑣，極易產(chǎn)生輸入錯(cuò)誤，缺少智能化輸入功能，如：產(chǎn)品名稱輸入過(guò)程中，產(chǎn)品名稱和產(chǎn)品代碼不能夠相互協(xié)調(diào)，易產(chǎn)生不匹配現(xiàn)象。另外，整個(gè)系統(tǒng)運(yùn)行較慢，數(shù)據(jù)處理能力不夠，進(jìn)行一個(gè)查詢往往需要等待專門(mén)長(zhǎng)時(shí)刻。該系統(tǒng)還缺少通用倉(cāng)庫(kù)治理理功能，圖書(shū)組成條目差不多上通過(guò)手工計(jì)算的，工作量專門(mén)大，且容易產(chǎn)生錯(cuò)誤，有一個(gè)小錯(cuò)誤，核對(duì)都需要花費(fèi)專門(mén)大的精力，換句話講，當(dāng)前沒(méi)有通用倉(cāng)庫(kù)治理系統(tǒng)。原通用倉(cāng)庫(kù)治理系統(tǒng)用basic開(kāi)發(fā)，為單機(jī)版，不能實(shí)現(xiàn)網(wǎng)絡(luò)共享，使用是單位內(nèi)部之間進(jìn)行信息傳遞成為專門(mén)棘手的問(wèn)題原。系統(tǒng)已不能滿足多個(gè)人員對(duì)數(shù)據(jù)的索??；如副科長(zhǎng)治理計(jì)算機(jī)，則科長(zhǎng)就不能在自己的辦公室中查看資料?？梢?jiàn)當(dāng)前系統(tǒng)已不能適應(yīng)以后治理信息系統(tǒng)進(jìn)展的趨勢(shì)，慢慢的將要被淘汰，一個(gè)新興的治理信息系統(tǒng)是當(dāng)前的迫切需求。2、新系統(tǒng)的目標(biāo)按照治理信息系統(tǒng)的原理和生命周期開(kāi)發(fā)方法，采納成熟的信息技術(shù)和手段，建設(shè)成一個(gè)集通用倉(cāng)庫(kù)治理、產(chǎn)品準(zhǔn)確錄入于一體的高效治理信息系統(tǒng)。該系統(tǒng)能高速、快捷、智能化的治理全過(guò)程，并加強(qiáng)通用倉(cāng)庫(kù)治理中的各種信息資源的治理與應(yīng)用，提高入庫(kù)和出庫(kù)產(chǎn)品查找與查詢的處理速度，進(jìn)而提高企業(yè)的整體治理水平。3系統(tǒng)功能模塊設(shè)計(jì)在系統(tǒng)功能分析的基礎(chǔ)上，考慮VB和Access的特點(diǎn)，設(shè)計(jì)出如下圖所示的系統(tǒng)功能模塊圖。需求模塊還庫(kù)模塊出庫(kù)模塊入庫(kù)模塊日志治理打印設(shè)置關(guān)心模塊報(bào)表模塊查看模塊維護(hù)模塊輸入模塊系統(tǒng)模塊庫(kù)存管理系統(tǒng)需求模塊還庫(kù)模塊出庫(kù)模塊入庫(kù)模塊日志治理打印設(shè)置關(guān)心模塊報(bào)表模塊查看模塊維護(hù)模塊輸入模塊系統(tǒng)模塊庫(kù)存管理系統(tǒng)用戶治理用戶治理系統(tǒng)功能模塊圖（1）系統(tǒng)模塊a、包括報(bào)表的打印及設(shè)置，操作日志的治理。b、治理員能夠通過(guò)治理界面添加或刪除用戶，添加新治理員或刪除原有治理員,驗(yàn)證用戶的合法性，阻止非法用戶登錄。c、治理員或其他用戶能夠修改自己的密碼。(2)入庫(kù)模塊 包括填寫(xiě)入庫(kù)單，更新，刪除入庫(kù)記錄，查看現(xiàn)有庫(kù)存信息，入庫(kù)記錄的查詢及打印(1)出庫(kù)模塊 包括填寫(xiě)出庫(kù)單，更新，刪除出庫(kù)記錄，查看現(xiàn)有庫(kù)存信息，出庫(kù)記錄的查詢及打印(2)還庫(kù)模塊 包括填寫(xiě)還庫(kù)單，更新，刪除還庫(kù)記錄，還庫(kù)記錄的查詢及打印(3)需求模塊 包括填寫(xiě)需求打算表，更新，刪除采購(gòu)打算信息，查看現(xiàn)有采購(gòu)信息，采購(gòu)信息的查詢及打印，以及預(yù)測(cè)短期內(nèi)的需求打算。庫(kù)存治理庫(kù)存治理處理輸出輸入處理輸出輸入采購(gòu)單報(bào)表刪除修改統(tǒng)計(jì)查尋入庫(kù)單出庫(kù)單還庫(kù)單采購(gòu)打算采購(gòu)單報(bào)表刪除修改統(tǒng)計(jì)查尋入庫(kù)單出庫(kù)單還庫(kù)單采購(gòu)打算庫(kù)存治理HIPO圖4、應(yīng)用需求分析倉(cāng)庫(kù)治理可直接查看產(chǎn)品的倉(cāng)庫(kù)情況，假如其它人員想要進(jìn)行查詢和查看時(shí)，必須得由倉(cāng)庫(kù)治理人員提供密碼或者自己明白用戶名和密碼，從而增加了系統(tǒng)的安全性，這些是專門(mén)難得到的，特不是密碼，因此不但滿足了倉(cāng)庫(kù)治理者治理倉(cāng)庫(kù)中產(chǎn)品的相應(yīng)信息起到了作用，而且也使得不的用戶無(wú)法進(jìn)行相應(yīng)的操作，倉(cāng)庫(kù)治理人員輸入的信息量大，數(shù)據(jù)安全性和保密性要求最高。本功能實(shí)現(xiàn)對(duì)產(chǎn)品信息、入庫(kù)信息、出庫(kù)信息等情況治理和統(tǒng)計(jì)。不是倉(cāng)庫(kù)治理人員的話也能夠能通過(guò)掃瞄、查詢、來(lái)查看入庫(kù)和出庫(kù)的差不多信息；（1）依照入庫(kù)和出庫(kù)情況對(duì)數(shù)據(jù)庫(kù)進(jìn)行操作并生成報(bào)表（2）查詢及統(tǒng)計(jì)各種信息（3）維護(hù)倉(cāng)庫(kù)中各個(gè)產(chǎn)品的相關(guān)信息（4）處理信息的完整性5、系統(tǒng)數(shù)據(jù)庫(kù)設(shè)計(jì)在概念設(shè)計(jì)時(shí)期中，設(shè)計(jì)人員從用戶的角度看待數(shù)據(jù)及處理要求和約束，產(chǎn)生一個(gè)反映用戶觀點(diǎn)的概念模式。然后再把概念模式轉(zhuǎn)換成邏輯模式。將概念設(shè)計(jì)從設(shè)計(jì)過(guò)程中獨(dú)立開(kāi)來(lái)，使各時(shí)期的任務(wù)相對(duì)單一化，設(shè)計(jì)復(fù)雜程度大大降低，不受特定DBMS的限制。利用ER方法進(jìn)行數(shù)據(jù)庫(kù)的概念設(shè)計(jì)，可分成三步進(jìn)行：首先設(shè)計(jì)局部ER模式，然后把各局部ER模式綜合成一個(gè)全局模式，最后對(duì)全局ER模式進(jìn)行優(yōu)化，得到最終的模式，即概念模式。第三章．什么緣故要開(kāi)發(fā)一個(gè)通用倉(cāng)庫(kù)治理系統(tǒng)？今天，計(jì)算機(jī)的價(jià)格差不多十分低廉，性能卻有了長(zhǎng)足的進(jìn)步。它差不多被應(yīng)用于許多領(lǐng)域，計(jì)算機(jī)之因此如此流行的緣故要緊有以下幾個(gè)方面：首先，計(jì)算機(jī)能夠代替人工進(jìn)行許多繁雜的勞動(dòng)；其次，計(jì)算機(jī)能夠節(jié)約許多資源；第三，計(jì)算機(jī)能夠大大的提高人們的工作效率；第四，計(jì)算機(jī)能夠使敏感文檔更加安全，等等。1、用計(jì)算機(jī)治理倉(cāng)庫(kù)的意義現(xiàn)在我國(guó)的各個(gè)單位倉(cāng)庫(kù)的治理水平還停留在紙介質(zhì)的基礎(chǔ)上，如此的機(jī)制差不多不能適應(yīng)時(shí)代的進(jìn)展，因?yàn)樗踪M(fèi)了許多人力和物力，在信息時(shí)代這種傳統(tǒng)的治理方法必定被計(jì)算機(jī)為基礎(chǔ)的信息治理所取代。我作為一個(gè)計(jì)算機(jī)應(yīng)用的本科生，希望能夠在這方面有所貢獻(xiàn)。改革的總設(shè)計(jì)師鄧小平同志講過(guò)“科學(xué)技術(shù)是第一生產(chǎn)力”，我希望能用我四年的所學(xué)編制出一個(gè)有用的程序來(lái)關(guān)心各個(gè)單位進(jìn)行更有效的倉(cāng)庫(kù)治理。歸納起來(lái)，好處大約有以下幾點(diǎn)：（1）能夠存儲(chǔ)最新的入庫(kù)和出庫(kù)產(chǎn)品，安全、高效；（2）只需一到二名倉(cāng)庫(kù)治理人員即可操作系統(tǒng)，節(jié)約大量人力；（3）能夠迅速查到所需信息。2、為今后企業(yè)上網(wǎng)做好預(yù)備跟據(jù)1999年中國(guó)電信的調(diào)查報(bào)告顯示我國(guó)的上網(wǎng)人數(shù)已達(dá)到890萬(wàn)，互聯(lián)網(wǎng)差不多十分普及，各個(gè)單位也希望能在世界的任何一個(gè)角落查到自己?jiǎn)挝坏男畔?，本系統(tǒng)為各個(gè)企業(yè)今后的上網(wǎng)作了先期工作，比如數(shù)據(jù)庫(kù)的建立。3、倉(cāng)庫(kù)治理的設(shè)計(jì)分析依照實(shí)際情況，我們使用原型法（RapidPrototyping）即以少量代價(jià)快速地構(gòu)造一個(gè)可執(zhí)行的軟件系統(tǒng)模型。使用戶和開(kāi)發(fā)人員能夠較快地確定需求，然后采納循環(huán)進(jìn)化的開(kāi)發(fā)方式，對(duì)系統(tǒng)模型作連續(xù)的精化，將系統(tǒng)需具備的性質(zhì)逐漸增加上去，直到所有的性質(zhì)全部滿足?，F(xiàn)在模塊也進(jìn)展成為最終產(chǎn)品了。4、數(shù)據(jù)庫(kù)需求分析在認(rèn)真調(diào)查企業(yè)庫(kù)存物資材料治理過(guò)程的基礎(chǔ)上，設(shè)計(jì)出本系統(tǒng)所處理的數(shù)據(jù)流程圖。匯總處理企業(yè)總體生產(chǎn)打算設(shè)備還庫(kù)設(shè)備出庫(kù)設(shè)備入庫(kù)設(shè)備采購(gòu)各部門(mén)需求倉(cāng)庫(kù)現(xiàn)有庫(kù)存匯總處理企業(yè)總體生產(chǎn)打算設(shè)備還庫(kù)設(shè)備出庫(kù)設(shè)備入庫(kù)設(shè)備采購(gòu)各部門(mén)需求倉(cāng)庫(kù)現(xiàn)有庫(kù)存庫(kù)存系統(tǒng)數(shù)據(jù)流程圖第四章如何樣開(kāi)發(fā)一個(gè)通用倉(cāng)庫(kù)治理系統(tǒng)？1、開(kāi)發(fā)工具的選擇現(xiàn)在，市場(chǎng)上能夠選購(gòu)的應(yīng)用開(kāi)發(fā)產(chǎn)品專門(mén)多，流行的也有數(shù)十種。目前在我國(guó)市場(chǎng)上最為流行、使用最多、最為先進(jìn)的可用作企業(yè)級(jí)開(kāi)發(fā)工具的產(chǎn)品有：Microsoft公司的VisualBasic.Microsoft公司的VisualC.Borland公司的Delphi.Powersoft公司的PowerBulider在目前市場(chǎng)上這些眾多的程序開(kāi)發(fā)工具中，有些強(qiáng)調(diào)程語(yǔ)言的彈性與執(zhí)行效率；有些則偏重于可視化程序開(kāi)發(fā)工具所帶來(lái)的便利性與效率的得高，各有各的優(yōu)點(diǎn)和特色，也滿足了不同用戶的需求。然而，語(yǔ)言的彈性和工具的便利性是密不可分的，只有便利的工具，卻沒(méi)有彈性的語(yǔ)言作支持，許多專門(mén)化的處理動(dòng)作必需要耗費(fèi)數(shù)倍的工夫來(lái)處理，使得原來(lái)所標(biāo)榜的效率提高的優(yōu)點(diǎn)失去了作用；相反，假如只強(qiáng)調(diào)程語(yǔ)言的彈性，卻沒(méi)有便利的工具作配合，會(huì)使一些即使特不簡(jiǎn)單的界面處理動(dòng)作，也會(huì)嚴(yán)峻地白費(fèi)程序設(shè)計(jì)師的寶貴時(shí)刻。作為數(shù)據(jù)庫(kù)系統(tǒng)的開(kāi)發(fā)，VisualBasic是一個(gè)特不理想選擇。數(shù)據(jù)庫(kù)是MIS中的重要支持技術(shù)，在MIS開(kāi)發(fā)過(guò)程中，如何選擇數(shù)據(jù)庫(kù)治理是一個(gè)重要的問(wèn)題，目前，數(shù)據(jù)庫(kù)產(chǎn)品較多，每種產(chǎn)品都具有各自的特點(diǎn)和適用范圍，因此，在選擇數(shù)據(jù)庫(kù)時(shí)，應(yīng)考慮數(shù)據(jù)庫(kù)應(yīng)用的特點(diǎn)及適用范圍，本系統(tǒng)選用的數(shù)據(jù)庫(kù)語(yǔ)言VisualBasic語(yǔ)言，該開(kāi)發(fā)工具具有專門(mén)多長(zhǎng)處：VisualBasic是一種可視化的、面對(duì)對(duì)象和條用事件驅(qū)動(dòng)方式的結(jié)構(gòu)化高級(jí)程序設(shè)計(jì)，可用于開(kāi)發(fā)Windows環(huán)境下的種類應(yīng)用程序。它簡(jiǎn)單易學(xué)、效率高，且功能強(qiáng)大，能夠與Windows的專業(yè)開(kāi)發(fā)工具SDK相媲美，而且程序開(kāi)發(fā)人員不必具有C/C++編程基礎(chǔ)。在VisualBasic環(huán)境下，利用事件驅(qū)動(dòng)的編程機(jī)制、新穎易用的可視化設(shè)計(jì)工具，使用Windows內(nèi)部的應(yīng)用程序接口(API)函數(shù)，以及動(dòng)態(tài)鏈接庫(kù)(DLL)、動(dòng)態(tài)數(shù)據(jù)交換(DDE)、對(duì)象的鏈接與嵌入(OLE)、開(kāi)放式數(shù)據(jù)訪問(wèn)(ODBC)等技術(shù)，能夠高效、快速地開(kāi)發(fā)出Windows環(huán)境下功能強(qiáng)大、圖形界面豐富的應(yīng)用軟件系統(tǒng)?？偟膩?lái)講，VisualBasic具有以下特點(diǎn)：◆可視化編程：用傳統(tǒng)程序設(shè)計(jì)語(yǔ)言設(shè)計(jì)程序時(shí)，差不多上通過(guò)編寫(xiě)程序代碼來(lái)設(shè)計(jì)用戶界面，在設(shè)計(jì)過(guò)程中看不到界面的實(shí)際顯示效果，必須編譯后運(yùn)行程序才能觀看。假如對(duì)界面的效果不中意，還要回到程序中修改。有時(shí)候，這種編程-編譯-修改的操作可能要反復(fù)多次，大大阻礙了軟件開(kāi)發(fā)效率。VisualBasic提供了可視化設(shè)計(jì)工具，把Windows界面設(shè)計(jì)的復(fù)雜性“封裝”起來(lái)，開(kāi)發(fā)人員不必為界面設(shè)計(jì)而編寫(xiě)大量程序代碼。只需要按設(shè)計(jì)要求的屏幕布局，用系統(tǒng)提供的工具，在屏幕上畫(huà)出各種“部件”，即圖形對(duì)象，并設(shè)置這些圖形對(duì)象的屬性。VisualBasic自動(dòng)產(chǎn)生界面設(shè)計(jì)代碼，程序設(shè)計(jì)人員只需要編寫(xiě)實(shí)現(xiàn)程序功能的那部分代碼，從而能夠大大提高程序設(shè)計(jì)的效率。◆面向?qū)ο蟮某绦蛟O(shè)計(jì)：4.0版以后的VisualBasic支持面向?qū)ο蟮某绦蛟O(shè)計(jì)，但它與一般的面向?qū)ο蟮某绦蛟O(shè)計(jì)語(yǔ)言(C++)不完全相同。在一般的面向?qū)ο蟪绦蛟O(shè)計(jì)語(yǔ)言中，對(duì)象由程序代碼和數(shù)據(jù)組成，是抽象的概念；而VisualBasic則是應(yīng)用面向?qū)ο蟮某绦蛟O(shè)計(jì)方法(OOP)，把程序和數(shù)據(jù)封裝起來(lái)作為一個(gè)對(duì)象，并為每個(gè)對(duì)象給予應(yīng)有的屬性，使對(duì)象成為實(shí)在的東西。在設(shè)計(jì)對(duì)象時(shí)，不必編寫(xiě)建立和描述每個(gè)對(duì)象的程序代碼，而是用工具畫(huà)在界面上，VisualBasic自動(dòng)生成對(duì)象的程序代碼并封裝起來(lái)。每個(gè)對(duì)象以圖形方式顯示在界面上，差不多上可視的?！艚Y(jié)構(gòu)化程序設(shè)計(jì)語(yǔ)言：VisualBasic是在BASIC語(yǔ)言的基礎(chǔ)上進(jìn)展起來(lái)的，具有高級(jí)程序設(shè)計(jì)語(yǔ)言的語(yǔ)句結(jié)構(gòu)，接近于自然語(yǔ)言和人類的邏輯思維方式。VisualBasic語(yǔ)句簡(jiǎn)單易明白，其編輯器支持彩色代碼，可自動(dòng)進(jìn)行語(yǔ)法錯(cuò)誤檢查，同時(shí)具有功能強(qiáng)大且使用靈活的調(diào)試器和編譯器。VisualBasic是解釋型語(yǔ)言，在輸入代碼的同時(shí)，解釋系統(tǒng)將高級(jí)語(yǔ)言分解翻譯成計(jì)算機(jī)能夠識(shí)不的機(jī)器指令，并推斷每個(gè)語(yǔ)句的語(yǔ)法錯(cuò)誤。在設(shè)計(jì)VisualBasic程序的過(guò)程中，隨時(shí)能夠運(yùn)行程序，而在整個(gè)程序設(shè)計(jì)好之后，能夠編譯生成可執(zhí)行文件(.EXE)，脫離VisualBasic環(huán)境，直接在Windows環(huán)境下運(yùn)行?！羰录?qū)動(dòng)的編程機(jī)制：事件驅(qū)動(dòng)是特不適合圖形用戶界面的編程方式。在圖形用戶界面的應(yīng)用程序中，是由用戶的動(dòng)作即事件掌握著程序運(yùn)行的流向，每個(gè)事件都能驅(qū)動(dòng)一段程序的運(yùn)行。程序員只要編寫(xiě)響應(yīng)用戶動(dòng)作的代碼，而各個(gè)動(dòng)作之間不一定有聯(lián)系。VisualBasic通過(guò)事件來(lái)執(zhí)行對(duì)象的操作。一個(gè)對(duì)象可能會(huì)產(chǎn)生多個(gè)事件，每個(gè)事件都能夠通過(guò)一段程序來(lái)響應(yīng)。例如，命令按鈕是一個(gè)對(duì)象，當(dāng)用戶單擊該按鈕時(shí)，將產(chǎn)生一個(gè)“單擊“(CLICK)事件，而在產(chǎn)生該事件時(shí)將執(zhí)行一段程序，用來(lái)實(shí)現(xiàn)指定的操作。在用VisualBasic設(shè)計(jì)大型應(yīng)用軟件時(shí)，不必建立具有明顯開(kāi)始和結(jié)束的程序，而是編寫(xiě)若干個(gè)微小的子程序，即過(guò)程。這些過(guò)程分不面向不同的對(duì)象，由用戶操作引發(fā)某個(gè)事件來(lái)驅(qū)動(dòng)完成某種特定的功能，或者由事件驅(qū)動(dòng)程序調(diào)用通用過(guò)程來(lái)執(zhí)行指定的操作，如此能夠方便編程人員，提高效率?！籼峁┝艘讓W(xué)易用的應(yīng)用程序集成開(kāi)發(fā)環(huán)境：在VB集成開(kāi)發(fā)環(huán)境中，用戶可設(shè)計(jì)界面、編寫(xiě)代碼、調(diào)試程序，直至把應(yīng)用程序編譯成可執(zhí)行文件在Windows中運(yùn)行，使用戶在友好的開(kāi)發(fā)環(huán)境中工作?！艚Y(jié)構(gòu)化的程序設(shè)計(jì)語(yǔ)言：VB具有豐富的數(shù)據(jù)類型和結(jié)構(gòu)化程序結(jié)構(gòu)，作為一種程序設(shè)計(jì)語(yǔ)言，它還有如下一些特點(diǎn)：強(qiáng)大的數(shù)值和字符串處理功能豐富的圖形指令，可方便地繪制各種圖形提供靜態(tài)和動(dòng)態(tài)數(shù)組，有利于簡(jiǎn)化內(nèi)存的治理過(guò)程可遞歸調(diào)用，使程序更為簡(jiǎn)練支持隨機(jī)文件和順序文件的訪問(wèn)提供了一個(gè)可供應(yīng)用程序調(diào)用的包含多種類型的圖標(biāo)庫(kù)具有完善的運(yùn)行出錯(cuò)處理◆支持多種數(shù)據(jù)庫(kù)系統(tǒng)的訪問(wèn)：VisualBasic具有強(qiáng)大的數(shù)據(jù)庫(kù)治理功能，利用數(shù)據(jù)控件和數(shù)據(jù)庫(kù)治理窗口，能夠直接建立或處理MicrosoftAccess格式的數(shù)據(jù)庫(kù)，并提供了強(qiáng)大的數(shù)據(jù)存儲(chǔ)和檢索功能。同時(shí)，VisualBasic還能直接編輯和訪問(wèn)其他外部數(shù)據(jù)庫(kù)，如dBASE，F(xiàn)oxPro，Paradox等，這些數(shù)據(jù)庫(kù)格式都能夠用VisualBasic編輯和處理。VisualBasic提供開(kāi)放式數(shù)據(jù)連接，即ODBC功能，可通過(guò)直接訪問(wèn)或建立連接的方式使用并操作后臺(tái)大型網(wǎng)絡(luò)數(shù)據(jù)庫(kù)，如SQLServer，Oracle等。在應(yīng)用程序中，能夠使用結(jié)構(gòu)化查詢語(yǔ)言SQL數(shù)據(jù)標(biāo)準(zhǔn)，直接訪問(wèn)服務(wù)器上的數(shù)據(jù)庫(kù)，并提供了簡(jiǎn)單的面向?qū)ο蟮膸?kù)操作指令和多用戶數(shù)據(jù)庫(kù)訪問(wèn)的加鎖機(jī)制和網(wǎng)絡(luò)數(shù)據(jù)庫(kù)的SQL的編程技術(shù)，為單機(jī)上運(yùn)行的數(shù)據(jù)庫(kù)提供了SQL網(wǎng)絡(luò)接口，以便在分布式環(huán)境中快速而有效地實(shí)現(xiàn)客戶/服務(wù)器(client/server)方案?！糁С謩?dòng)態(tài)數(shù)據(jù)交換（DDE）、動(dòng)態(tài)鏈接庫(kù)（DLL）和對(duì)象的鏈接與嵌入（OLE）技術(shù)：（1）動(dòng)態(tài)數(shù)據(jù)交換(DDE)利用動(dòng)態(tài)數(shù)據(jù)交換(DynamicDataExchange)技術(shù)，能夠把一種應(yīng)用程序中的數(shù)據(jù)動(dòng)態(tài)地鏈接到另一種應(yīng)用程序中，使兩種完全不同的應(yīng)用程序建立起一條動(dòng)態(tài)數(shù)據(jù)鏈路。當(dāng)原始數(shù)據(jù)變化時(shí)，能夠自動(dòng)更新鏈接的數(shù)據(jù)。VisualBasic提供了動(dòng)態(tài)數(shù)據(jù)交換的編程技術(shù)，能夠在應(yīng)用程序中與其他Windows應(yīng)用程序建立動(dòng)態(tài)數(shù)據(jù)交換，在不同的應(yīng)用程序之間進(jìn)行通信。（2）對(duì)象的鏈接與嵌入(OLE)對(duì)象的鏈接與嵌入(OLE)將每個(gè)應(yīng)用程序都看做是一個(gè)對(duì)象(object)，將不同的對(duì)象鏈接(link)起來(lái)，再嵌入(embed)某個(gè)應(yīng)用程序中，從而能夠得到具有聲音、影像、圖像、動(dòng)畫(huà)、文字等各種信息的集合式的文件。OLE技術(shù)是Microsoft公司對(duì)象技術(shù)的戰(zhàn)略，它把多個(gè)應(yīng)用程序合為一體，將每個(gè)應(yīng)用程序看做是一個(gè)對(duì)象進(jìn)行鏈接和嵌入，是一種應(yīng)用程序一體化的技術(shù)。利用OLE技術(shù)，能夠方便地建立復(fù)合式文檔(compounddocument)，這種文檔由來(lái)自多個(gè)不同應(yīng)用程序的對(duì)象組成，文檔中的每個(gè)對(duì)象都與原來(lái)的應(yīng)用程序相聯(lián)系，并可執(zhí)行與原來(lái)應(yīng)用程序完全相同的操作。（3）動(dòng)態(tài)鏈接庫(kù)(DLL)VisualBasic是一種高級(jí)程序設(shè)計(jì)語(yǔ)言，不具備低級(jí)語(yǔ)言的功能，對(duì)訪問(wèn)機(jī)器硬件的操作不太容易實(shí)現(xiàn)。但它能夠通過(guò)動(dòng)態(tài)鏈接庫(kù)技術(shù)將C/C++或匯編語(yǔ)言編寫(xiě)的程序加入到VisualBasic應(yīng)用程序中，能夠像調(diào)用內(nèi)部函數(shù)一樣調(diào)用其他語(yǔ)言編寫(xiě)的函數(shù)。此外，通過(guò)動(dòng)態(tài)鏈接庫(kù)，還能夠調(diào)用Windows應(yīng)用程序接口(API)函數(shù)，實(shí)現(xiàn)SDK所具有的功能?！敉陚涞腍ELP聯(lián)機(jī)關(guān)心功能：與Windows環(huán)境下的軟件一樣，在VB中，利用關(guān)心菜單和F1功能鍵，用戶能夠隨時(shí)方便地得到所需要的關(guān)心信息。VB關(guān)心窗口中顯示了有關(guān)的示例代碼，通過(guò)復(fù)制、粘貼操作可獵取大量的示例代碼，為用戶的學(xué)習(xí)和使用提供了極大的方便。VB程序設(shè)計(jì)的概念確實(shí)是面向?qū)ο蟮母拍?，?duì)象確實(shí)是數(shù)據(jù)（DATA）和代碼（CODE）互相結(jié)合的綜合體。Windows上面的每一個(gè)圖標(biāo)，包括窗口本身差不多上對(duì)象，假如沒(méi)有任何情況發(fā)生，對(duì)象處于停頓狀態(tài)。當(dāng)存在外來(lái)事件時(shí)，程序段執(zhí)行，它的執(zhí)行是由外來(lái)事件決定的。因此是“事件”驅(qū)動(dòng)的。編寫(xiě)VB程序較為簡(jiǎn)單，首先將各個(gè)對(duì)象放在空白窗體上，然后將程序代碼分不添加給對(duì)象或圖標(biāo)，將它們組合起來(lái)就能夠隨意運(yùn)行了。在VB中，窗體實(shí)際上是一個(gè)對(duì)象，VB的窗體含有許多內(nèi)嵌特性，這使得用戶界面部分的建立像是從一個(gè)目錄中選擇一個(gè)個(gè)合適的控件，而不是從零開(kāi)始一步一步地建立控件。這種開(kāi)發(fā)者能親眼看到的程序設(shè)計(jì)過(guò)程確實(shí)是“可視化程序設(shè)計(jì)”（VisualProgramming）VB中的差不多概念：對(duì)象：面向?qū)ο缶幊蹋∣OP）的提法大伙兒一定也專門(mén)耳熟，盡管VisualBasic并不是完全的面向?qū)ο缶幊?，但也利用了?duì)象編程技術(shù)。對(duì)象簡(jiǎn)單地講確實(shí)是大伙兒經(jīng)?？吹降母鞣N窗口、按鈕、文本框甚至打印機(jī)等。

屬性：如同電視有黑白、彩色之分一樣，作為對(duì)象的Windows中的窗口也是有大有小，文本框的位置不可能完全一樣，菜單要顯示出不同的功能，這些差不多上由對(duì)象的屬性決定的。不同對(duì)象的屬性可能不同。屬性一般決定了對(duì)象的位置、大小、顯示等情況。

方法：確實(shí)是對(duì)象能夠做的事，如打印機(jī)對(duì)象就有打?。≒rint）方法、窗口對(duì)象支持隱藏（Hide）方法、專門(mén)多對(duì)象支持移動(dòng)（Move）方法等。

事件：確實(shí)是對(duì)象對(duì)用戶各種操作的反映情況。如用戶用鼠標(biāo)按一下按鈕，就會(huì)觸發(fā)按鈕的“按”（Click）事件。

控件：控件確實(shí)是VisualBasic提供的編程用的模塊，與對(duì)象有直接的聯(lián)系，如同積木的木塊，使用如此的控件，就能夠像拼圖或堆積木一樣“搭”、“拼”你的程序界面。VisualBasic中使用控件，簡(jiǎn)化了Windows中的窗口、按鈕等對(duì)象的編程設(shè)計(jì)。每個(gè)控件都有各自的屬性、事件及方法。只需修改這些特征你就能夠?yàn)樗麨榈鼐幊塘?。最重要的是，你能夠利用成千上萬(wàn)的各種擴(kuò)充的控件來(lái)快速構(gòu)造幾乎能滿足你任何要求的程序。例如，假如你不中意Windows簡(jiǎn)陋的媒體播放器，你就能夠使用VB的多媒體控件在1小時(shí)以內(nèi)設(shè)計(jì)一個(gè)完全自己風(fēng)格的能夠播放CD、VCD的多媒體播放器，而功能完全與之相當(dāng)。2、Access2000數(shù)據(jù)庫(kù)簡(jiǎn)介：作為Microsoft的office套件產(chǎn)品之一,access差不多成為世界上最流行的桌面數(shù)據(jù)庫(kù)系統(tǒng)。Access與許多優(yōu)秀的關(guān)系數(shù)據(jù)庫(kù)一樣，能夠讓你專門(mén)容易地連接相關(guān)的信息而且還對(duì)其他的數(shù)據(jù)庫(kù)系統(tǒng)有所補(bǔ)充。它能操作其它來(lái)源的資料，包括許多流行的PC數(shù)據(jù)庫(kù)程序（如dBASE，Paradox，MicrosoftFoxPro）和服務(wù)器、小型機(jī)及大型機(jī)上的許多SQL數(shù)據(jù)庫(kù)。Access還完全支持Microsoft的OLE技術(shù)。Access還提供windows操作系統(tǒng)的高級(jí)應(yīng)用程序開(kāi)發(fā)系統(tǒng)。Access與其它數(shù)據(jù)庫(kù)開(kāi)發(fā)系統(tǒng)之間相當(dāng)顯著的區(qū)不確實(shí)是：您不用寫(xiě)一行代碼，就能夠在專門(mén)短的時(shí)刻里開(kāi)發(fā)出一個(gè)功能強(qiáng)大而且相當(dāng)專業(yè)的數(shù)據(jù)庫(kù)應(yīng)用程序，同時(shí)這一愉快的過(guò)程是完全可視的！假如您能給它加上簡(jiǎn)短的VBA代碼，那么您的程序決不比專業(yè)程序員潛心開(kāi)發(fā)的程序差。Access的總體結(jié)構(gòu)：Access將所有有名字的東西都成為對(duì)象（object），在Access2000中，最重要的對(duì)象有表，查詢，窗體，報(bào)表，宏和模塊。表用戶定義的存儲(chǔ)資料的對(duì)象。每一個(gè)表都包含有關(guān)某個(gè)主體的信息。表包括存儲(chǔ)不同種類資料的字段（列），而記錄（行）則收集特定主體實(shí)例的所有信息。查詢?yōu)閬?lái)自一個(gè)或多個(gè)表的資料提供定制視圖的對(duì)象。在Access中，能夠利用圖形化的實(shí)例查詢機(jī)制（QBE）或通過(guò)SQL語(yǔ)句來(lái)建立查詢。你能夠在查詢中選擇、更新、插入或刪除資料，也能夠用查詢來(lái)建立新表。窗體窗體是要緊的人機(jī)接口。大量的操作（幾乎所有）都要通過(guò)窗體完成。窗體通過(guò)運(yùn)行宏（macro）或VisualBasicforApplicatinns（VBA）過(guò)程，來(lái)響應(yīng)大量的事件。Access2000為我們提供了強(qiáng)大的（同時(shí)也是相當(dāng)方便的向?qū)В﹣?lái)建立標(biāo)準(zhǔn)的Windows窗體。報(bào)表為格式化、計(jì)算、打印選定資料而設(shè)計(jì)的對(duì)象。它是衡量一個(gè)優(yōu)秀的數(shù)據(jù)庫(kù)的重要標(biāo)準(zhǔn)（有時(shí)甚至是唯一的標(biāo)準(zhǔn)）。宏為了響應(yīng)已定義的事件，需要讓Access去執(zhí)行一個(gè)或多個(gè)操作，而宏確實(shí)是對(duì)這些操作的結(jié)構(gòu)化的定義對(duì)象。它能夠讓你像堆積木一樣建立一個(gè)功能強(qiáng)大的程序，而無(wú)須寫(xiě)大量的代碼。模塊包括用VBA編碼的定制過(guò)程的一個(gè)對(duì)象。模塊提供了獨(dú)立的動(dòng)作流以捕獲錯(cuò)誤，而宏做不到。模塊能直接響應(yīng)窗體或報(bào)表事件，也能夠從應(yīng)用程序的任何地點(diǎn)被調(diào)用。■數(shù)據(jù)庫(kù)的概念數(shù)據(jù)庫(kù)是一種存儲(chǔ)數(shù)據(jù)并對(duì)數(shù)據(jù)進(jìn)行操作的工具。數(shù)據(jù)庫(kù)的作用在于組織和表達(dá)信息，簡(jiǎn)而言之，數(shù)據(jù)庫(kù)確實(shí)是信息的集合。計(jì)算機(jī)的數(shù)據(jù)庫(kù)能夠分為兩類：非關(guān)系數(shù)據(jù)庫(kù)（flat-file）和關(guān)系數(shù)據(jù)庫(kù)（relational）。關(guān)系數(shù)據(jù)庫(kù)中包含了多個(gè)數(shù)據(jù)表的信息，數(shù)據(jù)庫(kù)含有各個(gè)不同部分的術(shù)語(yǔ)，象記錄、域等?！鲂陆ㄒ粋€(gè)數(shù)據(jù)庫(kù)創(chuàng)建任何一個(gè)數(shù)據(jù)庫(kù)的第一步是認(rèn)確實(shí)規(guī)劃數(shù)據(jù)庫(kù)，設(shè)計(jì)必須是靈活的、有邏輯的。創(chuàng)建一個(gè)數(shù)據(jù)庫(kù)結(jié)構(gòu)的過(guò)程被認(rèn)為是數(shù)據(jù)模型設(shè)計(jì)。（1）標(biāo)識(shí)需要的數(shù)據(jù)；（2）收集被標(biāo)識(shí)的字段到表中；（3）標(biāo)識(shí)主關(guān)鍵字字段；（4）繪制一個(gè)簡(jiǎn)單的數(shù)據(jù)圖表；（5）規(guī)范數(shù)據(jù)；（6）標(biāo)識(shí)指定字段的信息；（7）創(chuàng)建物理表?！鲂薷囊呀ǖ臄?shù)據(jù)庫(kù)數(shù)據(jù)庫(kù)的修改分為：添加、編輯和刪除記錄。這三種操作均可由VisualBasic創(chuàng)建的程序來(lái)完成，下面的章節(jié)將詳細(xì)描述實(shí)現(xiàn)的具體方法。■實(shí)現(xiàn)數(shù)據(jù)庫(kù)之間的聯(lián)系數(shù)據(jù)庫(kù)之間的關(guān)系指明兩個(gè)庫(kù)之間共享一個(gè)共同的關(guān)鍵字值。一個(gè)連接是指一種虛擬的表，這種表是在當(dāng)用戶要求從相互關(guān)聯(lián)的各個(gè)不同的表中獵取信息時(shí)建立的，關(guān)鍵字段用于在相互連接的不同表中查找匹配的記錄。一個(gè)更高級(jí)的連接形式稱為自連接。這種連接是指一個(gè)表被連接到它自己的一個(gè)字段，或在不同的紀(jì)錄中由重復(fù)數(shù)據(jù)的組合字段。數(shù)據(jù)庫(kù)中有三種不同類型的關(guān)鍵字：主關(guān)鍵字、組合關(guān)鍵字和外關(guān)鍵字。在表中使用的關(guān)鍵字類型用于描述庫(kù)表示什么以及在數(shù)據(jù)庫(kù)中如何與其它的庫(kù)建立關(guān)系。3、二者的結(jié)合（DBA）微軟的JET數(shù)據(jù)庫(kù)引擎提供了與數(shù)據(jù)庫(kù)打交道的途徑，我們是通過(guò)它以及VisualBasic來(lái)訪問(wèn)數(shù)據(jù)庫(kù)并對(duì)其進(jìn)行各種操作。VisualBasic、Access以及其他微軟的軟件產(chǎn)品差不多上通過(guò)共用JET數(shù)據(jù)庫(kù)引擎，從而給用戶提供了豐富的數(shù)據(jù)類型。DATA控件在數(shù)據(jù)庫(kù)中的信息與將信息顯示給用戶看的VisualBasic程序之間架起了一座橋梁。我們能夠設(shè)置DATA控件的各個(gè)屬性，告訴它要調(diào)用那個(gè)數(shù)據(jù)庫(kù)的哪個(gè)部分。缺省情況下，DATA控件依照數(shù)據(jù)庫(kù)中的一個(gè)或多個(gè)數(shù)據(jù)表建立一個(gè)dynaset-type（動(dòng)態(tài)集合）類型的記錄集合。一個(gè)記錄集合是動(dòng)態(tài)的也就意味著，當(dāng)原來(lái)的數(shù)據(jù)表中的容改變了以后，該記錄集合中的記錄也會(huì)隨之改變。DATA控件還提供了用來(lái)掃瞄不同記錄的各種跳轉(zhuǎn)按鈕。將DATA控件放置在窗體中之后，我們還必須在該控件與要處理的數(shù)據(jù)庫(kù)之間建立聯(lián)系A(chǔ)ccess2000數(shù)據(jù)庫(kù) 本系統(tǒng)中VB與AccessAccess2000數(shù)據(jù)庫(kù)VB應(yīng)用程序VB應(yīng)用程序第五章

系統(tǒng)總體規(guī)劃系統(tǒng)功能（1）基礎(chǔ)資料設(shè)置；（2）單據(jù)處理；（3）統(tǒng)計(jì)查詢；（4）系統(tǒng)維護(hù)；（5）報(bào)表輸出；（6）退出系統(tǒng)。第六章系統(tǒng)設(shè)計(jì)各功能模塊結(jié)構(gòu)與實(shí)現(xiàn)系統(tǒng)要緊界面的實(shí)現(xiàn)1、系統(tǒng)治理模塊實(shí)現(xiàn) 系統(tǒng)治理菜單 修改用戶密碼程序PrivateSubCommand1_Click()Adodc1.RecordSource=frmLogin.Adodc1.RecordSourceAdodc1.RefreshSetText4.DataSource=Adodc1Text4.DataField="密碼"IfText1=""ThenMsgBox"請(qǐng)輸入原密碼！",,"修改密碼"ExitSubElseIfText1.Text<>Adodc1.Recordset.Fields("密碼")ThenMsgBox"原密碼錯(cuò)誤！",,"修改密碼"ExitSubElseIfText2=""OrText3=""ThenMsgBox"請(qǐng)輸入新密碼??！",,"修改密碼"ExitSubElseIfText2<>Text3ThenMsgBox"密碼不一致??！",,"修改密碼"ExitSubElseText4.Text=Text2.TextAdodc1.Recordset.MoveFirstMsgBox"密碼修改成功?。?,,"修改密碼"UnloadMeEndIfEndSub2、用戶治理界面（程序略）3、入庫(kù)模塊的實(shí)現(xiàn) PrivateSubCommand1_Click()設(shè)備入庫(kù)程序DimI,JAsIntegerDimSTRAsStringIfText1.Text=""OrText2=""OrCombo1.Text=""OrText4=""OrText5=""OrText6=""OrText7=""ThenMsgBox"請(qǐng)輸入完整信息！"ExitSubElse將記錄存入入庫(kù)記錄表設(shè)備入庫(kù)表.datPrimaryRS.Recordset.Fields("設(shè)備號(hào)")=Text1.Text設(shè)備入庫(kù)表.datPrimaryRS.Recordset.Fields("入庫(kù)數(shù)量")=Text2.Text設(shè)備入庫(kù)表.datPrimaryRS.Recordset.Fields("入庫(kù)時(shí)刻")=Combo1.Text設(shè)備入庫(kù)表.datPrimaryRS.Recordset.Fields("供應(yīng)商")=Text4.Text設(shè)備入庫(kù)表.datPrimaryRS.Recordset.Fields("供應(yīng)商電話")=Text5.Text設(shè)備入庫(kù)表.datPrimaryRS.Recordset.Fields("價(jià)格")=Text6.Text設(shè)備入庫(kù)表.datPrimaryRS.Recordset.Fields("采購(gòu)員")=Text7.TextMsgBox"差不多成功入庫(kù)！"EndIf設(shè)備入庫(kù)表.Adodc1.RecordSource="select*from現(xiàn)有庫(kù)存表where設(shè)備號(hào)='"&Text1.Text&"'"設(shè)備入庫(kù)表.Adodc1.Refresh設(shè)備入庫(kù)表.DataGrid1.RefreshIf設(shè)備入庫(kù)表.Adodc1.Recordset.RecordCount>0Then 將記錄加入現(xiàn)有庫(kù)存表中設(shè)備入庫(kù)表.Text9.Text=CInt(設(shè)備入庫(kù)表.Text9.Text)+CInt(Text2.Text)設(shè)備入庫(kù)表.Text9.RefreshJ=設(shè)備入庫(kù)表.Text9設(shè)備入庫(kù)表.Adodc1.Recordset.MoveFirst設(shè)備入庫(kù)表.Adodc1.Recordset.Fields.Refresh設(shè)備入庫(kù)表.DataGrid1.RefreshMsgBox"現(xiàn)有庫(kù)存量為："&JElseSTR="現(xiàn)有庫(kù)存表中無(wú)此設(shè)備！"&vbCrLf&"請(qǐng)?jiān)谠O(shè)備代碼表和現(xiàn)有庫(kù)存表中手動(dòng)添加記錄??！"MsgBoxSTRLoadfrm現(xiàn)有庫(kù)存表frm現(xiàn)有庫(kù)存表.ShowCallfrm現(xiàn)有庫(kù)存表.Command1_ClickFrmAddNewEqu.Text1.Text=frmInput.Text1.TextFrmAddNewEqu.Text2.Text=frmInput.Text2.TextLoadfrm設(shè)備代碼表frm設(shè)備代碼表.ShowEndIfEndSubPrivateSubcmdDelete_Click()刪除入庫(kù)表中記錄OnErrorGoToDeleteErrDimYesNoAsStringYesNo=MsgBox("刪除",vbYesNo,"刪除記錄")IfYesNo=vbYesThenWithdatPrimaryRS.Recordset.Delete.MoveNextIf.EOFThen.MoveLastEndWithElseExitSubEndIfDeleteErr:MsgBoxErr.DescriptionEndSubPrivateSubcmdUpdate_Click()更新紀(jì)錄程序OnErrorGoToUpdateErrdatPrimaryRS.Recordset.UpdateBatchadAffectAllExitSubUpdateErr:MsgBoxErr.DescriptionEndSub4、 出庫(kù)模塊實(shí)現(xiàn)PrivateSubCommand1_Click()設(shè)備出庫(kù)程序Dimi,J,kAsIntegerDimSTRAsStringfrm設(shè)備出庫(kù)表.Adodc1.RecordSource="select*from現(xiàn)有庫(kù)存表where設(shè)備號(hào)='"&Text1.Text&"'"frm設(shè)備出庫(kù)表.Adodc1.Refreshfrm設(shè)備出庫(kù)表.DataGrid1.RefreshIfIsNumeric(Text2)=FalseThenMsgBox"數(shù)量必須是數(shù)字！"ExitSubEndIfIfText1.Text=""OrText2=""OrCombo1.Text=""OrText4=""OrText5=""OrText6=""OrText7=""ThenMsgBox"請(qǐng)輸入完整信息！"ExitSubElseIffrm設(shè)備出庫(kù)表.Adodc1.Recordset.RecordCount<=0ThenSTR="現(xiàn)有庫(kù)存表中無(wú)此設(shè)備！請(qǐng)檢查輸入是否正確??！"MsgBoxSTRExitSubElsefrm設(shè)備出庫(kù)表.datPrimaryRS.Recordset.Fields("設(shè)備號(hào)")=Text1.Textfrm設(shè)備出庫(kù)表.datPrimaryRS.Recordset.Fields("出庫(kù)數(shù)量")=Text2.Textfrm設(shè)備出庫(kù)表.datPrimaryRS.Recordset.Fields("出庫(kù)時(shí)刻")=Combo1.Textfrm設(shè)備出庫(kù)表.datPrimaryRS.Recordset.Fields("經(jīng)手人")=Text4.Textfrm設(shè)備出庫(kù)表.datPrimaryRS.Recordset.Fields("領(lǐng)取人")=Text5.Textfrm設(shè)備出庫(kù)表.datPrimaryRS.Recordset.Fields("使用部門(mén)")=Text6.Textfrm設(shè)備出庫(kù)表.datPrimaryRS.Recordset.Fields("用途")=Text7.TextMsgBox"差不多成功存入設(shè)備出庫(kù)表庫(kù)！"EndIfIffrm設(shè)備出庫(kù)表.Adodc1.Recordset.RecordCount>0Thenk=CInt(frm設(shè)備出庫(kù)表.Text9.Text)-CInt(Text2.Text)Ifk>=0Thenfrm設(shè)備出庫(kù)表.Text9.Text=CInt(frm設(shè)備出庫(kù)表.Text9.Text)-CInt(Text2.Text)frm設(shè)備出庫(kù)表.Text9.RefreshJ=frm設(shè)備出庫(kù)表.Text9frm設(shè)備出庫(kù)表.Adodc1.Recordset.MoveFirstfrm設(shè)備出庫(kù)表.Adodc1.Recordset.Fields.Refreshfrm設(shè)備出庫(kù)表.DataGrid1.RefreshMsgBox"現(xiàn)有庫(kù)存量為："&JElseMsgBox"現(xiàn)有庫(kù)存量不足！請(qǐng)輸入合適數(shù)量??！"ExitSubEndIfElseSTR="現(xiàn)有庫(kù)存表中無(wú)此設(shè)備！請(qǐng)檢查輸入是否正確??！"MsgBoxSTREndIfEndSubPrivateSubcmdDelete_Click()刪除出庫(kù)記錄OnErrorGoToDeleteErrDimYesNoAsStringYesNo=MsgBox("刪除",vbYesNo,"刪除記錄")IfYesNo=vbYesThenWithdatPrimaryRS.Recordset.Delete.MoveNextIf.EOFThen.MoveLastEndWithElseExitSubEndIfDeleteErr:MsgBoxErr.DescriptionEndSub更新記錄程序同入庫(kù)的更新程序相同，在此略5、設(shè)備采購(gòu)模塊實(shí)現(xiàn)，程序略6、現(xiàn)有模塊實(shí)現(xiàn)，程序略7、設(shè)備代碼模塊實(shí)現(xiàn)要緊程序PrivateSubcmdAdd_Click()添加設(shè)備OnErrorGoToAddErrdatPrimaryRS.Recordset.AddNewExitSubAddErr:MsgBoxErr.DescriptionEndSub8、庫(kù)存報(bào)警模塊實(shí)現(xiàn)要緊程序PrivateSubCommand1_Click()顯示高于最大警戒庫(kù)存的設(shè)備datPrimaryRS.RecordSource="select*from現(xiàn)有庫(kù)存表where現(xiàn)有庫(kù)存>最大庫(kù)存"datPrimaryRS.RefreshgrdDataGrid.RefreshIfdatPrimaryRS.Recordset.RecordCount>0ThenBeepMsgBox"表中設(shè)備已過(guò)量！"ElseMsgBox"沒(méi)有設(shè)備庫(kù)存過(guò)量！"EndIfEndSubPrivateSubCommand2_Click()顯示低于于最小警戒庫(kù)存的設(shè)備datPrimaryRS.RecordSource="select*from現(xiàn)有庫(kù)存表where現(xiàn)有庫(kù)存<最小庫(kù)存"datPrimaryRS.RefreshgrdDataGrid.RefreshIfdatPrimaryRS.Recordset.RecordCount>0ThenBeepMsgBox"表中設(shè)備庫(kù)存量已過(guò)警戒線！請(qǐng)采購(gòu)??！"ElseMsgBox"沒(méi)有設(shè)備庫(kù)存量過(guò)少！" EndIf EndsubPrivateSubTimer1_Timer()自動(dòng)報(bào)警程序frmAlarm.da