1、論文提綱論文題目庫(kù)存管理系統(tǒng)摘要4第一章 緒論41.1 管理信息系統(tǒng)的概述41.2 庫(kù)存管理系統(tǒng)5第二章 數(shù)據(jù)庫(kù)理論基礎(chǔ)6 2.1 數(shù)據(jù)庫(kù)系統(tǒng)設(shè)計(jì)6第三章 應(yīng)用系統(tǒng)開(kāi)發(fā)工具73.1 visual basic簡(jiǎn)介及實(shí)現(xiàn)原理7第四章 庫(kù)存管理系統(tǒng)設(shè)計(jì)分析7 4.1 需求分析7 4.2 模塊劃分8 4.3 數(shù)據(jù)庫(kù)設(shè)計(jì)11第五章 應(yīng)用程序設(shè)計(jì)135.1 程序結(jié)構(gòu)135.2 程序源代碼13第六章 全文總結(jié)27第七章 致謝27參考文獻(xiàn)27主要參考書(shū)目或資料來(lái)源1 漢清計(jì)算機(jī)工作室, visual basic 6.0 數(shù)據(jù)庫(kù)開(kāi)發(fā)實(shí)例 ,機(jī)械工業(yè)出版社 2000.32 何旭洪,visual basic 數(shù)據(jù)庫(kù)

2、開(kāi)發(fā)實(shí)例導(dǎo)航,人民郵電出版社 20023 孫健鵬,vb數(shù)據(jù)庫(kù)開(kāi)發(fā)實(shí)例解析,機(jī)械工業(yè)出版社4 王漢新,visual basic程序設(shè)計(jì),科學(xué)出版社 20025 陳惟斌,visual basic 6.0開(kāi)發(fā)指南,清華大學(xué)出版社 2001.16 張春葆,vb數(shù)據(jù)庫(kù)系統(tǒng)設(shè)計(jì)與開(kāi)發(fā),清華大學(xué)出版社7 buczek,access 2002數(shù)據(jù)庫(kù)開(kāi)發(fā)即時(shí)應(yīng)用,人民郵電出版社 20028 visual basic 6 harry m. deitel, paul j. deitel, tem r. nieto 電子工業(yè)出版社9 李曉黎,張巍,visual basic + sql server 數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)開(kāi)發(fā)

3、與實(shí)例,人民郵電出版社 2003.810瀟湘工作室 access2002中文版從入門(mén)到精通 人民郵電出版社 2001.10摘要：隨著現(xiàn)代工業(yè)的發(fā)展，計(jì)算機(jī)信息管理系統(tǒng)越來(lái)越受到企業(yè)重視。本文主要分析了庫(kù)存管理系統(tǒng)的一些基本功能和組成情況，包括系統(tǒng)的需求分析、系統(tǒng)結(jié)構(gòu)，功能模塊劃分以及數(shù)據(jù)庫(kù)模式分析等，重點(diǎn)對(duì)應(yīng)用程序的實(shí)際開(kāi)發(fā)實(shí)現(xiàn)作了介紹。達(dá)到了數(shù)據(jù)的一致性和安全性，且應(yīng)用程序功能完備，符合了庫(kù)存管理系統(tǒng)作為典型的信息管理系統(tǒng)(mis)的要求。同時(shí)簡(jiǎn)單介紹了visual basic編程環(huán)境和access數(shù)據(jù)庫(kù)管理系統(tǒng)的功能特點(diǎn)，庫(kù)存管理系統(tǒng)是企業(yè)物流管理中不可或缺的一部分。關(guān)鍵詞：庫(kù)存管理，數(shù)據(jù)

4、庫(kù)，信息管理，vb第一章 緒論庫(kù)存管理系統(tǒng)是一個(gè)企事業(yè)單位不可缺少的一部分,它的內(nèi)容對(duì)于企業(yè)的決策者和管理者來(lái)說(shuō)都是至關(guān)重要的，因此，庫(kù)存管理系統(tǒng)應(yīng)該能夠?yàn)橛脩?hù)提供充足的信息和快捷的查詢(xún)手段，但一直以來(lái)人們使用傳統(tǒng)的人工方式管理庫(kù)存，這種管理方式存在著許多缺點(diǎn)，諸如效率低，保密性差等，而且時(shí)間一長(zhǎng)，將產(chǎn)生大量的文件和數(shù)據(jù)，這對(duì)于查找、更新和維護(hù)都帶來(lái)了不少的困難。隨著科學(xué)技術(shù)的不斷提高，計(jì)算機(jī)科學(xué)不斷發(fā)展，其強(qiáng)大的功能已經(jīng)被人們深刻認(rèn)識(shí)，它已經(jīng)進(jìn)入了人類(lèi)社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來(lái)越重要的作用。作為計(jì)算機(jī)應(yīng)用的一部分，使用計(jì)算機(jī)對(duì)產(chǎn)品庫(kù)存信息進(jìn)行管理，具有著人工管理無(wú)法比擬的優(yōu)點(diǎn)，它檢索迅速、查

5、找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長(zhǎng)、成本低等，可減少更多的人力物力，這些都能夠極大地提高貨品庫(kù)存的管理效率，也是企業(yè)庫(kù)存管理科學(xué)化、正規(guī)化，與世界接軌的重要條件。因此，開(kāi)發(fā)一個(gè)庫(kù)存管理系統(tǒng)是很有必要的，具有其特有的技術(shù)意義和管理意義。1.1管理信息系統(tǒng)的概述管理信息系統(tǒng)（簡(jiǎn)稱(chēng)mis）是在管理科學(xué)、系統(tǒng)科學(xué)、計(jì)算機(jī)科學(xué)等的基礎(chǔ)上發(fā)展起來(lái)的綜合性邊緣科學(xué)。在21世紀(jì)信息高速發(fā)展的時(shí)代中，管理信息系統(tǒng)具有很重要的作用，它的預(yù)測(cè)和輔助決策的功能，即利用現(xiàn)代管理的決策和支持。管理信息系統(tǒng)是一個(gè)由人、機(jī)（計(jì)算機(jī)）組成的能進(jìn)行管理信息的收集、傳遞、存儲(chǔ)、加工、維護(hù)和使用的系統(tǒng)。它能觀(guān)測(cè)企業(yè)或組織的

6、各種運(yùn)動(dòng)情況，利用過(guò)去的數(shù)據(jù)預(yù)測(cè)未來(lái)；從全局出發(fā)輔助決策；利用信息控制企業(yè)或組織行為，幫助其實(shí)現(xiàn)長(zhǎng)遠(yuǎn)的規(guī)劃目標(biāo)。簡(jiǎn)言之，管理信息系統(tǒng)是一個(gè)以計(jì)算機(jī)為工具，具有數(shù)據(jù)處理、預(yù)測(cè)、控制和輔助決策功能的信息系統(tǒng)。管理信息系統(tǒng)是一個(gè)人機(jī)系統(tǒng)，同時(shí)它又是一個(gè)一體化集成系統(tǒng)。管理信息系統(tǒng)是信息系統(tǒng)的一個(gè)子系統(tǒng)，它以計(jì)算機(jī)技術(shù)、通訊技術(shù)和軟件技術(shù)為技術(shù)基礎(chǔ)，同時(shí)將現(xiàn)代管理理論、現(xiàn)代管理方法及各級(jí)管理人員融為一體，最終為某個(gè)組織整體的管理與決策服務(wù)，是由人和計(jì)算機(jī)組成的能進(jìn)行管理信息的收集、傳遞、存儲(chǔ)、加工、維護(hù)和使用的系統(tǒng)。管理信息系統(tǒng)的基本結(jié)構(gòu)可以概括為四大部件，即信息源、信息處理器、信息用戶(hù)和信息管理者。

7、因此，一個(gè)成功的管理信息系統(tǒng)應(yīng)該具有可靠的硬件、實(shí)用的軟件、強(qiáng)有力的現(xiàn)代化管理水平。具體講，管理信息系統(tǒng)的三大支柱是：計(jì)算機(jī)網(wǎng)絡(luò)、數(shù)據(jù)庫(kù)和現(xiàn)代化的管理，這三打支柱稱(chēng)為管理信息系統(tǒng)的擴(kuò)展部件。1.2庫(kù)存管理系統(tǒng)當(dāng)今時(shí)代是飛速發(fā)展的信息時(shí)代，在各行各業(yè)中離不開(kāi)信息處理，這正是計(jì)算機(jī)被廣泛應(yīng)用于信息處理系統(tǒng)的環(huán)境。計(jì)算機(jī)最大的好處在于利用它能夠進(jìn)行信息管理，使用計(jì)算機(jī)進(jìn)行信息控制，不僅提高了工作效率，而且大大的提高了其安全性。尤其對(duì)復(fù)雜的信息管理，計(jì)算機(jī)能夠充分發(fā)揮它的優(yōu)越性。計(jì)算機(jī)進(jìn)行信息管理與信息管理系統(tǒng)的開(kāi)發(fā)密切相關(guān)，系統(tǒng)的開(kāi)發(fā)是系統(tǒng)管理的前提。倉(cāng)庫(kù)作為一總貨品資源的集散地，貨品的種類(lèi)繁多，包

8、含很多的信息數(shù)據(jù)的管理。據(jù)調(diào)查得知，以前倉(cāng)庫(kù)進(jìn)行信息管理的方式主要是基于文本、表格等紙介質(zhì)的手工處理，對(duì)于貨品的出入庫(kù)情況的統(tǒng)計(jì)和核實(shí)等往往采用對(duì)賬本的人工檢查，對(duì)管理者的管理權(quán)限等不受約束，任何人都可查看，這樣容易引起資料外泄。另外，數(shù)據(jù)信息處理工作量大，容易出錯(cuò)，由于數(shù)據(jù)繁多，容易丟失，且不易查找。總的來(lái)說(shuō)，缺乏系統(tǒng)、規(guī)范的信息管理手段。而且，一般的存儲(chǔ)情況是記錄在賬本上的，倉(cāng)庫(kù)的工作人員和管理員也只是當(dāng)時(shí)記得比較清楚，時(shí)間一長(zhǎng)，如果再要進(jìn)行查詢(xún)，就得在眾多的資料中翻閱查找了，這樣造成費(fèi)時(shí)、費(fèi)力，如要對(duì)很長(zhǎng)時(shí)間以前的貨品進(jìn)行更改就更加困難了。因此，很有必要建立一個(gè)庫(kù)存管理系統(tǒng)，使貨品管理工

9、作規(guī)范化，系統(tǒng)化，程序化。提高信息處理的速度和準(zhǔn)確性。現(xiàn)在國(guó)內(nèi)外對(duì)此類(lèi)系統(tǒng)的開(kāi)發(fā)與研究也是很有實(shí)用性的，基本上能滿(mǎn)足各企業(yè)的自身特點(diǎn)，來(lái)進(jìn)行庫(kù)存方面的管理，同時(shí)，改類(lèi)系統(tǒng)又都在不斷地深入與發(fā)展，來(lái)適用更多的企業(yè)，一般都能運(yùn)用于各個(gè)企業(yè)的庫(kù)存管理，但是都沒(méi)有針對(duì)大眾的廣泛應(yīng)用，只能運(yùn)用某個(gè)企業(yè)或單位，這一點(diǎn)還有待于今后的進(jìn)一步開(kāi)發(fā)與實(shí)踐。1、技術(shù)應(yīng)用于庫(kù)存管理是實(shí)現(xiàn)倉(cāng)庫(kù)管理自動(dòng)化的有效途徑庫(kù)存品種多，數(shù)量大。因此，要實(shí)現(xiàn)收發(fā)作業(yè)的快速、準(zhǔn)確、高效，倉(cāng)儲(chǔ)管理自動(dòng)化勢(shì)在必行。而實(shí)現(xiàn)管理自動(dòng)化的“瓶頸”則是產(chǎn)品信息的采集、輸入。傳統(tǒng)手工作業(yè)方式，在信息采集量加大的情形下，半因信息不能及時(shí)的反饋，給收發(fā)

10、作業(yè)造成一定的困難。利用條碼技術(shù)，在入庫(kù)及其包裝上加貼條碼，配之以倉(cāng)庫(kù)信息管理系統(tǒng)進(jìn)行作業(yè)，不僅可提高效率，降低作業(yè)強(qiáng)度，也將大大提高產(chǎn)品收發(fā)作業(yè)準(zhǔn)確率（如鍵盤(pán)輸入僅為百分之一），進(jìn)而實(shí)現(xiàn)倉(cāng)庫(kù)管理的全面自動(dòng)化。2、技術(shù)應(yīng)用于庫(kù)存管理對(duì)提高倉(cāng)庫(kù)作業(yè)效率有重要作用將條碼技術(shù)和倉(cāng)庫(kù)管理信息系統(tǒng)結(jié)合起來(lái)，用于產(chǎn)品收、發(fā)、保管等全過(guò)程控制管理，不僅可改變信息采集的傳統(tǒng)手工作業(yè)方式，降低作業(yè)強(qiáng)度，還可避免由此造成的各種差錯(cuò)，提高作業(yè)效率和科學(xué)管庫(kù)水平。比較發(fā)現(xiàn)，信息輸入時(shí)，條碼輸入速度是鍵盤(pán)輸入的5倍。入庫(kù)時(shí)，通常保管員根據(jù)產(chǎn)品上的條碼所反映出的冊(cè)序號(hào)、出廠(chǎng)期、生產(chǎn)廠(chǎng)家、單價(jià)、封存（保管）期等信息，進(jìn)行實(shí)

11、物點(diǎn)驗(yàn)，同時(shí)將條碼信息錄入到管理信息系統(tǒng)；出庫(kù)時(shí)，保管員根據(jù)航材發(fā)付單內(nèi)容，持條碼掃描裝置進(jìn)行器材揀選，并完成信息錄入；清庫(kù)盤(pán)點(diǎn)時(shí)，保管員可持掃描裝備進(jìn)行數(shù)質(zhì)量等內(nèi)容核對(duì)，并半采集的信息錄入管理系統(tǒng)中進(jìn)行自動(dòng)盤(pán)點(diǎn)，生成清庫(kù)對(duì)帳單等，完成清庫(kù)盤(pán)點(diǎn)作業(yè)。3、技術(shù)應(yīng)用于庫(kù)存管理是完善產(chǎn)品保障信息網(wǎng)絡(luò)的重要手段儲(chǔ)存產(chǎn)品信息是產(chǎn)品保障信息網(wǎng)絡(luò)的重要組成部分，是做好產(chǎn)品供應(yīng)保障工作的基礎(chǔ)。產(chǎn)品保障信息網(wǎng)是實(shí)現(xiàn)物資儲(chǔ)運(yùn)全過(guò)程可視化的前提。目前，有些倉(cāng)庫(kù)內(nèi)部局域網(wǎng)已經(jīng)建成并投入使用，并與業(yè)務(wù)主管部門(mén)實(shí)現(xiàn)了信息溝通，庫(kù)存保障信息網(wǎng)在日常航材保障工作中實(shí)現(xiàn)了信息溝通，庫(kù)存保障信息網(wǎng)在日常產(chǎn)品保障工作中的作用日趨明

12、顯。條碼技術(shù)在儲(chǔ)存管理中的應(yīng)用，可進(jìn)一步完善系統(tǒng)各倉(cāng)庫(kù)之間及各倉(cāng)庫(kù)與作業(yè)主管部門(mén)之間的信息共享和交換功能，最終達(dá)到對(duì)產(chǎn)品的全程跟蹤管理，充分發(fā)揮條碼技術(shù)在整個(gè)流通中的作用。同時(shí)，在軟件系統(tǒng)的研發(fā)過(guò)程中，將會(huì)融入一種epr的企業(yè)管理思想。大量的研究與實(shí)踐已經(jīng)充分表明，erp作為一種現(xiàn)代企業(yè)管理的思想和方法，將其大力地推廣應(yīng)用就是有效的促使我國(guó)企業(yè)管理朝著更加科學(xué)化、合理化和規(guī)范化方向發(fā)展的一種具體方法和途徑。另外，庫(kù)存管理的信息化和可視化，每個(gè)企業(yè)將會(huì)擁有兩個(gè)倉(cāng)庫(kù)，一個(gè)是裝滿(mǎn)貨物的倉(cāng)庫(kù)，還有一個(gè)就是管理系統(tǒng)里的數(shù)據(jù)庫(kù)，對(duì)上萬(wàn)種貨物分別編碼，使其成為計(jì)算機(jī)可識(shí)別的語(yǔ)言，形象地說(shuō)，貨架上的號(hào)碼就是貨

13、物的地址，從而避免了貨物的分揀和提取時(shí)的翻箱倒柜式的查找。隨著我國(guó)經(jīng)濟(jì)的飛速發(fā)展，各種類(lèi)型規(guī)模的公司企業(yè)迅速崛起，許多從事生產(chǎn)和經(jīng)營(yíng)管理的企業(yè)都有自己生產(chǎn)和銷(xiāo)售的產(chǎn)品，而這些產(chǎn)品都需要儲(chǔ)存在倉(cāng)庫(kù)中，對(duì)于每個(gè)企業(yè)來(lái)說(shuō)，隨著企業(yè)規(guī)模的不斷擴(kuò)大，產(chǎn)品數(shù)量的急劇增加，所生產(chǎn)產(chǎn)品的種類(lèi)也會(huì)不斷地更新與發(fā)展，有關(guān)產(chǎn)品的各種信息量也會(huì)成倍增長(zhǎng)。面對(duì)龐大的產(chǎn)品信息量，如何有效地管理庫(kù)存產(chǎn)品，對(duì)這些企業(yè)來(lái)說(shuō)是非常重要的，庫(kù)存管理的重點(diǎn)是銷(xiāo)售信息能否及時(shí)反饋，從而確保企業(yè)運(yùn)行效益。而庫(kù)存管理又涉及入庫(kù)、出庫(kù)的產(chǎn)品、經(jīng)辦人員及客戶(hù)等方方面面的因素，如何管理這些信息數(shù)據(jù)，是一項(xiàng)復(fù)雜的系統(tǒng)工程，充分考驗(yàn)著倉(cāng)庫(kù)管理員的工

14、作能力，工作量的繁重是可想而知的，所以這就需要由庫(kù)存管理系統(tǒng)來(lái)提高庫(kù)存管理工作的效率，這對(duì)信息的規(guī)范管理、科學(xué)統(tǒng)計(jì)和快速查詢(xún)，減少管理方面的工作量，同時(shí)對(duì)于調(diào)動(dòng)廣大員工的工作積極性，提高企業(yè)的生產(chǎn)效率，都具有十分重要的現(xiàn)實(shí)意義。第二章數(shù)據(jù)庫(kù)理論基礎(chǔ)2.1數(shù)據(jù)庫(kù)系統(tǒng)設(shè)計(jì)一個(gè)成功的信息管理系統(tǒng)，是建立在許多條件之上的，而數(shù)據(jù)庫(kù)是其中一個(gè)非常重要的條件和關(guān)鍵技術(shù)。信息管理系統(tǒng)所涉及的數(shù)據(jù)庫(kù)設(shè)計(jì)分五個(gè)步驟：數(shù)據(jù)庫(kù)需求分析、概念設(shè)計(jì)、邏輯設(shè)計(jì)、物理設(shè)計(jì)與加載測(cè)試。（1）數(shù)據(jù)庫(kù)需求分析的任務(wù)是將業(yè)務(wù)管理單證流化為數(shù)據(jù)流，劃分主題之間的邊界，繪制出dfd圖，并完成相應(yīng)的數(shù)據(jù)字典。（2）概念設(shè)計(jì)的任務(wù)是從df

15、d出發(fā)，繪制出本主題的實(shí)體關(guān)系圖，并列出各個(gè)實(shí)體與關(guān)系的綱要表。（3）邏輯設(shè)計(jì)的任務(wù)是從e-r圖與對(duì)應(yīng)的綱要表出發(fā)，確定各個(gè)實(shí)體及關(guān)系的表名屬性。（4）物理設(shè)計(jì)的任務(wù)是確定所有屬性的類(lèi)型、寬度與取值范圍，設(shè)計(jì)出基本表的主鍵，將所有的表名與字段名英文化（現(xiàn)在很多軟件能支持中文字段，如access 2000），實(shí)現(xiàn)物理建庫(kù)，完成數(shù)據(jù)庫(kù)物理設(shè)計(jì)字典。（5）加載測(cè)試工作貫穿于程序測(cè)試工作的全過(guò)程，整個(gè)錄入、修改、查詢(xún)、處理工作均可視為對(duì)數(shù)據(jù)庫(kù)的加載測(cè)試工作。數(shù)據(jù)庫(kù)設(shè)計(jì)主要是進(jìn)行數(shù)據(jù)庫(kù)的邏輯設(shè)計(jì)，即將數(shù)據(jù)按一定的分類(lèi)、分組系統(tǒng)和邏輯層次組織起來(lái)，是面向用戶(hù)的。數(shù)據(jù)庫(kù)設(shè)計(jì)時(shí)需要綜合企業(yè)各個(gè)部門(mén)的存檔數(shù)據(jù)和

16、數(shù)據(jù)需求，分析各個(gè)數(shù)據(jù)之間的關(guān)系，按照dbms提供的功能和描述工具，設(shè)計(jì)出規(guī)模適當(dāng)、正確反映數(shù)據(jù)關(guān)系、數(shù)據(jù)冗余少、存取效率高、能滿(mǎn)足多種查詢(xún)要求的數(shù)據(jù)模型。數(shù)據(jù)庫(kù)設(shè)計(jì)的步驟主要是：（1）數(shù)據(jù)庫(kù)結(jié)構(gòu)定義：目前的數(shù)據(jù)庫(kù)管理系統(tǒng)（dbms）有的是支持聯(lián)機(jī)事務(wù)處理cltp（負(fù)責(zé)對(duì)事務(wù)數(shù)據(jù)進(jìn)行采集、處理、存儲(chǔ)）的操作型dbms，有的可支持?jǐn)?shù)據(jù)倉(cāng)庫(kù)、有聯(lián)機(jī)分析處理clap（指為支持決策的制定對(duì)數(shù)據(jù)的一種加工操作）功能的大型dbms，有的數(shù)據(jù)庫(kù)是關(guān)系型的、有的可支持面向?qū)ο髷?shù)據(jù)庫(kù)。針對(duì)選擇的dbms，進(jìn)行數(shù)據(jù)庫(kù)結(jié)構(gòu)定義。（2）數(shù)據(jù)表定義：數(shù)據(jù)表定義指定義數(shù)據(jù)庫(kù)中數(shù)據(jù)表的結(jié)構(gòu)，數(shù)據(jù)表的邏輯結(jié)構(gòu)包括：屬性名稱(chēng)、

17、類(lèi)型、表示形式、缺省值、校驗(yàn)規(guī)則、是否關(guān)鍵字、可否為空等。關(guān)系型數(shù)據(jù)庫(kù)要盡量按關(guān)系規(guī)范化要求進(jìn)行數(shù)據(jù)庫(kù)設(shè)計(jì)，但為使效率高，規(guī)范化程度應(yīng)根據(jù)應(yīng)用環(huán)境和條件來(lái)決定。數(shù)據(jù)表設(shè)計(jì)不僅要滿(mǎn)足數(shù)據(jù)存儲(chǔ)的要求，還要增加一些如反映有關(guān)信息、操作責(zé)任、中間數(shù)據(jù)的字段或臨時(shí)數(shù)據(jù)表。（3）存儲(chǔ)設(shè)備和存儲(chǔ)空間組織：確定數(shù)據(jù)的存放地點(diǎn)、存儲(chǔ)路徑、存儲(chǔ)設(shè)備等，備份方案，對(duì)多版本如何保證一致性和數(shù)據(jù)的完整性。（4）數(shù)據(jù)使用權(quán)限設(shè)置：針對(duì)用戶(hù)的不同使用要求，確定數(shù)據(jù)的用戶(hù)使用權(quán)限，確保數(shù)據(jù)安全。（5）數(shù)據(jù)字典設(shè)計(jì)：用數(shù)據(jù)字典描述數(shù)據(jù)庫(kù)的設(shè)計(jì)，便于維護(hù)和修改。第三章應(yīng)用系統(tǒng)開(kāi)發(fā)工具3.1 visual basic簡(jiǎn)介及實(shí)現(xiàn)原理

18、visual basic（簡(jiǎn)稱(chēng)vb）是美國(guó)微軟公司（microsoft）于1990年推出的一套完整的windows系統(tǒng)軟件開(kāi)發(fā)工具，可用于開(kāi)發(fā)windows環(huán)境下的各類(lèi)應(yīng)用程序，是一種可視化、面向?qū)ο蟆⒂檬录?qū)動(dòng)方式的結(jié)構(gòu)化高級(jí)程序設(shè)計(jì)語(yǔ)言和工具，是目前使用最廣泛的編程語(yǔ)言之一。至今以升級(jí)到了6.0版。vb的重要特點(diǎn)之一是可視性。系統(tǒng)引進(jìn)了窗體和控件的機(jī)制，用于設(shè)計(jì)應(yīng)用程序界面。用戶(hù)通過(guò)在屏幕上生成窗體，在窗體中繪制所需要的控件和按鈕，設(shè)計(jì)菜單和對(duì)話(huà)框，vb會(huì)自動(dòng)生成相應(yīng)的代碼。vb的另一重要特點(diǎn)是事件驅(qū)動(dòng)。當(dāng)窗體或控件上發(fā)生一個(gè)事件時(shí)，vb立即把控制權(quán)交給程序員。程序員不必?fù)?dān)心如何判斷事件是

19、否已發(fā)生，只需要編寫(xiě)一段代碼告訴計(jì)算機(jī)在事件發(fā)生以后應(yīng)該做什么工作就可以了。這樣，設(shè)計(jì)一個(gè)windows應(yīng)用程序簡(jiǎn)化為用鼠標(biāo)在屏幕上點(diǎn)擊、拖拽并添加少量的代碼就可以完成了，大大降低了對(duì)程序設(shè)計(jì)的要求，提高了應(yīng)用程序的開(kāi)發(fā)效率。利用vb的可視性特點(diǎn)，可方便的設(shè)計(jì)了程序的窗體界面，并在各個(gè)窗體中的合適位置繪制所需的每種控件。如要修改窗體或控件的某項(xiàng)屬性，只需在相應(yīng)的窗體或控件的屬性窗口修改相應(yīng)的參數(shù)便可達(dá)到需要的設(shè)計(jì)效果。利用vb的事件驅(qū)動(dòng)性特點(diǎn)，只需在窗體或控件上的代碼窗口中添加少量的代碼，便可達(dá)到告訴當(dāng)在相應(yīng)的窗體或控件上發(fā)生某一事件時(shí)，它們?cè)谑录l(fā)生后應(yīng)該做什么工作的目的。例如幾個(gè)窗體上的添

20、加、刪除、返回按鈕的作用，就是通過(guò)在各個(gè)相應(yīng)按鈕的代碼窗口中輸入相應(yīng)的代碼，來(lái)達(dá)到當(dāng)在幾個(gè)按鈕上出現(xiàn)單擊（click）事件后，相應(yīng)按鈕實(shí)現(xiàn)添加、刪除、返回的功能的。第四章 庫(kù)存管理系統(tǒng)設(shè)計(jì)分析4.1需求分析本套應(yīng)用程序名稱(chēng)為“庫(kù)存管理系統(tǒng)”，主要用于倉(cāng)庫(kù)貨品信息的管理，系統(tǒng)包括倉(cāng)庫(kù)管理、入庫(kù)、出庫(kù)、一些統(tǒng)計(jì)查詢(xún)和報(bào)表等幾部分組成。庫(kù)存管理系統(tǒng)需滿(mǎn)足倉(cāng)庫(kù)管理員及工作人員的需求，他們具有登陸應(yīng)用系統(tǒng)的權(quán)限，所以需要對(duì)工作人員的登陸本模塊進(jìn)行更多的考慮，設(shè)計(jì)不同用戶(hù)的操作權(quán)限和登陸方法。對(duì)于一個(gè)倉(cāng)庫(kù)來(lái)說(shuō)，最大的功能就是存儲(chǔ)貨品，所以倉(cāng)庫(kù)管理就是對(duì)貨品信息，倉(cāng)庫(kù)信息，短線(xiàn)貨品及超儲(chǔ)貨品的管理，用戶(hù)可以

21、根據(jù)實(shí)際情況對(duì)各種貨品信息進(jìn)行分類(lèi)管理，包括添加，刪除更新數(shù)據(jù)庫(kù)等。當(dāng)然，倉(cāng)庫(kù)中貨品入庫(kù)也是常有的事，入庫(kù)管理操作就是對(duì)于貨品入庫(kù)情況的管理，用戶(hù)可以方便地輸入一些貨品的信息。有了貨品的入庫(kù)，自然也就有貨品的出庫(kù)，這部分提供的功能與入庫(kù)操作流程差不多，有所區(qū)別的只是對(duì)一些出庫(kù)貨品的管理，也很方便數(shù)據(jù)的輸入。倉(cāng)庫(kù)貨品的信息量大，數(shù)據(jù)安全性和保密性要求高。本系統(tǒng)實(shí)現(xiàn)對(duì)貨品信息的管理和總體的統(tǒng)計(jì)等，倉(cāng)庫(kù)信息，供貨單位和經(jīng)辦人員信息的查看及維護(hù)。倉(cāng)庫(kù)管理人員可以瀏覽、查詢(xún)、添加、刪除等貨品的基本信息以及統(tǒng)計(jì)等，并可以對(duì)一些基本的信息生成報(bào)表形式，并打印輸出的功能。報(bào)表是一個(gè)數(shù)據(jù)庫(kù)中最重要的功能之一，有

22、了報(bào)表才能清楚地知道貨品的出入庫(kù)情況，在數(shù)據(jù)報(bào)表功能中包括出庫(kù)報(bào)表，庫(kù)存報(bào)表及經(jīng)辦人員報(bào)表等一些基本信息的打印，方便簡(jiǎn)潔。本系統(tǒng)基本涵蓋了庫(kù)存管理的主要需求，具有完善細(xì)致的功能、友好的用戶(hù)界面、強(qiáng)大的數(shù)據(jù)處理功能和完備的安全機(jī)制；隨心所欲的查詢(xún)和所見(jiàn)即所得的打印功能，并全面支持分析和決策的功能。 系統(tǒng)特色： 1.設(shè)置系統(tǒng)用戶(hù)登陸功能，即時(shí)對(duì)系統(tǒng)數(shù)據(jù)進(jìn)行安全設(shè)置與保護(hù)。 2.友好的用戶(hù)界面，業(yè)務(wù)操作簡(jiǎn)單，進(jìn)入系統(tǒng)即能使用。3.成熟先進(jìn)的技術(shù)和系統(tǒng)構(gòu)架，采用先進(jìn)的數(shù)據(jù)庫(kù)訪(fǎng)問(wèn)方式，數(shù)據(jù)更安全，性能更穩(wěn)定。4.強(qiáng)大的數(shù)據(jù)處理能力和開(kāi)放的數(shù)據(jù)接口，選用具有大型數(shù)據(jù)庫(kù)安全機(jī)制的數(shù)據(jù)庫(kù)系統(tǒng)，提供各種級(jí)別的數(shù)

23、據(jù)保護(hù)和權(quán)限控制方式，確保數(shù)據(jù)的安全可靠。5.系統(tǒng)每種操作都可以通過(guò)菜單來(lái)進(jìn)行。操作快捷、方便。易懂易會(huì)。系統(tǒng)集輸入、維護(hù)、查詢(xún)、統(tǒng)計(jì)和各種處理為一體，信息導(dǎo)入導(dǎo)出方便共享。庫(kù)存管理系統(tǒng)倉(cāng)庫(kù)管理入庫(kù)管理出庫(kù)管理盤(pán)存管理綜合管理附項(xiàng)分類(lèi)歷史數(shù)據(jù)管理打印、查詢(xún)系統(tǒng)貨品信息管理貨品庫(kù)存管理短線(xiàn)貨品管理超儲(chǔ)貨品管理出庫(kù)登記管理貨品出庫(kù)年度統(tǒng)計(jì)收貨單位年度收貨金額統(tǒng)計(jì)盤(pán)存錄入貨品出入庫(kù)期間匯總表倉(cāng)庫(kù)信息管理供貨單位管理收貨單位管理經(jīng)辦人員管理4.2模塊劃分基本模塊與功能：1.系統(tǒng)包括用戶(hù)管理，密碼管理，關(guān)閉系統(tǒng)，以及數(shù)據(jù)的備份與恢復(fù)，可以根據(jù)需要對(duì)整個(gè)數(shù)據(jù)庫(kù)進(jìn)行備份，以確保數(shù)據(jù)的安全性。幫助：本系統(tǒng)的幫

24、助信息，包括應(yīng)用程序的版本信息；2.庫(kù)存管理貨品信息管理：對(duì)倉(cāng)庫(kù)里的貨品進(jìn)行登記；貨品庫(kù)存管理：管理倉(cāng)庫(kù)的庫(kù)存情況；短線(xiàn)貨品管理：對(duì)倉(cāng)庫(kù)里短線(xiàn)的貨品進(jìn)行登記，以便及時(shí)采購(gòu)補(bǔ)貨；超儲(chǔ)貨品管理：對(duì)倉(cāng)庫(kù)里超儲(chǔ)的貨品進(jìn)行登記，控制庫(kù)存量，減少進(jìn)貨；3.入庫(kù)管理入庫(kù)登記管理：能對(duì)貨品的入庫(kù)登記，刪除，更改等；入庫(kù)期間統(tǒng)計(jì)：貨品入庫(kù)期間年度的統(tǒng)計(jì)；供貨單位期間供貨金額統(tǒng)計(jì)：對(duì)貨品供應(yīng)的金額進(jìn)行統(tǒng)計(jì)；4.出庫(kù)管理對(duì)貨品出庫(kù)期間的年度統(tǒng)計(jì)，出庫(kù)登記，及收獲單位金額統(tǒng)計(jì)等；5.盤(pán)存管理對(duì)盤(pán)存貨品信息的盤(pán)存錄入；6.綜合管理可根據(jù)同一貨品的出入庫(kù)情況，對(duì)庫(kù)存情況的匯總；7.附項(xiàng)管理對(duì)供貨單位情況，經(jīng)辦人員，收貨單

25、位情況，倉(cāng)庫(kù)信息進(jìn)行登記管理，可進(jìn)行添加，刪除等操作；8.歷史數(shù)據(jù)管理對(duì)歷史庫(kù)存，歷史出庫(kù)，歷史出庫(kù)情況進(jìn)行管理；9.打印與查詢(xún)可根據(jù)輸入的條件，對(duì)貨品的入庫(kù)信息，庫(kù)存信息等進(jìn)行簡(jiǎn)單查詢(xún)和組合查詢(xún)。據(jù)流程圖：登陸庫(kù)存管理系統(tǒng)驗(yàn)證用戶(hù)信息系統(tǒng)主窗體倉(cāng)庫(kù)管理入庫(kù)管理出庫(kù)管理盤(pán)存管理綜合管理附項(xiàng)分類(lèi)歷史數(shù)據(jù)管理打印、查詢(xún)系統(tǒng)貨品入庫(kù)單經(jīng)辦人員報(bào)表貨品出庫(kù)單數(shù)據(jù)備份備份輸出庫(kù)存匯總圖41 庫(kù)存管理系統(tǒng)數(shù)據(jù)流程圖貨品登記基本信息錄入貨品基本信息管理貨品調(diào)配匯總出庫(kù)貨品信息管理入庫(kù)貨品信息管理貨品其他信息管理圖42 貨品信息管理數(shù)據(jù)流程圖貨品信息管理數(shù)據(jù)流程圖： 4.3數(shù)據(jù)庫(kù)設(shè)計(jì)本庫(kù)存管理系統(tǒng)是應(yīng)用在單機(jī)

26、系統(tǒng)上的，所以只需建立起一個(gè)數(shù)據(jù)庫(kù)，在此數(shù)據(jù)庫(kù)基礎(chǔ)上建立起表格，現(xiàn)將部分?jǐn)?shù)據(jù)結(jié)構(gòu)表描述如下：貨品信息表字段名數(shù)據(jù)類(lèi)型字段長(zhǎng)度是否為空貨品編碼文本5貨品名稱(chēng)文本10類(lèi)別文本8型號(hào)文本4單位文本2倉(cāng)庫(kù)編碼文本5存放倉(cāng)庫(kù)文本12入庫(kù)計(jì)劃單價(jià)貨幣出庫(kù)計(jì)劃單價(jià)貨幣原始庫(kù)存數(shù)字長(zhǎng)整型默認(rèn)貨位文本5警戒底線(xiàn)庫(kù)存數(shù)字長(zhǎng)整型警戒高線(xiàn)庫(kù)存數(shù)字長(zhǎng)整型表1貨品信息表入庫(kù)登記表字段名數(shù)據(jù)類(lèi)型字段長(zhǎng)度是否為空入庫(kù)日期日期/時(shí)間入庫(kù)單號(hào)文本10貨物編碼文本5數(shù)量數(shù)字長(zhǎng)整型進(jìn)貨價(jià)貨幣總額貨幣已付貨款貨幣供貨單位編碼文本5供貨單位文本20經(jīng)辦人編碼文本5經(jīng)辦人文本8增值稅率數(shù)字單精度型備注備注表2入庫(kù)登記表出庫(kù)登記表字段名數(shù)據(jù)

27、類(lèi)型字段長(zhǎng)度是否為空出庫(kù)日期日期/時(shí)間出庫(kù)單號(hào)文本10貨物編碼文本5貨物名稱(chēng)文本10數(shù)量數(shù)字長(zhǎng)整型單價(jià)貨幣出貨價(jià)貨幣總額貨幣已收獲款貨幣收貨單位編碼文本5收貨單位文本20經(jīng)辦人編碼文本5經(jīng)辦人文本8增值稅率數(shù)字單精度型備注備注表3貨品出庫(kù)表倉(cāng)庫(kù)信息表字段名數(shù)據(jù)類(lèi)型字段長(zhǎng)度是否為空倉(cāng)庫(kù)編號(hào)文本5倉(cāng)庫(kù)名稱(chēng)文本12存貨種類(lèi)文本2存貨價(jià)值貨幣表4倉(cāng)庫(kù)信息表供貨單位信息表（收貨單位表）字段名數(shù)據(jù)類(lèi)型字段長(zhǎng)度是否為空單位編號(hào)文本5單位名稱(chēng)文本50單位地址文本50電話(huà)文本15聯(lián)系人文本8表5供貨單位信息表經(jīng)辦人員表字段名數(shù)據(jù)類(lèi)型字段長(zhǎng)度是否為空編號(hào)文本5姓名文本8家庭住址文本50辦公電話(huà)文本15家庭電話(huà)文本

28、15表6經(jīng)辦人員表用戶(hù)表字段名數(shù)據(jù)類(lèi)型字段長(zhǎng)度是否為空userid文本10userpwd文本6表7用戶(hù)表第五章應(yīng)用程序設(shè)計(jì)5.1程序結(jié)構(gòu)本應(yīng)用程序由33個(gè)窗體組成，主要的分別是：主窗體，歡迎界面，登陸窗體，入庫(kù)窗體，出庫(kù)窗體，庫(kù)存匯總，打印及查詢(xún)等窗體組成。通過(guò)運(yùn)行程序首先進(jìn)入歡迎界面和登陸窗體，通過(guò)輸入密碼，驗(yàn)證身份后進(jìn)入主窗體，在主窗體上有10個(gè)菜單項(xiàng)，分別對(duì)應(yīng)各自的功能模塊窗體，包括系統(tǒng)，庫(kù)存管理，入庫(kù)管理，出庫(kù)管理，盤(pán)存管理，綜合管理，附項(xiàng)管理，歷史數(shù)據(jù)管理，打印和查詢(xún)。需要哪個(gè)功能的時(shí)候就點(diǎn)哪個(gè)菜單，相對(duì)應(yīng)的窗體會(huì)自動(dòng)彈出。5.2 程序源代碼程序?qū)崿F(xiàn)的部分代碼如下：主窗體的程序代碼圖

29、51 主窗體界面private sub a1_click()form1.showend subprivate sub a2_click()dim fadd as new frmadduser fadd.show fadd.zorder 0end subprivate sub a3_click()dim fchangepwd as new frmchangepwd fchangepwd.showend subprivate sub a4_click()frmabout.showend subprivate sub a5_click() 調(diào)入數(shù)據(jù)備份 load main_sjbf main_sjb

30、f.show main.enabled = falseend subprivate sub a6_click() 調(diào)入數(shù)據(jù)恢復(fù) load main_sjhf main_sjhf.show main.hideend subprivate sub b1_click()frm貨品信息.showend subprivate sub b12_click() sql = select * from 貨品信息 order by 貨品編碼 frmproinfo.createlist (sql) frmproinfo.showend subprivate sub b2_click()frm貨品庫(kù)存.showen

31、d subprivate sub b3_click()frm超儲(chǔ)貨品.showend subprivate sub b4_click()frm短線(xiàn)貨品.showend subprivate sub c1_click()frm入庫(kù)登記.showend subprivate sub c2_click()frm貨品入庫(kù)年度統(tǒng)計(jì).showend subprivate sub c3_click()frm供貨單位供貨分類(lèi)金額統(tǒng)計(jì).showend subprivate sub c4_click()frm供貨單位年度供貨金額統(tǒng)計(jì).showend subprivate sub command1_click()d

32、ate1 = text1.text & / & text3.text & / & text2.text.date2 = text6.text & / & text4.text & / & text5.texttext7.text = date1end subprivate sub d1_click()frm出庫(kù)登記.showend subprivate sub d2_click()frm貨品出庫(kù)年度統(tǒng)計(jì).showend subprivate sub d3_click()frm收貨單位期間收貨統(tǒng)計(jì).showend subprivate sub d4_click()frm收貨單位年度收貨金額統(tǒng)計(jì).

33、showend subprivate sub e1_click()frm盤(pán)存錄入.showend subprivate sub e2_click()frm盤(pán)存表.showend subprivate sub f1_click()frm貨品出入?yún)R總表.showend subprivate sub g1_click()frm經(jīng)辦人員.showend subprivate sub g2_click()frm供貨單位.showend subprivate sub g3_click()frm倉(cāng)庫(kù)信息.showend subprivate sub g5_click()form6.showend subpr

34、ivate sub h1_click()frm歷史庫(kù)存.showend subprivate sub h2_click()frm歷史入庫(kù).showend subprivate sub h3_click()frm歷史出庫(kù).showend subprivate sub i1_click()datareport1.showend subprivate sub i2_click()datareport2.showend subprivate sub i3_click()datareport3.showend subprivate sub j1_click()form2.showend subpriva

35、te sub j2_click()form3.showend subprivate sub j3_click()form4.showend subprivate sub j4_click()form5.showend subprivate sub toolbar1_buttonclick(byval button as comctllib.button)select case button.keycase is = rk 調(diào)入入庫(kù)登記c1_clickcase is = ck 調(diào)入出庫(kù)登記d1_clickcase is = kchz 調(diào)入庫(kù)存匯總f1_clickcase is = zhcx 調(diào)入

36、組合查詢(xún)j4_clickcase is = sjbf 調(diào)入數(shù)據(jù)備份a5_clickend selectend subprivate sub x_click()endend sub登陸模塊的實(shí)現(xiàn)private sub cmdlogin_click()denlu_name = txtusername.textdenlu_pass = txtpassword.textdim mycn as new adodb.connectiondim myrs as new adodb.recordsetset myrs = new adodb.recordsetmycn.open provider=micros

37、oft.jet.oledb.4.0;data source=kucun.mdb;myrs.open select * from 用戶(hù) where userid= + denlu_name + ;, mycn, adopenkeyset, adlockoptimisticif myrs.bof = true and myrs.eof = true thenmsgbox 查無(wú)此人, , 登陸信息else if myrs(userpwd) = denlu_pass then msgbox 身份正確, , 登陸信息 main.show unload me else msgbox 密碼不正確, , 登陸

38、信息 end if end if end sub添加用戶(hù)模塊的實(shí)現(xiàn)option explicitprivate sub command1_click() dim sql as string dim rs as adodb.recordset if trim(username.text) = then 判斷用戶(hù)名稱(chēng)是否為空 msgbox 請(qǐng)輸入用戶(hù)名稱(chēng)!, vbokonly + vbexclamation, 警告 exit sub username.setfocus else sql = select * from 用戶(hù) where userid= & username & set rs = t

39、ransactsql(sql) if rs.eof = false then 判斷是否已經(jīng)存在用戶(hù) msgbox 這個(gè)用戶(hù)已經(jīng)存在！請(qǐng)重新輸入用戶(hù)名稱(chēng)！, vbokonly + vbexclamation, 警告 username.setfocus username.text = password.text = confirmpwd.text = exit sub else if trim(password.text) trim(confirmpwd.text) then 判斷兩次密碼是否相同 msgbox 兩次輸入的密碼不一致，請(qǐng)重新輸入密碼！, vbokonly + vbexclamati

40、on, 警告 password.text = confirmpwd.text = password.setfocus exit sub elseif trim(password.text) = then 判斷密碼是否為空 msgbox 密碼不能為空！, vbokonly + vbexclamation, 警告 password.text = confirmpwd = password.setfocus else 添加用戶(hù) sql = insert into 用戶(hù) (userid,userpwd) values( & username sql = sql & , & password & ) t

41、ransactsql (sql) msgbox 添加成功！, vbokonly + vbexclamation, 添加結(jié)果 重新設(shè)置初始化為空 username.text = password.text = confirmpwd.text = username.setfocus end if end if end ifend subprivate sub command2_click()unload meend subprivate sub form_load()username.text = password.text = confirmpwd.text = end sub對(duì)于貨品信息的瀏覽

42、，主要采用了msflexgrid控件，它是一種active控件，該控件提供了表格式界面，處理數(shù)據(jù)相當(dāng)靈活，具有只讀數(shù)據(jù)綁定、對(duì)表格數(shù)據(jù)進(jìn)行顯示和操作、數(shù)據(jù)分組排序、data控件賦值、文本自動(dòng)換行等功能。但它無(wú)法對(duì)數(shù)據(jù)進(jìn)行動(dòng)態(tài)輸入，只能提供瀏覽功能。圖52 貨品信息界面具體代碼如下：option explicitprivate sub command1_click()rsgrid.refreshend subprivate sub form_load() dim sql as string sql = select * from 貨品信息 order by 貨品編碼 createlist (sq

43、l)end subpublic sub createlist(sql as string) dim rs as new adodb.recordset dim i as integer dim rsgird as msflexgrid 設(shè)置表頭 rsgrid.textmatrix(0, 0) = 貨品編碼 rsgrid.textmatrix(0, 1) = 貨品名稱(chēng) rsgrid.textmatrix(0, 2) = 類(lèi)別 rsgrid.textmatrix(0, 3) = 型號(hào) rsgrid.textmatrix(0, 4) = 單位 rsgrid.textmatrix(0, 5) = 倉(cāng)庫(kù)

44、編碼 rsgrid.textmatrix(0, 6) = 存放倉(cāng)庫(kù) rsgrid.textmatrix(0, 7) = 入庫(kù)計(jì)劃單價(jià) rsgrid.textmatrix(0, 8) = 出庫(kù)計(jì)劃單價(jià) rsgrid.textmatrix(0, 9) = 原始庫(kù)存 rsgrid.textmatrix(0, 10) = 默認(rèn)貨位 rsgrid.textmatrix(0, 11) = 警戒底線(xiàn)庫(kù)存 rsgrid.textmatrix(0, 12) = 警戒高線(xiàn)庫(kù)存 for i = 0 to 12 設(shè)置所有表格對(duì)齊方式 rsgrid.colalignment(i) = 4 next i for i =

45、0 to 11 設(shè)置每列寬度 rsgrid.colwidth(i) = 1400 next i rsgrid.colwidth(12) = 2000 set rs = transactsql(sql) if rs.eof = false then 顯示信息內(nèi)容 rsgrid.rows = 1 while not rs.eof rsgrid.rows = rsgrid.rows + 1 rsgrid.textmatrix(rsgrid.rows - 1, 0) = rs(0) rsgrid.textmatrix(rsgrid.rows - 1, 1) = rs(1) rsgrid.textmat

46、rix(rsgrid.rows - 1, 2) = rs(2) rsgrid.textmatrix(rsgrid.rows - 1, 3) = rs(3) rsgrid.textmatrix(rsgrid.rows - 1, 4) = rs(4) rsgrid.textmatrix(rsgrid.rows - 1, 5) = rs(5) rsgrid.textmatrix(rsgrid.rows - 1, 6) = rs(6) rsgrid.textmatrix(rsgrid.rows - 1, 7) = rs(7) rsgrid.textmatrix(rsgrid.rows - 1, 8)

47、= rs(8) rsgrid.textmatrix(rsgrid.rows - 1, 9) = rs(9) rsgrid.textmatrix(rsgrid.rows - 1, 10) = rs(10) rsgrid.textmatrix(rsgrid.rows - 1, 11) = rs(11) rsgrid.textmatrix(rsgrid.rows - 1, 12) = rs(12) rs.movenext wend rs.close end ifend sub貨品入庫(kù)登記模塊的實(shí)現(xiàn)圖53 入庫(kù)登記窗口private sub form_unload(cancel as integer)

48、 screen.mousepointer = vbdefaultend subprivate sub datprimaryrs_error(byval errornumber as long, description as string, byval scode as long, byval source as string, byval helpfile as string, byval helpcontext as long, fcanceldisplay as boolean) 錯(cuò)誤處理程序代碼置于此處 想要忽略錯(cuò)誤，注釋掉下一行 想要捕獲它們，在此添加代碼以處理它們 msgbox data error event hit err: & descriptionend subprivate sub datprimaryrs_movecomplete(byval adreason as adodb.eventreasonen