vb超市管理系統(tǒng)論文

1、<p>　　江西師范大學(xué)科學(xué)技術(shù)學(xué)院</p><p>　　JIANGXI NORMAL UNIVERSITY </p><p>　　SCIENCE AND TECHNOLOGCOLLEGE</p><p><b>　　本科畢業(yè)生論文</b></p><p><b>　　題目：超市管理系統(tǒng)</b&

2、gt;</p><p>　　Topic:The design of Marketing personnel management system</p><p>　　姓 名：陳焰杰</p><p>　　專(zhuān)業(yè)班級(jí)：04電子信息工程</p><p>　　學(xué) 號(hào)：0408068005</p><p>&l

3、t;b>　　指導(dǎo)老師：歐陽(yáng)迎春</b></p><p>　　完成日期：2008年4月</p><p><b>　　聲 明</b></p><p><b>　　本人鄭重聲明：</b></p><p>　　所呈交的學(xué)位論文，是本人在指導(dǎo)教師指導(dǎo)下，獨(dú)立進(jìn)行研究工作所取得的成果。除

4、文中已經(jīng)注明引用的內(nèi)容外，本論文不含任何其他個(gè)人或集體已經(jīng)發(fā)表或撰寫(xiě)過(guò)的作品或成果。對(duì)本文的研究做出重要貢獻(xiàn)的個(gè)人和集體，均已在文中以明確的方式標(biāo)明。本聲明的法律結(jié)果由本人承擔(dān)。</p><p>　　本畢業(yè)設(shè)計(jì)（論文）成果是本人在江西師范大學(xué)科學(xué)技術(shù)學(xué)院讀書(shū)期間在指導(dǎo)教師指導(dǎo)下取得的，成果歸江西師范大學(xué)科學(xué)技術(shù)學(xué)院所有。</p><p><b>　　特此聲明。</b>

5、</p><p>　　聲明人（畢業(yè)設(shè)計(jì)（論文）作者）學(xué)號(hào)：</p><p>　　聲明人（畢業(yè)設(shè)計(jì)（論文）作者）簽名：</p><p>　　簽名日期： 年 月 日</p><p><b>　　摘 要</b></p><p>　　超市管理系統(tǒng)是專(zhuān)門(mén)為高校設(shè)計(jì)的非常典型的管理信

6、息系統(tǒng)（MIS），其開(kāi)發(fā)主要包括前端應(yīng)用程序的開(kāi)發(fā)以及后臺(tái)數(shù)據(jù)庫(kù)的建立和維護(hù)。對(duì)于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的庫(kù)。而對(duì)于后者則要求應(yīng)用程序具有功能完備，易于使用等特點(diǎn)。</p><p>　　本文主要介紹了該系統(tǒng)生成的背景及Visual Basic 6.0和Access的一般原理；闡述了本管理系統(tǒng)的結(jié)構(gòu)及工作原理；設(shè)計(jì)實(shí)現(xiàn)了登錄模塊、銷(xiāo)售統(tǒng)計(jì)、分析并解決了現(xiàn)實(shí)中的若干技術(shù)問(wèn)題。</p&g

7、t;<p>　　關(guān)鍵詞　數(shù)據(jù)庫(kù)， Visual Basic6.0 ， 超市管理</p><p><b>　　Abstract</b></p><p>　　A super market management system is a typical application of managing information system (MIS) which

8、 is specially designed for college. It mainly includes building up data-base at back-end and developing the application interface at front-end .The former requires consistency, integrality and security of data. The later

9、 should make the application powerful and be easily used.</p><p>　　.The developing background of the super market system and the basic theory of Visual Basic 6.0 and Access Visual is introduced in this paper

10、. The structure of the super market management system and its design thought are also discussed in this paper.</p><p>　　Keywords:　Database ，Visual Basic6.0 ， The super market management system</p><

11、;p><b>　　目 錄</b></p><p>　　緒論…………………………………………………………………………………1</p><p>　　1.系統(tǒng)開(kāi)發(fā)工具……………………………………………………………………1</p><p>　　1.1 Visual Basi介紹………………………………………………………… 1 </p&g

12、t;<p>　　1.2 Access 2002……………………………………………………………… 2</p><p>　　2.可行性研究和需求分析…………………………………………………………2</p><p>　　2.1 可行性研究…………………………………………………………………2</p><p>　　2.2 需求分析……………………………………………

13、………………………3</p><p>　　3.系統(tǒng)總統(tǒng)設(shè)計(jì)方案………………………………………………………………4</p><p>　　3.1 系統(tǒng)功能分析………………………………………………………………4</p><p>　　3.2 數(shù)據(jù)庫(kù)設(shè)計(jì)…………………………………………………………………4</p><p>　　3.3 系統(tǒng)功能模塊設(shè)計(jì)…

14、………………………………………………………6</p><p>　　3.4 系統(tǒng)功能介紹………………………………………………………………6</p><p>　　4.系統(tǒng)各模塊的設(shè)計(jì)及實(shí)現(xiàn)………………………………………………………9</p><p>　　4.1 用戶(hù)控制模塊及界面詳細(xì)設(shè)計(jì)……………………………………………9</p><p>　　4

15、.2 主窗體的設(shè)計(jì)………………………………………………………………10</p><p>　　4.3 交易管理模塊及設(shè)計(jì)………………………………………………………11</p><p>　　4.4 進(jìn)貨統(tǒng)計(jì)模塊及界面設(shè)計(jì)…………………………………………………15</p><p>　　4.5 銷(xiāo)售統(tǒng)計(jì)模塊及界面設(shè)計(jì)…………………………………………………17</p&g

16、t;<p>　　4.6 密碼修改模塊及界面設(shè)計(jì)…………………………………………………18</p><p>　　結(jié)論………………………………………………………………………………19</p><p>　　致謝………………………………………………………………………………19</p><p>　　參考文獻(xiàn)…………………………………………………………………………

17、20</p><p><b>　　緒論</b></p><p>　　隨著科學(xué)技術(shù)的不斷提高,計(jì)算機(jī)科學(xué)日漸成熟,其強(qiáng)大的功能已為人們深刻認(rèn)識(shí),它已進(jìn)入人類(lèi)社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來(lái)越重要的作用。而當(dāng)今時(shí)代是飛速發(fā)展的信息時(shí)代，各行各業(yè)都離不開(kāi)信息處理。計(jì)算機(jī)的最大好處在于可以利用它進(jìn)行信息管理。使用計(jì)算機(jī)進(jìn)行信息管理，不僅提高了工作效率，而且大大的提高了其安全性。&l

18、t;/p><p>　　超市管理是超市中不可缺少的重要部分，超市的管理信息量繁多，包含很多信息的數(shù)據(jù)管理?，F(xiàn)今，大多數(shù)大型超市商場(chǎng)都使用計(jì)算機(jī)進(jìn)行信息管理，而小型超市商店仍然采用傳統(tǒng)的人工管理方式，這種管理方式存在著許多缺點(diǎn)，如：效率低、工作量大等，而且，隨著購(gòu)買(mǎi)者與超市數(shù)量的增長(zhǎng)，對(duì)于超市的銷(xiāo)售、進(jìn)貨、退貨、交易管理等等，使更新和維護(hù)都帶來(lái)了不少的困難。本系統(tǒng)就是為了改變傳統(tǒng)的超市商店這種現(xiàn)狀所設(shè)計(jì)的。</p&

19、gt;<p>　　使用計(jì)算機(jī)對(duì)超市進(jìn)行管理,有著手工管理所無(wú)法比擬的優(yōu)點(diǎn)。例如:查看迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長(zhǎng)、成本低等。這些優(yōu)點(diǎn)能夠使超市管理進(jìn)入科學(xué)化、正規(guī)化的軌道。</p><p><b>　　1.系統(tǒng)開(kāi)發(fā)工具</b></p><p>　　1.1 Visual Basic簡(jiǎn)介</p><p>　　1

20、.面向?qū)ο蟮目梢暬?</p><p>　　在Visual Basic6.0中，應(yīng)用面向?qū)ο蟮某绦蛟O(shè)計(jì)方法（OOP），把程序和數(shù)據(jù)庫(kù)封裝在一起視為一個(gè)對(duì)象，而且每個(gè)對(duì)象都是可視的，程序員在設(shè)計(jì)時(shí)只需用現(xiàn)有的工具根據(jù)界面設(shè)計(jì)的要求，直接在“窗體”上畫(huà)出諸如“按扭”、“滾動(dòng)條”、“文本框”等不同類(lèi)型的對(duì)象，并為它們?cè)O(shè)置“屬性”編寫(xiě)“事件”代碼即可，從而大大簡(jiǎn)化了設(shè)計(jì)的復(fù)雜度。</p><p>　

21、　2.事件驅(qū)動(dòng)的編程機(jī)制</p><p>　　Visual Basic6.0通過(guò)事件驅(qū)動(dòng)來(lái)執(zhí)行對(duì)象的操作。在事件驅(qū)動(dòng)的程序中，代碼不是按照預(yù)定的路徑執(zhí)行，而是在響應(yīng)不同的事件時(shí)執(zhí)行不同的代碼模塊。每個(gè)對(duì)象都有一個(gè)事件集，每個(gè)事件發(fā)生都要有有相應(yīng)的程序代碼來(lái)響應(yīng)，即要執(zhí)行一段程序代碼。事件可以由用戶(hù)操作觸發(fā)，也可以由操作系統(tǒng)或其他應(yīng)用程序的消息觸發(fā)，甚至可以由應(yīng)用程序本身的消息觸發(fā)。這些事件的順序決定了代碼執(zhí)行的順

22、序，因此應(yīng)用程序每次運(yùn)行時(shí)所經(jīng)過(guò)的代碼的路徑是不同的。在程序設(shè)計(jì)時(shí)，不需要建立明顯的開(kāi)始和結(jié)束的大塊應(yīng)用程序，也不需要指出先執(zhí)行哪部分代碼和按什么順序執(zhí)行代碼，只需編寫(xiě)一些針對(duì)事件的許多小的模塊子程序（也稱(chēng)過(guò)程）。</p><p>　　3.提供強(qiáng)大的數(shù)據(jù)庫(kù)訪(fǎng)問(wèn)工具</p><p>　　隨著計(jì)算機(jī)技術(shù)的發(fā)展，數(shù)據(jù)庫(kù)越來(lái)越顯示出其強(qiáng)大的數(shù)據(jù)存儲(chǔ)和數(shù)據(jù)管理能力。為了滿(mǎn)足人們對(duì)數(shù)據(jù)庫(kù)的需要，Vis

23、ual Basic提供了強(qiáng)大的數(shù)據(jù)庫(kù)程序設(shè)計(jì)能力。它不僅能管理Microsoft Access格式的數(shù)據(jù)庫(kù)，還能訪(fǎng)問(wèn)其他外部數(shù)據(jù)庫(kù)，如FoxPro，Paradox等格式的數(shù)據(jù)庫(kù)。另外，Visual Basic還提供了開(kāi)放式數(shù)據(jù)庫(kù)連接（ODBC）功能，可以通過(guò)直接訪(fǎng)問(wèn)或建立連接的方式使用并操作后臺(tái)大型網(wǎng)絡(luò)數(shù)據(jù)庫(kù)，如SQL Server，Oracle等。在應(yīng)用程序中可以使用結(jié)構(gòu)化查詢(xún)語(yǔ)言（SQL）直接訪(fǎng)問(wèn)Server上的數(shù)據(jù)庫(kù)，并提供簡(jiǎn)單的

24、面向?qū)ο蟮膸?kù)操作命令、多用戶(hù)數(shù)據(jù)庫(kù)的加鎖機(jī)制和網(wǎng)絡(luò)數(shù)據(jù)庫(kù)的編程技術(shù)，為單機(jī)上運(yùn)行的數(shù)據(jù)庫(kù)提供SQL網(wǎng)絡(luò)接口，以便于在分布式環(huán)境中快速而有效地實(shí)現(xiàn)客戶(hù)/服務(wù)器方案。</p><p>　　1.2 Access 2002</p><p>　　1.2.1 Access 2002和數(shù)據(jù)庫(kù)的關(guān)系</p><p>　　Microsoft Access從本質(zhì)上說(shuō)就是一個(gè)數(shù)據(jù)庫(kù)管理系

25、統(tǒng)，具體來(lái)說(shuō)是一個(gè)關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng)（RDBMS）。Access主要用于中小型數(shù)據(jù)庫(kù)系統(tǒng)。它相對(duì)于其他數(shù)據(jù)庫(kù)產(chǎn)品來(lái)說(shuō)開(kāi)發(fā)時(shí)間比較晚，但由于它強(qiáng)大的功能和使用上的方便，使越來(lái)越多的用戶(hù)轉(zhuǎn)向Access，成為當(dāng)今最為通用的數(shù)據(jù)庫(kù)軟件。</p><p>　　2.可行研究和需求分析性</p><p>　　軟件開(kāi)發(fā)最初的工作就是問(wèn)題定義，也就是確定超市中要求解決的問(wèn)題是什么；做好軟件定義時(shí)期的工作是

26、降低軟件成本提高軟件質(zhì)量的關(guān)鍵。在軟件開(kāi)發(fā)的不同階段進(jìn)行修改需要付出的代價(jià)是很不相同的，越在早期改正錯(cuò)誤，付出的代價(jià)就越小，了解了它的重要性之后，我明白前期工作一定要做好才能更好地提高工作效率。我把任務(wù)超市又仔細(xì)地研究了一遍，充分明白了它的要求后，接下來(lái)作可行性研究，只有做好可行性研究才有可能把以后的工作做好。</p><p><b>　　2.1可行性研究</b></p>&l

27、t;p>　　可行性研究的目的就是用最小的代價(jià)在盡可能短的時(shí)間內(nèi)確定問(wèn)題是否能夠解決?？尚行匝芯康哪康牟皇墙鉀Q問(wèn)題，而是確定問(wèn)題是否值得去解決。不能靠主觀(guān)猜想，只能靠客觀(guān)分析。</p><p>　　首先應(yīng)該近一步地分析和澄清問(wèn)題定義，如果正確則進(jìn)一步加以肯定，如果有錯(cuò)則應(yīng)立刻改正，經(jīng)過(guò)仔細(xì)審查，然后從三方面分析它的可行性：</p><p>　　技術(shù)可行性（即使用現(xiàn)有的技術(shù)能實(shí)現(xiàn)這個(gè)系統(tǒng)

28、嗎）：</p><p>　　答案是肯定的，VB功能強(qiáng)大，能用簡(jiǎn)單的方法完成復(fù)雜的問(wèn)題。 </p><p>　　操作可行性（系統(tǒng)的操作方式在這個(gè)用戶(hù)組織能行的通嗎）：</p><p>　　答案是肯定的，本系統(tǒng)操作簡(jiǎn)單，系統(tǒng)的運(yùn)行不需要特定的環(huán)境。</p><p>　　經(jīng)濟(jì)可行性（系統(tǒng)的經(jīng)濟(jì)效益是否能超過(guò)它的開(kāi)發(fā)成本）：</p>&

29、lt;p>　　答案是肯定的，產(chǎn)生的經(jīng)濟(jì)效益遠(yuǎn)超過(guò)它的開(kāi)發(fā)成本。</p><p><b>　　2.2需求分析</b></p><p>　　需求分析是軟件定義時(shí)期的最后一個(gè)階段,它的基本任務(wù)是準(zhǔn)確地回答“系統(tǒng)必須做什么”這個(gè)問(wèn)題，需求分析的任務(wù)還不是確定系統(tǒng)怎樣完成它的工作，而僅僅是確定系統(tǒng)必須完成哪些工作，也就是對(duì)目標(biāo)系統(tǒng)提出完整、準(zhǔn)確、清晰、具體的要求。<

30、/p><p>　　可行性研究階段產(chǎn)生的文檔是需求分析的出發(fā)點(diǎn)。需求分析階段系統(tǒng)本人仔細(xì)研究超市管理系統(tǒng)應(yīng)實(shí)現(xiàn)的功能并將它們具體化。</p><p>　　數(shù)據(jù)字典是關(guān)于數(shù)據(jù)信息的集合，任何字典最主要的用途都是供人查閱對(duì)不了解的條目的解釋?zhuān)瑪?shù)據(jù)字典的作用也正是在軟件分析和設(shè)計(jì)的過(guò)程中給人提供關(guān)于數(shù)據(jù)的描述信息。</p><p>　　針對(duì)一般超市管理系統(tǒng)的需求，通過(guò)對(duì)超市管理

31、工作過(guò)程的內(nèi)容分析與本人所要承擔(dān)的任務(wù)，設(shè)計(jì)出下面的數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)：</p><p>　　(1) 交易管理：包括進(jìn)貨登記、銷(xiāo)貨登記、退貨登記等。其中進(jìn)貨登記中還包含進(jìn)貨商登記，如過(guò)是新的進(jìn)貨廠(chǎng)商，可以直接在此登記入庫(kù)。進(jìn)貨和進(jìn)銷(xiāo)存的主要交易都是在此進(jìn)行。每次交易（包括進(jìn)貨、銷(xiāo)貨和退貨）都需要對(duì)商品名稱(chēng)、生產(chǎn)廠(chǎng)商、商品型號(hào)、單價(jià)、數(shù)量、總金額、交易日期、經(jīng)手業(yè)務(wù)員編號(hào)等各項(xiàng)記錄。在交易過(guò)程中，程序的編寫(xiě)盡可能的方

32、便員工進(jìn)行交易，比如：進(jìn)貨登記時(shí)，如果商品編號(hào)相同，則自動(dòng)添加該商品的其它屬性；銷(xiāo)貨登記時(shí)，用戶(hù)只要輸入商品編號(hào)，該商品的其它屬性即可自動(dòng)出現(xiàn)。退貨登記時(shí)，只要輸入正確的銷(xiāo)貨編號(hào)，其進(jìn)銷(xiāo)存信息也將自動(dòng)列出，盡量的方便了用戶(hù)的操作，同時(shí)對(duì)于登陸的員工編號(hào)程序也自動(dòng)的將其列在進(jìn)貨登記、銷(xiāo)貨登記中，以己防止員工進(jìn)行非正常的交易。</p><p>　　(2) 進(jìn)貨統(tǒng)計(jì)：包括今日進(jìn)貨統(tǒng)計(jì)、本月進(jìn)貨統(tǒng)計(jì)、本季度進(jìn)貨統(tǒng)計(jì)、本季

33、度進(jìn)貨統(tǒng)計(jì)、本年度進(jìn)貨統(tǒng)計(jì)等。其中每次進(jìn)貨統(tǒng)計(jì)都是按進(jìn)貨廠(chǎng)商和進(jìn)貨總金額統(tǒng)計(jì)顯示的。使用一個(gè)表格顯示所選時(shí)間段的全部進(jìn)貨數(shù)據(jù)，包括進(jìn)貨編號(hào)、商品名稱(chēng)等。再使用另一個(gè)表格顯示分別從各個(gè)廠(chǎng)商進(jìn)貨的金額，還有一個(gè)文本框用于顯示次時(shí)間段的進(jìn)貨總金額。</p><p>　　(3) 系統(tǒng)管理:包括更換用戶(hù)、修改密碼、退出系統(tǒng)、與關(guān)與。用戶(hù)在進(jìn)入后可以根據(jù)自己的需要進(jìn)行更改密碼，調(diào)換用戶(hù)重新登錄，退出本系統(tǒng)和一些相關(guān)的相關(guān)本版

34、的信息提示。</p><p>　　(4) 銷(xiāo)售統(tǒng)計(jì)，包含的數(shù)據(jù)項(xiàng)有：銷(xiāo)售編號(hào)、商品編號(hào)、商品名稱(chēng)、生產(chǎn)產(chǎn)商、生產(chǎn)社、銷(xiāo)售年、銷(xiāo)售月、銷(xiāo)售日、業(yè)務(wù)員編號(hào)等等。</p><p>　　查看數(shù)據(jù)表，包含的數(shù)據(jù)項(xiàng)有：進(jìn)貨表、現(xiàn)存商品表、退貨表、銷(xiāo)售表、管理員工表等等。</p><p>　　(6) 系統(tǒng)用戶(hù)信息，包含的數(shù)據(jù)項(xiàng)有：用戶(hù)名、口令、級(jí)別。</p>&

35、lt;p>　　3.系統(tǒng)總體設(shè)計(jì)方案</p><p>　　3.1 系統(tǒng)功能分析</p><p>　　系統(tǒng)開(kāi)發(fā)的總體任務(wù)是實(shí)現(xiàn)各種信息的系統(tǒng)化、規(guī)范化和自動(dòng)化。</p><p>　　系統(tǒng)功能分析是在系統(tǒng)開(kāi)發(fā)的總體任務(wù)的基礎(chǔ)上完成。本人根據(jù)系統(tǒng)需要與任務(wù)的分配要完成的主要任務(wù)與功能有:</p><p>　　對(duì)本系統(tǒng)的登錄模塊的實(shí)現(xiàn)：根據(jù)不同的

36、用戶(hù)權(quán)限來(lái)登錄到主窗體。</p><p>　　對(duì)本統(tǒng)主要界機(jī)的設(shè)計(jì)實(shí)現(xiàn)：在主界面中要實(shí)現(xiàn)五個(gè)彈出菜單；有交易管理菜單，進(jìn)貨統(tǒng)計(jì)菜單，銷(xiāo)售統(tǒng)計(jì)菜單，查看數(shù)據(jù)表菜單，系統(tǒng)管理菜單。</p><p><b>　　3.2數(shù)據(jù)庫(kù)設(shè)計(jì)</b></p><p>　　上面提到的各種功能的實(shí)現(xiàn)都離不開(kāi)數(shù)據(jù)庫(kù)的支持，因此數(shù)據(jù)庫(kù)設(shè)計(jì)作為本系統(tǒng)設(shè)計(jì)的一部分不可缺少。開(kāi)

37、發(fā)本系統(tǒng)中使用的數(shù)據(jù)庫(kù)系統(tǒng)是Windows Access 2000 。從上面的功能分析不難看出本系統(tǒng)需要建立以下幾個(gè)數(shù)據(jù)表：buy表(進(jìn)貨表)、goods表(現(xiàn)存商品表)、sell表(進(jìn)銷(xiāo)存表)、retreat表(退貨表)、employee表(員工表)、manufacturer表(進(jìn)貨商表)。由于數(shù)據(jù)量比較小，所以這些數(shù)據(jù)表都存在一個(gè)數(shù)據(jù)庫(kù)下：sellsystem.mdb </p><p>　　下面對(duì)

38、各個(gè)數(shù)據(jù)表的結(jié)構(gòu)做一下簡(jiǎn)單介紹：</p><p>　　在系統(tǒng)的數(shù)據(jù)庫(kù)設(shè)計(jì)中，進(jìn)貨表、銷(xiāo)貨表、商品庫(kù)存表和退貨表涉及了交易管理三個(gè)子菜單的絕大部分?jǐn)?shù)據(jù)，是本系統(tǒng)數(shù)據(jù)庫(kù)的核心，所以將對(duì)其部分表的設(shè)置列表顯示。</p><p>　　Manufacturer表（進(jìn)貨商表）中包括有廠(chǎng)商編號(hào)、廠(chǎng)商名稱(chēng)、聯(lián)系人姓名、電話(huà)、廠(chǎng)商地址等字段，表略。</p><p>　　employe

39、e（員工表）中包括有員工編號(hào)、員工姓名、員工密碼、員工電話(huà)、員工地址等字段，表略。</p><p>　　buy表（進(jìn)貨表）中包括有進(jìn)貨編號(hào)、商品編號(hào)、商品名稱(chēng)、生產(chǎn)廠(chǎng)商、型號(hào)、數(shù)量、進(jìn)貨價(jià)、進(jìn)貨年、進(jìn)貨月、進(jìn)貨日、總金額、業(yè)務(wù)員編號(hào)等。設(shè)計(jì)該數(shù)據(jù)表的主要目的是方便管理員的查看，使系統(tǒng)的數(shù)據(jù)管理能夠更加層次化。具體設(shè)置如表3-1所示。</p><p><b>　　表3-1 buy表

40、</b></p><p>　　goods表（現(xiàn)存商品表）中包括有商品編號(hào)、生產(chǎn)廠(chǎng)商、商品名稱(chēng)、型號(hào)、進(jìn)貨價(jià)、銷(xiāo)貨價(jià)、數(shù)量、進(jìn)貨年、進(jìn)貨月、進(jìn)貨日、業(yè)務(wù)員編號(hào)、總金額等字段。具體設(shè)置如表3-2所示。</p><p>　　表3-2 goods表</p><p>　　retreat表（退貨表）中包括有退貨編號(hào)、銷(xiāo)貨編號(hào)、生產(chǎn)廠(chǎng)商、商品名稱(chēng)、型號(hào)、單價(jià)、數(shù)量、總

41、金額、退貨年、退貨月、退貨日、業(yè)務(wù)員編號(hào)等。具體設(shè)置如表3-3所示。</p><p>　　表3-3 retreat表</p><p>　　本節(jié)總結(jié)：對(duì)于本超市管理系統(tǒng)功能的實(shí)現(xiàn)，重點(diǎn)和難點(diǎn)有如下幾處：</p><p>　?。?）交易管理模塊：用于管理商品的進(jìn)貨，進(jìn)銷(xiāo)存，退貨登記的操作； </p><p>　?。?）進(jìn)貨統(tǒng)計(jì)管理：主要用于對(duì)商品

42、每日,每月，第季度，每年的進(jìn)貨情況進(jìn)行統(tǒng)計(jì)管理，此功能只有以管理員的身份進(jìn)入時(shí)才為可用狀態(tài)；</p><p>　　（3）銷(xiāo)售統(tǒng)計(jì)管理：主要用于對(duì)商品每日,每月，第季度，每年的進(jìn)銷(xiāo)存情況進(jìn)行統(tǒng)計(jì)管理，此功能只有以管理員的身份進(jìn)入時(shí)才為可用狀態(tài)；</p><p>　?。?）查看數(shù)據(jù)表：主要能查看進(jìn)貨表，商品信息表，進(jìn)銷(xiāo)存表，退貨表等進(jìn)行查看，以實(shí)現(xiàn)對(duì)商品信息的及時(shí)了解。</p>

43、<p>　　3.3 系統(tǒng)功能模塊設(shè)計(jì)</p><p><b>　　交易管理模塊</b></p><p>　　在本模塊中，對(duì)于商品的進(jìn)貨、銷(xiāo)貨和退貨操作時(shí)，都要注意其操作過(guò)程中商品數(shù)量及其它屬性的變化，本人在制作此模塊時(shí)，采用了指導(dǎo)教師提供給我的思想：進(jìn)貨登記時(shí)，將進(jìn)貨信息添加到進(jìn)貨表中。然后對(duì)商品庫(kù)存表的編號(hào)進(jìn)行判斷，如果進(jìn)貨信息的商品編號(hào)存在，則將商品庫(kù)存

44、表中對(duì)應(yīng)記錄的商品數(shù)量做相應(yīng)的調(diào)整；如果商品編號(hào)不存在，則直接將進(jìn)貨信息添加到商品庫(kù)存表中。貨登記時(shí)，先將商品的銷(xiāo)貨信息添加到銷(xiāo)貨表中，然后將商品庫(kù)存表中響應(yīng)的商品的數(shù)量做相應(yīng)的調(diào)整，保證商品數(shù)量的一致性。退貨登記時(shí)將退貨信息添加到退貨表中，然后將退貨數(shù)量從進(jìn)銷(xiāo)存表中減掉，最后將退貨數(shù)量加到商品庫(kù)存。</p><p>　　對(duì)上述各項(xiàng)功能進(jìn)行集中、分塊，按照結(jié)構(gòu)化程序設(shè)計(jì)的要求，得到如圖3.1的系統(tǒng)功能模塊圖。&l

45、t;/p><p><b>　　3.4系統(tǒng)功能介紹</b></p><p>　?。?）登陸窗體: 該登陸窗體對(duì)用戶(hù)登陸做了一個(gè)簡(jiǎn)單的判斷，如果是管理員登陸，則進(jìn)入系統(tǒng)初始化窗體，如果是普通用戶(hù)登陸，則進(jìn)入主界面。</p><p>　　（2） 初始化窗體: 該初始化窗體為本系統(tǒng)的使用者提供了試運(yùn)行服務(wù)，如果使用者試運(yùn)行后決定正式使用，可以通過(guò)管理員登陸

46、本窗體對(duì)系統(tǒng)進(jìn)行初始化，即清空試運(yùn)行階段的所有進(jìn)銷(xiāo)存數(shù)據(jù)。</p><p>　?。?）進(jìn)貨登記窗體: 本窗體用來(lái)實(shí)現(xiàn)商品進(jìn)貨功能，將進(jìn)貨信息添加到buy表，再將該信息選擇性的加入goods表。如果是新的進(jìn)貨廠(chǎng)商，可以在此入庫(kù)登記。</p><p>　?。?） 銷(xiāo)貨登記窗體: 本窗體主要功能是對(duì)商品進(jìn)行進(jìn)銷(xiāo)存，首先對(duì)員工輸入的銷(xiāo)貨信息進(jìn)行完整條件的判斷，條件符合后進(jìn)行進(jìn)銷(xiāo)存。然后將進(jìn)銷(xiāo)存信息

47、存入sell表，并對(duì)goods表的數(shù)量做相應(yīng)修改。 </p><p>　?。?）退貨窗體: 本窗體的功能是實(shí)現(xiàn)商品退貨功能，當(dāng)人為判斷某商品可以退貨時(shí)即可將該商品退貨。</p><p>　?。?）進(jìn)貨統(tǒng)計(jì)菜單: 進(jìn)貨統(tǒng)計(jì)菜單下有4個(gè)子菜單，分別是今日進(jìn)貨統(tǒng)計(jì)、本月進(jìn)貨統(tǒng)計(jì)、本季度進(jìn)貨統(tǒng)計(jì)、今年進(jìn)貨統(tǒng)計(jì)。</p><p>　?。?）銷(xiāo)貨統(tǒng)計(jì)窗體: 進(jìn)銷(xiāo)存統(tǒng)計(jì)菜單下有4

48、個(gè)子菜單，分別是今日銷(xiāo)貨、月銷(xiāo)貨、本季度銷(xiāo)貨、今年銷(xiāo)貨。 </p><p>　　（8）查看進(jìn)貨表: 本窗體的主要設(shè)計(jì)目的是設(shè)置一個(gè)查詢(xún)商品庫(kù)存表的條件 。</p><p>　?。?）管理員工表: 本窗體的制作目的在于方便對(duì)管理員用戶(hù)的管理， 本節(jié)前面曾經(jīng)提過(guò)系統(tǒng)初始化的功能，但其初始化并不能對(duì)員工表進(jìn)行操作，當(dāng)管理員登陸本系統(tǒng)時(shí)，可以訪(fǎng)問(wèn)此窗體，對(duì)用戶(hù)表進(jìn)行維護(hù)。但不能對(duì)管理員進(jìn)行刪除操作

49、，此操作已被本人屏蔽。</p><p>　?。?0）更換用戶(hù)功能: 在一個(gè)商品進(jìn)銷(xiāo)存公司可能會(huì)存在員工交接班的現(xiàn)象，為了方便用戶(hù)交接班的操作順利進(jìn)行，在系統(tǒng)管理模塊中做了一個(gè)更換用戶(hù)子菜單，該子菜單便順利的實(shí)現(xiàn)了此功能，而且它也方便了管理員的登陸管理。</p><p>　　（11）修改密碼: 為了方便用戶(hù)使用，在本模塊中還設(shè)置了一個(gè)修改密碼窗體。該窗體主要包括一個(gè)用戶(hù)名輸入、一個(gè)原密碼輸入

50、和兩個(gè)新密碼輸入。</p><p><b>　　否</b></p><p>　　是 </p><p>　　圖3.1系統(tǒng)功能模塊</p><p>　　4. 系統(tǒng)各模塊的設(shè)計(jì)及實(shí)現(xiàn)</p><p>　　經(jīng)過(guò)了前面的可行性研究和需求分析，現(xiàn)在對(duì)我要完成的功能模塊的實(shí)現(xiàn)做

51、詳細(xì)的設(shè)計(jì)。</p><p>　　4.1用戶(hù)控制模塊及界面詳細(xì)設(shè)計(jì)</p><p>　　登錄窗體如圖4.1所示</p><p><b>　　圖4.1 登錄窗體</b></p><p>　　退出Splash窗體后就進(jìn)入了登錄窗體。輸入相應(yīng)的用戶(hù)名和密碼。如果用戶(hù)的密碼輸錯(cuò)錯(cuò)誤，則不能登錄到系統(tǒng)主窗體；如果用戶(hù)密碼正確，則進(jìn)

52、入系統(tǒng)的MDI主窗體。</p><p><b>　　代碼設(shè)計(jì)：</b></p><p>　　Private Sub Label3_Click()</p><p>　　If Combo1.Text = "" Then</p><p>　　MsgBox "請(qǐng)輸入用戶(hù)名！", vbOKO

53、nly + vbInformation, "注意"</p><p>　　Combo1.SetFocus</p><p><b>　　Exit Sub</b></p><p>　　ElseIf Text1.Text = "" Then</p><p>　　MsgBox "請(qǐng)

54、輸入密碼！", vbOKOnly + vbInformation, "注意"</p><p>　　Text1.SetFocus</p><p><b>　　Exit Sub</b></p><p><b>　　4.2 主窗體</b></p><p><b>

55、　　如圖4.2所示。</b></p><p>　　圖4.2 主窗體 </p><p>　　在MDI主窗體中，設(shè)計(jì)了5項(xiàng)菜單，分別為“交易管理”、“進(jìn)貨統(tǒng)計(jì)”</p><p>　　“銷(xiāo)售統(tǒng)計(jì)”、“查看數(shù)據(jù)表”、“系統(tǒng)管理”、管理員權(quán)限、進(jìn)貨統(tǒng)計(jì)、銷(xiāo)貨統(tǒng)計(jì)、查看數(shù)據(jù)表、系統(tǒng)管理。</p><p><b>　　部分

56、設(shè)計(jì)代碼如下：</b></p><p>　　Private Sub mnBuyMonth_Click()</p><p>　　frmBuyall.Text2.Enabled = False</p><p>　　frmBuyall.SSTab1.Tab = 1</p><p>　　frmBuyall.SSTab1.TabEnable

57、d(0) = False</p><p>　　frmBuyall.SSTab1.TabEnabled(1) = True</p><p>　　frmBuyall.SSTab1.TabEnabled(2) = False</p><p>　　frmBuyall.SSTab1.TabEnabled(3) = False</p><p>　　frm

58、Buyall.Show</p><p>　　strbuy = "select * from buy where 進(jìn)貨年=" & inty & " and 進(jìn)貨月=" & intm & " "</p><p>　　rs_buy.Open strbuy, cnn, adOpenKeyset, adLoc

59、kPessimistic</p><p>　　frmBuyall.Adodc2.RecordSource = strbuy</p><p>　　frmBuyall.Adodc2.Refresh</p><p>　　frmBuyall.DataGrid2.ReBind</p><p>　　If rs_buy.EOF = True Then<

60、;/p><p>　　frmBuyall.Adodc6.RecordSource = strbuy</p><p>　　frmBuyall.Adodc6.Refresh</p><p>　　frmBuyall.DataGrid6.ReBind</p><p>　　MsgBox "您本月沒(méi)有進(jìn)貨記錄！", vbOKOnly + v

61、bInformation, "注意"</p><p>　　rs_buy.Close</p><p>　　strfctotal = "select 生產(chǎn)廠(chǎng)商,sum(總金額) as 各廠(chǎng)商進(jìn)貨總金額 from buy where 進(jìn)貨年=" & inty & " and 進(jìn)貨月=" & intm &

62、" group by 生產(chǎn)廠(chǎng)商"</p><p>　　rs_fctotal.Open strfctotal, cnn, adOpenKeyset, adLockPessimistic</p><p>　　frmBuyall.Adodc6.RecordSource = strfctotal</p><p>　　frmBuyall.Adodc6.Re

63、fresh</p><p>　　frmBuyall.DataGrid6.ReBind</p><p>　　rs_fctotal.Close</p><p>　　strtotal = "select sum(總金額) as 進(jìn)貨總金額 from buy where 進(jìn)貨年=" & inty & " and 進(jìn)貨月=&quo

64、t; & intm & " "</p><p>　　rs_total.Open strtotal, cnn, adOpenKeysetm, adLockPessimistic</p><p>　　frmBuyall.Text2.Text = rs_total.Fields("進(jìn)貨總金額")</p><p>　　

65、rs_total.Close</p><p><b>　　End Sub</b></p><p>　　4.3交易管理模塊及界面設(shè)計(jì)</p><p><b>　　1．進(jìn)貨登記：</b></p><p>　　在進(jìn)貨登記界面（圖4.3）的操作中可以進(jìn)行對(duì)所進(jìn)的商品的信息及生產(chǎn)廠(chǎng)商的相關(guān)信息的添加，清空等操

66、作。</p><p>　　其實(shí)現(xiàn)的部分代碼如下：</p><p>　　下面是對(duì)進(jìn)貨表進(jìn)行添加記錄操作！</p><p>　　str_buy = "select * from buy where 進(jìn)貨編號(hào)='" & Text1.Text & "'"</p><p>　　rs

67、_buy.Open str_buy, cnn, adOpenStatic, adLockOptimistic ' 打開(kāi)進(jìn)貨表</p><p>　　圖4.3 進(jìn)貨登記窗體</p><p>　　If rs_buy.EOF = True Then</p><p>　　rs_buy.AddNew</p><p>　　rs_bu

68、y.Fields("進(jìn)貨編號(hào)") = Text1.Text</p><p>　　rs_buy.Fields("商品名稱(chēng)") = Text3.Text</p><p>　　rs_buy.Fields("生產(chǎn)廠(chǎng)商") = Text4.Text</p><p>　　rs_buy.Fields("型號(hào)&q

69、uot;) = Text5.Text</p><p>　　rs_buy.Fields("數(shù)量") = Val(Text6.Text)</p><p>　　rs_buy.Fields("進(jìn)貨價(jià)") = Val(Text7.Text)</p><p>　　rs_buy.Fields("進(jìn)貨年") = Text9

70、.Text</p><p>　　rs_buy.Fields("進(jìn)貨月") = Text10.Text</p><p>　　rs_buy.Fields("進(jìn)貨日") = Text11.Text</p><p>　　rs_buy.Fields("業(yè)務(wù)員編號(hào)") = Text12.Text</p>

71、<p>　　rs_buy.Fields("總金額") = Val(Text13.Text)</p><p>　　rs_buy.Update</p><p>　　rs_buy.Close 關(guān)閉進(jìn)貨表</p><p><b>　　Else</b></p><p>　　MsgBox "此

72、進(jìn)貨編號(hào)已存在，請(qǐng)重添！", vbOKOnly + vbInformation, "注意"</p><p>　　Text1.Text = ""</p><p>　　Text1.SetFocus</p><p>　　rs_buy.Close</p><p>　　Exit Sub

73、 ' 關(guān)閉進(jìn)貨表</p><p><b>　　End If</b></p><p>　　'下面是對(duì)商品庫(kù)存表進(jìn)行入庫(kù)操作！</p><p>　　Dim sql As String</p><p>　　sql = &

74、quot;select * from goods where 商品編號(hào) = '" & Text2.Text & "'"</p><p>　　rs_goods.Open sql, cnn, adOpenStatic, adLockOptimistic</p><p>　　If rs_goods.EOF = True Then<

75、;/p><p>　　rs_goods.Close</p><p>　　str_goods = "select * from goods"</p><p>　　rs_goods.Open str_goods, cnn, adOpenStatic, adLockOptimistic ' 打開(kāi)庫(kù)存表</p><p>　　rs

76、_goods.AddNew</p><p>　　rs_goods.Fields("商品編號(hào)") = Text2.Text</p><p>　　rs_goods.Fields("商品名稱(chēng)") = Text3.Text</p><p>　　rs_goods.Fields("生產(chǎn)廠(chǎng)商") = Text4.Text

77、</p><p>　　rs_goods.Fields("型號(hào)") = Text5.Text</p><p>　　rs_goods.Fields("數(shù)量") = Val(Text6.Text)</p><p>　　rs_goods.Fields("進(jìn)貨價(jià)") = Val(Text7.Text)</p&g

78、t;<p>　　rs_goods.Fields("銷(xiāo)貨價(jià)") = Val(Text8.Text)</p><p>　　rs_goods.Update</p><p>　　MsgBox "商品入庫(kù)成功", vbOKOnly + vbExclamation, ""</p><p>　　rs_goo

79、ds.Close ' 關(guān)閉庫(kù)存表</p><p><b>　　Else</b></p><p>　　numgoods = rs_goods.Fields("數(shù)量")</p><p>　　rs_goods.Fields(&qu

80、ot;數(shù)量") = Val(Text6.Text) + numgoods</p><p>　　rs_goods.Update</p><p>　　MsgBox "商品入庫(kù)成功", vbOKOnly + vbExclamation, ""關(guān)閉庫(kù)存表</p><p>　　rs_goods.Close

81、 ' End If</p><p><b>　　End Sub</b></p><p><b>　　銷(xiāo)售登記：</b></p><p>　　對(duì)銷(xiāo)售的商品進(jìn)行相關(guān)信息的登記（界面如圖4.4），并進(jìn)行行銷(xiāo)售金額的計(jì)算。其部分設(shè)計(jì)代碼如下：<

82、;/p><p>　　圖4.4 銷(xiāo)售登記窗體.</p><p>　　Private Sub Command1_Click()</p><p>　　If Text1.Text = "" Then</p><p>　　MsgBox "請(qǐng)?zhí)顚?xiě)銷(xiāo)貨編號(hào)！", vbOKOnly + vbInformation, &qu

83、ot;注意"</p><p>　　Text1.SetFocus</p><p><b>　　Exit Sub</b></p><p>　　ElseIf Text2.Text = "" Then</p><p>　　MsgBox "請(qǐng)?zhí)顚?xiě)商品編號(hào)！", vbOKOnly +

84、 vbInformation, "注意"</p><p>　　Text2.SetFocus</p><p><b>　　Exit Sub</b></p><p><b>　　End If</b></p><p>　　str_goods = "select * from

85、goods where 商品編號(hào)='" & Text2.Text & "'"</p><p>　　rs_goods.Open str_goods, cnn, adOpenStatic, adLockOptimistic</p><p>　　If rs_goods.EOF = True Then</p><p&

86、gt;　　MsgBox "對(duì)不起，此商品型號(hào)已無(wú)貨！請(qǐng)選擇其他型！", vbOKOnly + vbInformation, "注意"</p><p>　　rs_goods.Close</p><p><b>　　Exit Sub</b></p><p><b>　　3． 退貨登記：</b&

87、gt;</p><p>　　對(duì)退貨的相關(guān)信息進(jìn)行記,操作界面如圖4.5所示。如商品名，編號(hào)，價(jià)格，退貨員，數(shù)量，金額</p><p><b>　　時(shí)間等等進(jìn)行登記。</b></p><p><b>　　其部分實(shí)代碼如下：</b></p><p>　　圖4.5 退貨信息窗體</p>&l

88、t;p>　　Private Sub Command1_Click()</p><p>　　If Text1.Text = "" Then</p><p>　　MsgBox "請(qǐng)?zhí)顚?xiě)退貨編號(hào)！", vbOKOnly + vbInformation, "注意"</p><p>　　Text1.SetFoc

89、us</p><p><b>　　Exit Sub</b></p><p>　　ElseIf Text2.Text = "" Then</p><p>　　MsgBox "請(qǐng)?zhí)顚?xiě)銷(xiāo)貨編號(hào)！", vbOKOnly + vbInformation, "注意"</p><

90、p>　　Text2.SetFocus</p><p><b>　　Exit Sub</b></p><p>　　ElseIf Text11.Text = "" Then</p><p>　　MsgBox "請(qǐng)?zhí)顚?xiě)商品數(shù)量！", vbOKOnly + vbInformation, "注意&q

91、uot;</p><p>　　Text11.SetFocus</p><p><b>　　Exit Sub</b></p><p><b>　　End If</b></p><p>　　'下面是對(duì)銷(xiāo)售表進(jìn)行操作!</p><p>　　str_sell = "

92、select * from sell where 銷(xiāo)貨編號(hào)='" & Text2.Text & "'"</p><p>　　rs_sell.Open str_sell, cnn, adOpenStatic, adLockOptimistic</p><p>　　If rs_sell.EOF = True Then</p&g

93、t;<p>　　MsgBox "對(duì)不起，沒(méi)有銷(xiāo)售此商品型號(hào)！無(wú)法退貨！", vbOKOnly + vbInformation, "注意"</p><p>　　rs_sell.Close</p><p><b>　　Exit Sub</b></p><p>　　ElseIf rs_sell.F

94、ields("數(shù)量") < Val(Text11.Text) Then</p><p>　　MsgBox "對(duì)不起，退貨數(shù)量過(guò)大，無(wú)法退貨！", vbOKOnly + vbInformation, "注意"</p><p>　　rs_sell.Close</p><p><b>　　Exit

95、 Sub</b></p><p>　　4．4 進(jìn)貨統(tǒng)計(jì)模塊及界面設(shè)計(jì)</p><p>　　圖4.6 進(jìn)貨統(tǒng)計(jì)窗體</p><p>　　操作界面如圖4.6,主要用于對(duì)商品每日,每月，第季度，每年的進(jìn)貨情況進(jìn)行統(tǒng)計(jì)管理，此功能只有以管理員的身份進(jìn)入時(shí)才為可用狀態(tài)。</p><p>　　其部分設(shè)計(jì)代碼如下：</p><

96、;p>　　Private Sub Form_Load()</p><p>　　inty = Year(Date)</p><p>　　intm = Month(Date)</p><p>　　intd = Day(Date)</p><p>　　Dim str As String</p><p>　　str =

97、"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\sellsystem.mdb;"</p><p>　　'Adodc1的相對(duì)路徑連接</p><p>　　Adodc1.ConnectionString = str</p><p>

98、;　　Adodc1.CommandType = adCmdText</p><p>　　Adodc1.RecordSource = "select * from buy where 進(jìn)貨年=" & inty & " and 進(jìn)貨月=" & intm & " and 進(jìn)貨日=" & intd & "

99、 "</p><p>　　Adodc1.Refresh</p><p>　　Set DataGrid1.DataSource = Adodc1</p><p>　　DataGrid1.Refresh</p><p>　　'Adodc2的相對(duì)路徑連接</p><p>　　Adodc2.Connectio

100、nString = str</p><p>　　Adodc2.CommandType = adCmdText</p><p>　　Adodc2.RecordSource = "select * from buy where 進(jìn)貨年=" & inty & " and 進(jìn)貨月=" & intm & ""

101、</p><p>　　Adodc2.Refresh</p><p>　　Set DataGrid2.DataSource = Adodc2</p><p>　　DataGrid2.Refresh</p><p>　　4．5銷(xiāo)售統(tǒng)計(jì)模塊及界面設(shè)計(jì)</p><p>　　圖4.7 進(jìn)貨統(tǒng)計(jì)窗體</p><

102、p>　　進(jìn)貨統(tǒng)計(jì)窗體如圖4.7所示，主要用于對(duì)商品每日,每月，第季度，每年的進(jìn)銷(xiāo)存情況進(jìn)行統(tǒng)計(jì)管理，此功能只有以管理員的身份進(jìn)入時(shí)才為可用狀態(tài)。</p><p>　　其部分設(shè)計(jì)代碼如下：</p><p>　　Private Sub Form_Load()</p><p>　　inty = Year(Date)</p><p>　　int

103、m = Month(Date)</p><p>　　intd = Day(Date)</p><p>　　Text1.Enabled = False</p><p>　　Text2.Enabled = False</p><p>　　Text3.Enabled = False</p><p>　　Text4.Enabl

104、ed = False</p><p>　　Dim str As String</p><p>　　str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\sellsystem.mdb;"</p><p>　　Adodc1.Conn

105、ectionString = str</p><p>　　Adodc1.CommandType = adCmdText</p><p>　　Adodc1.RecordSource = "select * from sell where 銷(xiāo)售年=" & inty & " and 銷(xiāo)售月=" & intm & "

106、 and 銷(xiāo)售日=" & intd & " "</p><p>　　Adodc1.Refresh</p><p>　　Set DataGrid1.DataSource = Adodc1</p><p>　　DataGrid1.Refresh</p><p>　　Adodc2.ConnectionS

107、tring = str</p><p>　　Adodc2.CommandType = adCmdText</p><p>　　Adodc2.RecordSource = "select * from sell where 銷(xiāo)售年=" & inty & " and 銷(xiāo)售月=" & intm & ""&

108、lt;/p><p>　　Adodc2.Refresh</p><p>　　Set DataGrid2.DataSource = Adodc2</p><p>　　DataGrid2.Refresh</p><p>　　4．6修改密碼模塊及界面設(shè)計(jì)</p><p>　　圖4.8 修改密碼窗體</p><p

109、>　　修改密碼窗體如圖4.8所示。在這個(gè)模塊中，用戶(hù)可以進(jìn)行自己密碼的修改，確保用戶(hù)信息和安全性。其部分設(shè)計(jì)代碼如下：</p><p>　　Private Sub Command1_Click()</p><p>　　If Text1.Text = "" Then</p><p>　　MsgBox "請(qǐng)?zhí)顚?xiě)用戶(hù)名！",

110、vbOKOnly + vbInformation, "注意"</p><p>　　Text1.SetFocus</p><p><b>　　Exit Sub</b></p><p>　　ElseIf Text2.Text = "" Then</p><p>　　MsgBox &qu

111、ot;請(qǐng)?zhí)顚?xiě)原密碼！", vbOKOnly + vbInformation, "注意"</p><p>　　Text2.SetFocus</p><p><b>　　Exit Sub</b></p><p>　　ElseIf Text3.Text = "" Then</p><

112、;p>　　MsgBox "請(qǐng)?zhí)顚?xiě)新密碼！", vbOKOnly + vbInformation, "注意"</p><p>　　Text3.SetFocus</p><p><b>　　Exit Sub</b></p><p>　　ElseIf Text4.Text = "" T

113、hen</p><p>　　MsgBox "請(qǐng)?zhí)顚?xiě)新密碼！", vbOKOnly + vbInformation, "注意"</p><p>　　Text4.SetFocus</p><p><b>　　Exit Sub</b></p><p><b>　　結(jié) 論&l

114、t;/b></p><p>　　剛開(kāi)始設(shè)計(jì)超市管理系統(tǒng)的時(shí)候，我對(duì)VB幾乎沒(méi)有什么接觸，在老師和一些專(zhuān)業(yè)超市書(shū)籍的幫助下，讓我入了門(mén)，開(kāi)始了對(duì)超市管理系統(tǒng)的設(shè)計(jì)。</p><p>　　在不斷的學(xué)習(xí)與改進(jìn)中我體會(huì)到：</p><p>　　1.做畢業(yè)設(shè)計(jì)本身也是一個(gè)學(xué)習(xí)新鮮事物的過(guò)程，從設(shè)計(jì)初的不懂到最后順利完成設(shè)計(jì)，我體會(huì)到在實(shí)踐中學(xué)習(xí)的重要性，我想這對(duì)于我以后

115、的工作受益匪淺。</p><p>　　2.設(shè)計(jì)的過(guò)程是漫長(zhǎng)而困難重重的，設(shè)計(jì)過(guò)程中需要理論與實(shí)際的結(jié)合，這就要求有扎實(shí)的理論知識(shí)，靈活的頭腦，我本身所做的設(shè)計(jì)并不算十分復(fù)雜，但由于以前沒(méi)有獨(dú)立做過(guò)系統(tǒng)所以剛開(kāi)始時(shí)有點(diǎn)亂，好在有老師的幫助，我很快理清了思路，找到了自己的出發(fā)點(diǎn)。</p><p>　　3.由于前期工作的不徹底，對(duì)系統(tǒng)的需求分析的要求認(rèn)識(shí)不夠清楚，使得后續(xù)的工作不得不經(jīng)常返回去修

116、改數(shù)據(jù)表和個(gè)別代碼。使我體會(huì)到在設(shè)計(jì)中的每一步的重要性，如果上一個(gè)步驟不能很好的完成，在后續(xù)的設(shè)計(jì)將會(huì)付出幾倍的代價(jià)。</p><p>　　總之，經(jīng)過(guò)這么長(zhǎng)時(shí)間的設(shè)計(jì)，我與我的同學(xué)鐘佳洧、周志強(qiáng)、鄒春燕完成了這個(gè)一個(gè)功能比較完善的超市管理系統(tǒng)。我深刻體會(huì)到要做好一個(gè)完整的事情，需要有系統(tǒng)的思維方式和方法，還要有一個(gè)團(tuán)隊(duì)合作的精神。對(duì)待一個(gè)新的問(wèn)題，要耐心、要細(xì)心，也要有很好的團(tuán)結(jié)，共同努力的團(tuán)隊(duì)協(xié)作精神。<

117、/p><p><b>　　致 謝</b></p><p>　　在完成畢業(yè)設(shè)計(jì)的過(guò)程中，我得到了許多老師和同學(xué)的幫助，尤其是我的指導(dǎo)老師歐陽(yáng)迎春老師，在程序設(shè)計(jì)和論文寫(xiě)作上對(duì)我悉心指導(dǎo)，在我有疑問(wèn)的時(shí)候，歐陽(yáng)迎春老師都會(huì)耐心解答，使我們的設(shè)計(jì)有條不紊的進(jìn)行，令我受益匪淺。在此向老師和同學(xué)表示最衷心的感謝。還有我的合作伙伴周志強(qiáng)等同學(xué)，在設(shè)計(jì)過(guò)程中給于我很多的幫助，在此也表

118、示感謝。</p><p><b>　　參考文獻(xiàn)</b></p><p>　　[1]馬正元. Visual Basic程序設(shè)計(jì)教程[M]. 濟(jì)南：山東大學(xué)出版社.2002.</p><p>　　[2]郭勝. Visual Basic數(shù)據(jù)庫(kù)開(kāi)發(fā)入門(mén)與范例解析[M].北京：機(jī)械工業(yè)出版社.2004.</p><p>　　[3]

119、毛文毅等. 中文Access 2002應(yīng)用基礎(chǔ)教程[M]. 北京：冶金工業(yè)出版社.2002.</p><p>　　[4]薩師煊. 數(shù)據(jù)庫(kù)系統(tǒng)概論 北京：高等教育出版社[M].2000.</p><p>　　[5]張海藩. 軟件工程導(dǎo)論 北京：清華大學(xué)出版社[M].1998.</p><p>　　[6] 孫淮寧 王峻.基于VB高校通用遠(yuǎn)程事務(wù)管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)[J]

120、.淮南師范學(xué)院學(xué)報(bào)，2004,22(3),23-25.</p><p>　　[7]Robort H Theory of the Back-propagation Neutal network[M]. Proc VCNN.Washington D C,1989(1).</p><p>　　[8] 冒紅,王連春, 徐玉梅.高校學(xué)籍檔案信息管理系統(tǒng)的開(kāi)發(fā)[J].洛陽(yáng)工業(yè)高等專(zhuān)科學(xué)校學(xué)報(bào)，[J]

121、2004,23 (3),35-38 .</p><p>　　[9] 薛貴軍.冶金企業(yè)對(duì)標(biāo)信息管理系統(tǒng).[J]工業(yè)計(jì)量，2004,24(2),22-25 .</p><p>　　[10] 盧文喜, 李娟.基于GIS的城市綠地信息系統(tǒng)設(shè)計(jì)和研制——以長(zhǎng)春市城區(qū)為例[J].東北師大學(xué)報(bào)(自然科學(xué)版)，2004,28(4),44-47.</p><p>　　[11]魯榮江等

122、. Visual Basic項(xiàng)目案例導(dǎo)航 [M].北京：科學(xué)出版社.2002.</p><p>　　[12] [美] Jeffrey D.Ullman. Basic study of Database[M]. 北京： 機(jī)械工業(yè)出版社.1998.</p><p>　　[13] 計(jì)算機(jī)世界網(wǎng). http://www2.ccw.com.cn.</p><p>　　（英）I

123、an Sommerville.軟件工程（原書(shū)第6版）[M].北京:機(jī)械工業(yè)出版社,2003.</p><p>　　[14]（美）西爾伯莎茨.數(shù)據(jù)庫(kù)系統(tǒng)概念 第4版[M].北京:高等教育出版社,2003.</p><p>　　[15] 任平, 高敏, 姚樹(shù)海, 胡鋼 .基于C/S結(jié)構(gòu)的綜合信息管理系統(tǒng)的開(kāi)發(fā)與應(yīng)用.[J]河海大學(xué)常州分校學(xué)報(bào)，2004,29(3),42-45.</p&g