2023年全國碩士研究生考試考研英語一試題真題(含答案詳解+作文范文)_第1頁
已閱讀1頁,還剩43頁未讀, 繼續(xù)免費閱讀

下載本文檔

版權說明:本文檔由用戶提供并上傳,收益歸屬內容提供方,若內容存在侵權,請進行舉報或認領

文檔簡介

1、<p><b>  摘 要</b></p><p>  圖書管理系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護以及前端應用程序的開發(fā)兩個方面,一方面要求建立起數(shù)據(jù)一致性和完整性強、數(shù)據(jù)安全性好的庫;另一方面則要求應用程序功能完備,易使用等特點。</p><p>  本文介紹了數(shù)據(jù)庫管理系統(tǒng)的基本設計方法,詳細闡述了整個應用系統(tǒng)的設計

2、思路,并對各部分設計周期進行了詳盡的分析,最終達成了一個完整的設計方案;在文章的最后,還根據(jù)數(shù)據(jù)庫系統(tǒng)的調試結果,提出了可以進一步改進的部分,以便在投入實際應用后系統(tǒng)可以更加穩(wěn)定可靠的工作。</p><p>  本文的數(shù)據(jù)庫系統(tǒng)是一個圖書管理系統(tǒng),面向中小型書店、個體書店進行全面的人員、物流管理,旨在實現(xiàn)書店管理信息化。本系統(tǒng)采用會員制管理,將人員分為經(jīng)理、倉庫管理員、售書員、會員、游客等,分別擁有不同的權限,各

3、司其職,以便提高工作效率。系統(tǒng)功能包括:供應商管理、進書管理、圖書資料管理、售書管理、會員管理、庫存統(tǒng)計、售書統(tǒng)計、退貨統(tǒng)計、基本統(tǒng)計分析等。 </p><p>  用戶權限:一、經(jīng)理權限:主要包括各種統(tǒng)計分析、員工管理、制定會員政策等等。二、倉庫管理員權限:包含進書管理、供應商管理、庫存管理、退貨管理等。三、售書員權限:包含售書管理、會員管理等。</p><p>  因此本人結合設計的要

4、求,對Access數(shù)據(jù)庫、VB應用程序設計進行了較深入的學習和應用,主要完成對圖書管理系統(tǒng)的需求分析、功能模塊劃分、數(shù)據(jù)庫模式分析,并由此設計了數(shù)據(jù)庫結構和應用程序。本文所設計的圖書管理系統(tǒng)可以滿足經(jīng)理、倉庫管理員、售書員、會員、游客的需要。本文首先分析了圖書管理信息系統(tǒng)的應用需求,按照數(shù)據(jù)庫設計理論一步一步地給出了系統(tǒng)需求說明書、局部ER圖、全局ER圖、系統(tǒng)關系模式,子模式,建立了數(shù)據(jù)庫.然后進行了具體的程序設計,實現(xiàn)了數(shù)據(jù)庫表的瀏覽

5、,記錄的添加、刪除和修改,報表的生成,實現(xiàn)了多數(shù)據(jù)庫表的連接操作,實現(xiàn)了條件查詢和模糊查詢,并靈活實現(xiàn)了對不可更新查詢結果集的更新操作,實現(xiàn)了主從表操作,實現(xiàn)了密碼維護功能,設計充分利用Visual Basic的強大力量,提高了編程效率和可靠性。</p><p><b>  目 錄</b></p><p><b>  摘要</b></p&g

6、t;<p>  第一章、數(shù)據(jù)庫系統(tǒng)設計</p><p>  1.1數(shù)據(jù)庫設計概述</p><p>  1.2數(shù)據(jù)庫設計周期</p><p>  第二章、圖書管理系統(tǒng)具體設計</p><p>  2.1 圖書管理系統(tǒng)總體規(guī)劃</p><p><b>  2.2需求分析</b></

7、p><p><b>  2.3概念設計</b></p><p><b>  2.4數(shù)據(jù)庫的實現(xiàn)</b></p><p>  第三章、圖書管理系統(tǒng)應用程序設計(經(jīng)理模塊)</p><p><b>  3.1員工管理</b></p><p><b> 

8、 3.2個人資料</b></p><p><b>  3.3會員政策</b></p><p><b>  3.4統(tǒng)計分析</b></p><p><b>  3.5圖書檢索</b></p><p><b>  3.6書店情況</b></p

9、><p><b>  3.7客戶反饋</b></p><p>  3.8會員、游客模塊的基本介紹</p><p><b>  第四章、結束語</b></p><p><b>  附錄</b></p><p><b>  參考文獻</b>

10、</p><p><b>  關鍵字</b></p><p>  圖書管理系統(tǒng),Visual Basic,Access數(shù)據(jù)庫 </p><p>  第一章 數(shù)據(jù)庫系統(tǒng)設計</p><p>  1.1數(shù)據(jù)庫設計概述</p><p>  計算機信息系統(tǒng)以數(shù)據(jù)庫為核心,在數(shù)據(jù)庫管理系統(tǒng)的支持下,進行信息

11、的收集、整理、存儲、檢索、更新、加工、統(tǒng)計和傳播等操作。</p><p>  對于數(shù)據(jù)庫應用開發(fā)人員來說,為使現(xiàn)實世界的信息流計算機話,并對計算機話的信息進行各種操作,就是如何利用數(shù)據(jù)庫管理系統(tǒng)、系統(tǒng)軟件和相關硬件系統(tǒng),將用戶的要求轉化成有效的數(shù)據(jù)結構,并使數(shù)據(jù)庫結構易于實現(xiàn)用戶新的要求的過程。</p><p>  確切的說,數(shù)據(jù)庫設計是指對于一個給定的應用環(huán)境,提供一個確定最優(yōu)數(shù)據(jù)模型與

12、處理模式的邏輯設計,以及一個確定數(shù)據(jù)庫存儲結構與存取方法的物理設計,建立起既能反映現(xiàn)實世界信息和信息聯(lián)系,滿足用戶數(shù)據(jù)要求和加工要求,有能被某個數(shù)據(jù)庫管理系統(tǒng)所接受,同時能實現(xiàn)系統(tǒng)目標,并有效存取數(shù)據(jù)的數(shù)據(jù)庫。</p><p>  1.2數(shù)據(jù)庫設計周期</p><p>  根據(jù)軟件工程的思想,數(shù)據(jù)庫設計的周期可以劃分為六個階段:</p><p> ?。?)規(guī)劃階段:

13、確定開發(fā)的總目標,給出計劃開發(fā)的軟件系統(tǒng)的功能、性能、可靠性以及接等方面的設想。 </p><p> ?。?)需求分析階段:認真細致地了解用戶對數(shù)據(jù)的加工要求,確定系統(tǒng)的功能與邊界。本階段的最終結果,提供一個可作為設計基礎的系統(tǒng)說明書,包括對軟硬件環(huán)境的要求和一整套完善的數(shù)據(jù)流程圖。</p><p>  (3)設計階段:把需求分析階段所確定的功能細化,主要工作是概念設計階段、邏輯設計階段、

14、物理設計階段,然后,對每個階段內部設計詳細的流程。 </p><p>  (4)程序編制階段:以一種或幾種特定的程序設計語言表達上一階段確定的各模塊控制流程。程序編制時應遵循結構化程序設計方法。</p><p> ?。?)調試階段:對已編好的程序進行單元調試(分調),整體調試(聯(lián)調)和系統(tǒng)測試(驗收)。</p><p> ?。?)運行和維護階段:這是整個設計周期最長

15、的階段,其工作重點是收集和記錄系統(tǒng)實際運行的數(shù)據(jù)。在運行中,必須保持數(shù)據(jù)庫的完整性,必須有效的處理數(shù)據(jù)故障和進行數(shù)據(jù)庫恢復。同時解決開發(fā)過程的遺留問題,改正錯誤進行功能完善。</p><p>  第二章 圖書管理系統(tǒng)具體設計</p><p>  2.1圖書管理系統(tǒng)總體規(guī)劃</p><p>  對于數(shù)據(jù)庫系統(tǒng),規(guī)劃工作是十分必要的。規(guī)劃的好壞將直接影響到整個圖書管理

16、系統(tǒng)的成功與否,數(shù)據(jù)庫設計中的規(guī)劃階段的主要任務是建立數(shù)據(jù)庫的必要性及可行性分析,確定數(shù)據(jù)庫系統(tǒng)在整個圖書管理系統(tǒng)的地位。</p><p>  根據(jù)圖書管理數(shù)據(jù)庫對技術人員和管理人員的水平、數(shù)據(jù)采集和管理活動以及計算機素質的要求;數(shù)據(jù)庫技術對計算機系統(tǒng)的軟硬件的要求。決定把數(shù)據(jù)庫管理系統(tǒng)設計成為一個綜合的數(shù)據(jù)庫。此數(shù)據(jù)庫包括所有操作人員的所有活動功能。所以,用一個綜合的數(shù)據(jù)庫就能滿足圖書管理要求,而且實現(xiàn)容易。&

17、lt;/p><p>  本圖書管理系統(tǒng)采用會員制管理,將人員分為經(jīng)理、倉庫管理員、售書員、會員、游客等,分別擁有不同的權限,各司其職,以便提高工作效率。系統(tǒng)功能包括:供應商管理、進書管理、圖書資料管理、售書管理、會員管理、庫存統(tǒng)計、售書統(tǒng)計、退貨統(tǒng)計、基本統(tǒng)計分析等。通過這個系統(tǒng)經(jīng)理可以對書店進行各種統(tǒng)計分析、員工管理、制定會員政策等等;倉庫管理員可以進行進書管理、供應商管理、庫存管理、退貨管理等;售書員可以進行售書

18、管理、會員管理等。而會員和普通消費者可以進行圖書的瀏覽、注冊會員、會員資料的修改等。</p><p><b>  2.2 需求分析</b></p><p>  設計一個性能良好的數(shù)據(jù)庫系統(tǒng),明確應用環(huán)境對系統(tǒng)的要求是首要的和最基本的。特別是數(shù)據(jù)應用非常廣泛,非常復雜,要是事先沒有對信息進行充分和細致的分析,這種設計就很難取得成功。</p><p&g

19、t;  通過需求分析階段對圖書管理系統(tǒng)的整個應用情況作全面的、詳細的調查,確定圖書管理的目標,收集支持系統(tǒng)總的設計目標的基礎數(shù)據(jù)和對這些數(shù)據(jù)的要求,確定用戶的需求,并把這些寫成用戶和數(shù)據(jù)庫設計者都能夠接受的文檔。</p><p>  事實上,需求分析是數(shù)據(jù)庫開發(fā)中最難的任務之一。因為,第一,系統(tǒng)本身是可變的,用戶的需求必須不斷調整,使之與這種變化相適應。第二,用戶很難說清某部分工作的功能處理過程。所以,設計人員必

20、須認識到:在整個需求分析以及系統(tǒng)設計過程中,用戶參與的重要性,通過各種方法展開調查分析。</p><p>  本圖書管理系統(tǒng)滿足五方面的需求,分別是經(jīng)理管理、倉庫管理員管理、售書員管理、會員查詢、游客注冊查詢。經(jīng)理管理對書店進行各種統(tǒng)計分析、員工管理、制定會員政策等等;倉庫管理員管理進行進書管理、供應商管理、庫存管理、退貨管理等;售書員管理進行售書管理、會員管理等;會員管理進行圖書的瀏覽、資料修改等;游客進行圖書

21、的瀏覽、注冊會員等。</p><p><b>  2.3 概念設計</b></p><p>  在概念設計階段中,設計人員從用戶的角度看待數(shù)據(jù)及處理要求和約束,產(chǎn)生一個反映用戶觀點的概念模式。然后再把概念模式轉換成邏輯模 式。將概念設計從設計過程中獨立開來,使各階段的任務相對單一化,設計復雜程度大大降低,不受特定DBMS的限制。</p><p&g

22、t;  利用ER方法進行數(shù)據(jù)庫的概念設計,可分成三步進行:首先設計局部ER模式,然后把各局部ER模式綜合成一個全局模式,最后對全局ER模式進 行優(yōu)化,得到最終的模式,即概念模式。</p><p> ?。?)設計局部ER模式</p><p><b>  實體和屬性的定義:</b></p><p>  圖書(圖書編號,圖書分類號,圖書名稱,叢書,作

23、者,出版社,版次,ISBN,定價,庫存量,內容介紹,關鍵詞,出版日期,入庫日期)</p><p>  圖書分類(圖書分類號,圖書分類,所屬父類編號)</p><p>  供應商(供應商編號,供應商,地址,網(wǎng)址,聯(lián)系人,電話,傳真,電子郵件)</p><p>  會員(會員卡號,會員等級,姓名,性別,地址,單位,電話,電子郵件,人生格言,注冊日期)</p>

24、<p>  會員政策(會員級別,會員標準,打折,贈送禮品,備注)</p><p>  員工(員工帳號,姓名,性別,地址,電話,手機,電子郵件,人生格言,創(chuàng)建日期)</p><p>  身份(用戶ID,用戶密碼,用戶身份)</p><p>  ER模型的“聯(lián)系”用于刻畫實體之間的關聯(lián)。一種完整的方式是對局部結構中任意兩個實體類型,依據(jù)需求分析的結果,考察

25、局部結構中任意 兩個實體類型之間是否存在聯(lián)系。若有聯(lián)系,進一步確定是1:N,M:N,還是1:1等。還要考察一個實體類型內部是否存在聯(lián)系,兩個實體類型之 間是否存在聯(lián)系,多個實體類型之間是否存在聯(lián)系,等等。解釋如下:</p><p>  u 一個用戶只能具有一種身份,而一種身份可被多個借閱者所具有;</p><p>  u 一本圖書只能屬于一種圖書類別(類別),而一種圖書類別可以包含多本圖書

26、。</p><p> ?。?)設計全局ER模式</p><p>  所有局部ER模式都設計好了后,接下來就是把它們綜合成單一的全局概念結構。全局概念結構不僅要支持所有局部ER模式,而且必須合理地表示一個完整、一致的數(shù)據(jù)庫概念結構。</p><p>  1)確定公共實體類型:為了給多個局部ER模式的合并提供開始合并的基礎,首先要確定各局部結構中的公共實體類型。在這一步

27、中我們僅根據(jù)實體類型名和鍵來認定公共實體類型。一般把同名實體類型作為公共實體類型的一類候選,把具有相同鍵的實體類型作為公共實體類型的另一類候選。</p><p>  2)局部ER模式的合并:合并的原則是:首先進行兩兩合并;先和合并那些現(xiàn)實世界中有聯(lián)系的局部結構;合并從公共實體類型開始,最后再加入獨立的局部結構。</p><p>  3)消除沖突:沖突分為三類:屬性沖突、結構沖突、命名沖突。

28、</p><p>  設計全局ER模式的目的不在于把若干局部ER模式形式上合并為一個ER模式,而在于消除沖突,使之成為能夠被所有用戶共同理解和接受的同一的概念模型。</p><p> ?。?)全局ER模式的優(yōu)化:在得到全局ER模式后,為了提高數(shù)據(jù)庫系統(tǒng)的效率,還應進一步依據(jù)處理需求對ER模式進行優(yōu)化。一個好的全局ER模式,除能準確、全面地反映用戶功能需求外,還應滿足下列條件:實體類型的個數(shù)

29、要盡可能的少;實體類型所含屬性個數(shù)盡可能少;實體類型間聯(lián)系無冗余。</p><p>  2.4 數(shù)據(jù)庫的實現(xiàn)</p><p>  我選用Microsoft Office Access 2003來進行數(shù)據(jù)庫的邏輯設計。首先創(chuàng)建十三個基本數(shù)據(jù)庫表如表2-1-2-13所示,然后根據(jù)全局ER 圖,建立各個表之間的聯(lián)系,如表2-14所示。</p><p>  表2-1 用戶

30、身份表的結構(Admin)</p><p>  表2-2 圖書信息表的結構(Book)</p><p>  表2-3 供應商信息表的結構(供應商)</p><p>  表2-4 會員信息表的結構(會員表)</p><p>  表2-5 會員政策信息表的結構(會員政策)</p><p>  表2-6 進書記錄信息表的結構

31、(進書記錄)</p><p>  表2-7 客戶反饋信息表的結構(客戶反饋)</p><p>  表2-8 售書記錄信息表的結構(售書記錄)</p><p>  表2-9 書店介紹信息表的結構(書店介紹)</p><p>  表2-10 圖書分類信息表的結構(圖書分類)</p><p>  表2-11 圖書進價信息表的

32、結構(圖書進價表)</p><p>  表2-12 退貨記錄信息表的結構(退貨記錄)</p><p>  表2-13 員工信息表的結構(員工表)</p><p>  表2-14 數(shù)據(jù)庫表間的聯(lián)系表</p><p>  第三章、圖書管理系統(tǒng)應用程序設計(經(jīng)理模塊)</p><p>  本圖書管理系統(tǒng)根據(jù)用戶權限將人員大

33、體分為五種,分別是經(jīng)理、倉庫管理員、售書員、會員、游客。其中經(jīng)理、倉庫管理員、售書員模塊是圖書管理系統(tǒng)的后臺操作模塊。作為整個系統(tǒng)的設計者來說,首先面對的客戶就是書店的管理者,購書者的需求實際上只是書店的一部分,但是先決的需求是管理者對圖書管理系統(tǒng)管理的需求。所以只有在做好后臺管理系統(tǒng)后,才可以在這個基礎上來做前臺系統(tǒng)。我們作為管理員來對整個圖書管理系統(tǒng)進行后臺管理,即要對系統(tǒng)的數(shù)據(jù)庫進行操作如:供應商管理、進書管理、圖書資料管理、售書

34、管理、會員管理、庫存統(tǒng)計、售書統(tǒng)計、退貨統(tǒng)計、基本統(tǒng)計分析等。會員、游客模塊是圖書管理系統(tǒng)的前臺操作模塊。所進行的操作如:圖書的瀏覽、資料修改、注冊會員等。</p><p>  根據(jù)用戶的權限又將其細化,如:經(jīng)理的權限:主要包括各種統(tǒng)計分析、員工管理、制定會員政策等;倉庫管理員的權限:主要包括進書管理、供應商管理、庫存管理、退貨管理等;售書員的權限:主要包括售書管理、會員管理等;會員管理進行圖書的瀏覽、資料修改等

35、;游客進行圖書的瀏覽、注冊會員等。</p><p>  本人是負責整個系統(tǒng)的分析與設計以及經(jīng)理模塊的編寫,所以接下來我將對經(jīng)理模塊做詳細的介紹。</p><p><b>  3.1員工管理</b></p><p>  模塊功能:這個模塊主要實現(xiàn)的有五個功能:創(chuàng)建員工帳號、修改員工資料、修改員工密碼、查看員工資料及維護。</p>&

36、lt;p>  模塊運行過程:點擊“員工管理”菜單,顯示出六個子功能項:創(chuàng)建員工帳號、修改員工資料、修改員工密碼、員工信息、員工帳號管理。</p><p>  進入“創(chuàng)建員工帳號”,輸入要添加的資料,點擊“確定”后,計算機將輸入的信息寫入數(shù)據(jù)庫Admin和會員信息表中。進入“修改員工資料”,輸入要修改的員工帳號,按Tab鍵,如果員工帳號存在,則顯示其員工信息,點擊“修改”后,計算機將輸入的信息寫入數(shù)據(jù)庫會員信

37、息表中。如不存在,則會提示“該員工帳號不存在!”。進入“修改員工密碼”,輸入要修改的員工帳號,按Tab鍵,如果員工帳號存在,則顯示其員工的舊密碼信息,輸入新的密碼后,點擊“修改”后,計算機將輸入的信息寫入數(shù)據(jù)庫Admin表中。如不存在,則會提示“該員工帳號不存在!”。進入“員工信息”,可以查看所有員工的資料。進入“員工帳號管理”,可逐條顯示員工信息,并且可以實現(xiàn)上述創(chuàng)建員工帳號、修改員工資料的功能,以及刪除員工資料的功能。</p&

38、gt;<p><b>  3.2個人資料</b></p><p>  模塊功能:這個模塊主要實現(xiàn)的有二個功能:顯示和修改當前用戶資料、修改當前用戶密碼。</p><p>  模塊運行過程:點擊“個人資料”菜單,顯示出二個子功能項:基本資料、修改密碼。</p><p>  進入“基本資料”,輸入要修改的資料信息,點擊“修改”后,計算

39、機將輸入的信息寫入數(shù)據(jù)庫會員信息表中。進入“修改密碼”,輸入當前用戶的舊密碼以及要修改的新密碼,點擊“修改”后,如果員工舊密碼正確,計算機將輸入的新密碼信息寫入數(shù)據(jù)庫Admin中。如舊密碼不正確,則會提示“用戶密碼驗證錯誤!你無權修改密碼!”。</p><p><b>  3.3會員政策</b></p><p>  模塊功能:這個模塊主要實現(xiàn)的有二個功能:制定會員優(yōu)惠

40、政策和等級標準,查看會員資料及維護。</p><p>  模塊運行過程:點擊“會員政策”菜單,顯示出四個子功能項:制定會員優(yōu)惠政策、制定會員等級標準、會員信息、會員管理。</p><p>  進入“制定會員優(yōu)惠政策”,可以對會員等級制定優(yōu)惠政策,如“折扣”、“贈送禮品”等,并可修改會員等級標準,計算機將輸入的信息寫入數(shù)據(jù)庫會員政策表中。進入“制定會員等級標準”,同“制定會員優(yōu)惠政策”相同。

41、進入“會員信息”,可以查看所有會員及游客的資料。進入“會員管理”,可逐條顯示會員及游客的信息,并且可以進行創(chuàng)建新會員、修改會員及游客資料,以及刪除會員及游客資料的功能。</p><p><b>  3.4統(tǒng)計分析</b></p><p>  模塊功能:這個模塊主要實現(xiàn)的有五個功能:基本統(tǒng)計分析、詳細統(tǒng)計分析、庫存統(tǒng)計、售書統(tǒng)計、退貨統(tǒng)計。</p><

42、;p>  模塊運行過程:點擊“統(tǒng)計分析”菜單,顯示出五個子功能項:基本統(tǒng)計分析、詳細統(tǒng)計分析、庫存統(tǒng)計、售書統(tǒng)計、退貨統(tǒng)計。</p><p>  進入“基本統(tǒng)計分析”,可以查看所有的售書記錄。進入“詳細統(tǒng)計分析”,輸入要查詢的具體日期,點擊“統(tǒng)計”后,計算機將顯示該日售書的售書記錄,并顯示該日的交易總數(shù)量、銷售總金額以及盈利總額。如查詢的日期沒有售書記錄或日期輸入有誤,則會提示“該時段沒有銷售記錄,或日期填

43、寫錯誤!”。進入“庫存統(tǒng)計”,可以查看現(xiàn)在的庫存圖書的信息資料。進入“售書統(tǒng)計”,可以查看所有所售圖書的總數(shù)量和總實收金額的信息資料。進入“基本統(tǒng)計”,可以查看所有所退圖書的總數(shù)量和總退貨金額的信息資料。</p><p><b>  3.5圖書檢索</b></p><p>  模塊功能:這個模塊主要實現(xiàn)的有二個功能:按具體內容檢索圖書、瀏覽全部圖書。</p>

44、;<p>  模塊運行過程:點擊“圖書檢索”菜單,顯示出六個子功能項:按圖書編號檢索、按書名檢索、按分類檢索、按作者檢索、按關鍵詞檢索、瀏覽全部。</p><p>  進入“按圖書編號檢索”,輸入要查詢的圖書編號,點擊“確定”后,計算機將顯示該圖書的信息資料。如輸入的圖書編號不存在,則會提示“沒有找到你要的相關記錄!”。進入“按書名檢索”,功能同上。進入“按分類檢索”,功能同上。進入“按作者檢索”,

45、功能同上。進入“按關鍵詞檢索”,功能同上。進入“瀏覽全部”,可以查看到所有圖書的信息資料。</p><p><b>  3.6書店情況</b></p><p>  模塊功能:這個模塊主要實現(xiàn)的有三個功能:制定書店的基本情況、查看進書記錄、查看售書記錄。</p><p>  模塊運行過程:點擊“書店情況”菜單,顯示出四個子功能項:制定書店的簡介、

46、制定書店的聯(lián)系方式、進書記錄、售書記錄。</p><p>  進入“制定書店的簡介”,可以對書店的簡介,以及書店的聯(lián)系方式等書店基本情況進行修改,計算機將修改后的信息寫入數(shù)據(jù)庫書店介紹表中。進入“制定書店的聯(lián)系方式”,功能同上。進入“進書記錄”,顯示書店所有的進書記錄。進入“售書記錄”,顯示書店所有的售書記錄。</p><p><b>  3.7客戶反饋</b><

47、;/p><p>  模塊功能:這個模塊主要實現(xiàn)的有三個功能:讀者意見或建議、讀者投訴、反饋信息的管理。</p><p>  模塊運行過程:點擊“客戶反饋”菜單,顯示出三個子功能項:讀者意見或建議、讀者投訴、反饋信息的管理。</p><p>  進入“讀者意見或建議”,輸入讀者的基本信息和反饋的意見或建議,點擊“確定”后,計算機將輸入的信息寫入數(shù)據(jù)庫客戶反饋表中。進入“讀

48、者投訴”,輸入讀者的基本信息和投訴意見,點擊“確定”后,計算機將輸入的信息寫入數(shù)據(jù)庫客戶反饋表中。進入“反饋信息的管理”,可逐條顯示客戶的反饋信息,并且可以進行添加、修改以及刪除反饋資料的功能。</p><p>  3.8會員、游客模塊的基本介紹</p><p>  會員及游客模塊大體相同,實現(xiàn)的功能有圖書檢索、客戶反饋、查看書店介紹、查看會員政策,兩者唯一的區(qū)別在于會員有修改會員資料及密

49、碼的功能;而游客有會員注冊的功能。其實現(xiàn)過程與經(jīng)理模塊中相應的功能相同,這里就不在一一介紹。</p><p><b>  第四章、結束語</b></p><p>  通過熾天使圖書管理系統(tǒng)的開發(fā),我對軟件開發(fā)過程有了更清晰的了解,首先是問題定義、需求分析,然后是功能設計、詳細設計等,并對軟件測試的方法、手段有了較深的理解,同時對書店的流程有了一個系統(tǒng)的認識。在開發(fā)過程

50、還認真學習了與系統(tǒng)相關的知識,極大地拓寬了我的知識面,我感到收獲不小。</p><p>  在系統(tǒng)的開發(fā)初期,必須要熟悉企業(yè)的管理流程,初步了解ERP的相關知識,這樣才能進入到設計的過程中去。從開始熟悉這些知識到對整體設計有了解,再從概要設計、詳細設計到開始編碼,以及最后的測試,整個過程感覺很充實,雖然遇到了不少困難,但每當通過自己查資料、或是向指導老師請教以及和同學請教,而設計出解決方案并成功實現(xiàn)時,那種成就感

51、和滿足感足以鼓勵自己加班加點的辛苦。</p><p>  在編制過程中,我首先考慮到了界面的友好性,并在界面設計時不采用煩瑣的細節(jié),使界面簡單、清晰,便于操作。盡管在設計的過程中,我們時刻考慮到了操作界面的友好性,但實際情況是遠遠不能滿足客戶的要求,考慮到軟件使用群體將是一群幾乎沒有任何電腦操作經(jīng)驗的人,我們還在考慮著怎樣可以進一步的完善和改進。本次編制中的不足之處是因為是首次嘗試使用Visual Basic編制

52、可應用的數(shù)據(jù)管理系統(tǒng),在實際應用中有些功能還不是很到位。我將不斷提高自己,爭取今后在編制程序時,能編寫出有個性且應用性較強的數(shù)據(jù)庫管理系統(tǒng)。</p><p>  經(jīng)過這段時間的設計實習,確實學到了不少的東西,同時也深感自己知識的欠缺。在以后的學習工作中,我一定要繼續(xù)堅持不懈地學習新興的專業(yè)知識及相關的非專業(yè)知識,只有這樣才能緊跟時代的潮流。</p><p><b>  附錄<

53、;/b></p><p><b>  圖1 系統(tǒng)流程圖</b></p><p>  用戶登錄界面圖和窗體源代碼(FrmLogoIn.frm):</p><p>  Private Sub CmdCancel_Click()</p><p><b>  Unload Me</b></p&

54、gt;<p><b>  End</b></p><p><b>  End Sub</b></p><p>  Private Sub CmdHelp_Click()</p><p>  Load FrmHelp</p><p>  FrmHelp.Show vbModal</

55、p><p><b>  End Sub</b></p><p>  Private Sub CmdLogoIn_Click()</p><p>  Dim userName As String</p><p>  Dim passwd As String</p><p>  userName = Tx

56、tUserName.Text</p><p>  passwd = TxtPasswd.Text</p><p>  TxtUserName.Enabled = False</p><p>  TxtPasswd.Enabled = False</p><p>  CmdLogoIn.Enabled = False</p>&l

57、t;p>  CmdCancel.Enabled = False</p><p>  If userName = "" Then</p><p>  MsgBox "請輸入你的帳號!", vbOKOnly + vbExclamation, "系統(tǒng)登陸"</p><p>  TxtUserName.Ena

58、bled = True</p><p>  TxtPasswd.Enabled = True</p><p>  CmdLogoIn.Enabled = True</p><p>  CmdCancel.Enabled = True</p><p>  TxtUserName.SetFocus</p><p><

59、b>  Exit Sub</b></p><p>  ElseIf passwd = "" Then</p><p>  MsgBox "請輸入你的密碼!", vbOKOnly + vbExclamation, "系統(tǒng)登陸"</p><p>  TxtUserName.Enabled =

60、True</p><p>  TxtPasswd.Enabled = True</p><p>  CmdLogoIn.Enabled = True</p><p>  CmdCancel.Enabled = True</p><p>  TxtPasswd.SetFocus</p><p><b>  Ex

61、it Sub</b></p><p><b>  Else</b></p><p>  Call CheckUser(userName, passwd)</p><p><b>  End If</b></p><p>  If Not logOK Then</p><

62、;p>  TxtUserName.Enabled = True</p><p>  TxtPasswd.Enabled = True</p><p>  CmdLogoIn.Enabled = True</p><p>  CmdCancel.Enabled = True</p><p>  TxtPasswd.SetFocus<

63、/p><p>  TxtPasswd.SelStart = 0</p><p>  TxtPasswd.SelLength = Len(TxtPasswd.Text)</p><p><b>  End If</b></p><p><b>  End Sub</b></p><p&

64、gt;  Private Sub TxtPasswd_KeyDown(KeyCode As Integer, Shift As Integer)</p><p>  If KeyCode = 13 Then</p><p>  CmdLogoIn.SetFocus</p><p><b>  End If</b></p><

65、p><b>  End Sub</b></p><p>  Private Sub TxtUserName_KeyDown(KeyCode As Integer, Shift As Integer)</p><p>  If KeyCode = 13 Then</p><p>  TxtPasswd.SetFocus</p>

66、<p><b>  End If</b></p><p><b>  End Sub</b></p><p>  系統(tǒng)登錄菜單窗體源代碼(FrmMain.frm):</p><p>  Private Sub FMH_webHlp_Click()</p><p>  Dim pid As

67、 Long</p><p>  pid = Shell("Explorer.exe http://hmj.student.hvttc.edu.cn", vbNormalFocus)</p><p>  If pid = 0 Then</p><p>  MsgBox "無法打開瀏覽器!", vbOKOnly + vbExcla

68、mation, "打開程序出錯"</p><p><b>  End If</b></p><p><b>  End Sub</b></p><p>  Private Sub frmMainH_about_Click()</p><p>  Load frmAbout<

69、/p><p>  frmAbout.Show vbModal</p><p><b>  End Sub</b></p><p>  Private Sub FrmMainH_hlp_Click()</p><p>  Load FrmHelp</p><p>  FrmHelp.Show vbMod

70、al</p><p><b>  End Sub</b></p><p>  Private Sub FrmMainS_exit_Click()</p><p>  Call Sys_exit</p><p><b>  End Sub</b></p><p>  Priva

71、te Sub frmMainS_logOff_Click()</p><p>  Call LogOff</p><p><b>  End Sub</b></p><p>  Private Sub FrmMainS_return_Click()</p><p>  If UserShenFen = "經(jīng)理&

72、quot; Then</p><p>  Load FrmAdminMain</p><p>  FrmAdminMain.Show</p><p>  ElseIf UserShenFen = "倉庫管理員" Then</p><p>  Load FrmCangGuanMain</p><p>

73、  FrmCangGuanMain.Show</p><p>  ElseIf UserShenFen = "售書員" Then</p><p>  Load FrmBookSellerMain</p><p>  FrmBookSellerMain.Show</p><p>  ElseIf UserShenFen =

74、"會員" Then</p><p>  Load FrmMemberMain</p><p>  FrmMemberMain.Show</p><p><b>  Else</b></p><p>  Load FrmGuestMain</p><p>  FrmGuestMa

75、in.Show</p><p><b>  End If</b></p><p><b>  End Sub</b></p><p>  Private Sub FrmMnuS_jsq_Click()</p><p>  Dim pid As Long</p><p>  p

76、id = Shell("Calc.exe", vbNormalFocus)</p><p>  If pid = 0 Then</p><p>  MsgBox "無法打開計算器!", vbOKOnly + vbExclamation, "打開程序出錯"</p><p><b>  End If&

77、lt;/b></p><p><b>  End Sub</b></p><p>  Private Sub MDIForm_Load()</p><p><b>  '設置用戶環(huán)境</b></p><p>  If UserShenFen = "經(jīng)理" Then&

78、lt;/p><p>  Load FrmAdminMain</p><p>  FrmAdminMain.Show</p><p>  ElseIf UserShenFen = "倉庫管理員" Then</p><p>  Load FrmCangGuanMain</p><p>  FrmCangGu

79、anMain.Show</p><p>  ElseIf UserShenFen = "售書員" Then</p><p>  Load FrmBookSellerMain</p><p>  FrmBookSellerMain.Show</p><p>  ElseIf UserShenFen = "會員&qu

80、ot; Then</p><p>  Load FrmMemberMain</p><p>  FrmMemberMain.Show</p><p><b>  Else</b></p><p>  Load FrmGuestMain</p><p>  FrmGuestMain.Show<

81、/p><p><b>  End If</b></p><p><b>  End Sub</b></p><p>  Private Sub MDIForm_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)</p>&l

82、t;p>  If Button = vbRightButton Then</p><p>  PopupMenu popMnu</p><p><b>  End If</b></p><p><b>  End Sub</b></p><p>  Private Sub MDIForm_Qu

83、eryUnload(Cancel As Integer, UnloadMode As Integer)</p><p>  Load FrmLogIn</p><p>  FrmLogIn.Show</p><p>  If UserShenFen = "經(jīng)理" Then</p><p>  Unload FrmAdmin

84、Main</p><p>  ElseIf UserShenFen = "倉庫管理員" Then</p><p>  Unload FrmCangGuanMain</p><p>  ElseIf UserShenFen = "售書員" Then</p><p>  Unload FrmBookSell

85、erMain</p><p>  ElseIf UserShenFen = "會員" Then</p><p>  Unload FrmMemberMain</p><p><b>  Else</b></p><p>  Unload FrmGuestMain</p><p>

86、;<b>  End If</b></p><p>  Unload FrmMain</p><p>  UserShenFen = ""</p><p>  logOK = False</p><p><b>  End Sub</b></p><p>

87、  Private Sub MfrmMainS_notepad_Click()</p><p>  Dim pid As Long</p><p>  pid = Shell("Notepad.exe", vbNormalFocus)</p><p>  If pid = 0 Then</p><p>  MsgBox &

88、quot;無法打開記事本!", vbOKOnly + vbExclamation, "打開程序出錯"</p><p><b>  End If</b></p><p><b>  End Sub</b></p><p>  Private Sub pop_about_Click()</p

89、><p>  Load frmAbout</p><p>  frmAbout.Show vbModal</p><p><b>  End Sub</b></p><p>  Private Sub pop_hlp_Click()</p><p>  Load FrmHelp</p>

90、<p>  FrmHelp.Show vbModal</p><p><b>  End Sub</b></p><p>  Private Sub POP_jsb_Click()</p><p>  Call MfrmMainS_notepad_Click</p><p><b>  End Sub

91、</b></p><p>  Private Sub POP_jsq_Click()</p><p>  Call FrmMnuS_jsq_Click</p><p><b>  End Sub</b></p><p>  Private Sub pop_retuHome_Click()</p>

92、<p>  Call FrmMainS_return_Click</p><p><b>  End Sub</b></p><p>  Private Sub pop_webHlp_Click()</p><p>  Call FMH_webHlp_Click</p><p><b>  End

93、Sub</b></p><p>  Private Sub pop_zhuXiao_Click()</p><p>  Call LogOff</p><p><b>  End Sub</b></p><p>  書店經(jīng)理工作環(huán)境界面圖和窗體源代碼(FrmAdminMain.frm):</p>

94、<p>  Public Sub searchBook(keyWords As String, fenLei As String)</p><p>  Dim strSQL As String</p><p>  SSTabGuest.Tab = 1</p><p>  If keyWords = "" Then</p>

95、<p>  MsgBox "請輸入檢索的關鍵詞!", vbOKOnly + vbExclamation, "圖書檢索"</p><p>  TxtKeyWords_Click</p><p><b>  Exit Sub</b></p><p><b>  End If</b&

96、gt;</p><p>  If fenLei = "" Or fenLei = "選擇分類" Then</p><p>  MsgBox "請輸入檢索的依據(jù)!", vbOKOnly + vbExclamation, "圖書檢索"</p><p>  ComboLeiBie.SetFoc

97、us</p><p><b>  Exit Sub</b></p><p><b>  End If</b></p><p>  On Error GoTo errEnd</p><p>  strSQL = "select * from [讀者查詢] where [" &

98、; fenLei & "] like '%" & keyWords & "%'"</p><p>  Adodc1.CommandType = adCmdText</p><p>  Adodc1.RecordSource = strSQL</p><p>  Adodc1.Refres

99、h</p><p>  Set DataGrid2.DataSource = Adodc1</p><p>  DataGrid2.Refresh</p><p>  If Adodc1.Recordset.RecordCount = 0 Then</p><p>  MsgBox "沒有找到你要的相關記錄!", vbOK

100、Only + vbInformation, "圖書檢索"</p><p><b>  End If</b></p><p>  LabResult.Caption = "共找到 " & Adodc1.Recordset.RecordCount & " 條相關記錄"</p><

101、;p><b>  Exit Sub</b></p><p><b>  errEnd:</b></p><p>  MsgBox Err.Description, vbOKOnly + vbExclamation, "檢索錯誤"</p><p><b>  End Sub</b&g

102、t;</p><p>  Private Sub CmdOK_Click()</p><p>  On Error GoTo errEnd</p><p>  If ComboDengJi.Text = "" Or ComboDengJi.Text = "請選擇會員級別" Then</p><p>  

103、MsgBox "請選擇會員級別!", vbOKOnly + vbExclamation, "會員標準"</p><p>  ComboDengJi.SetFocus</p><p><b>  Exit Sub</b></p><p><b>  End If</b></p&g

104、t;<p>  If ComboJinE.Text = "" Or ComboJinE.Text = "金額" Then</p><p>  MsgBox "請選擇該等級金額標準!", vbOKOnly + vbExclamation, "會員標準"</p><p>  ComboJinE.Set

105、Focus</p><p><b>  Exit Sub</b></p><p><b>  End If</b></p><p>  If ComboDaZhe.Text = "" Or ComboDaZhe.Text = "請選擇打折比率" Then</p><

106、;p>  MsgBox "請選擇該等級打折比率!", vbOKOnly + vbExclamation, "會員標準"</p><p>  ComboDaZhe.SetFocus</p><p><b>  Exit Sub</b></p><p><b>  End If</b&g

107、t;</p><p>  If CInt(ComboDaZhe.Text) <= 0 Or CInt(ComboDaZhe.Text) > 1 Then</p><p>  MsgBox "該等級打折比率制定有誤!", vbOKOnly + vbExclamation, "會員標準"</p><p>  Combo

108、DaZhe.SetFocus</p><p><b>  Exit Sub</b></p><p><b>  End If</b></p><p>  If TxtLiPin.Text = "" Then TxtLiPin.Text = "無"</p><p&g

109、t;  If TxtQT.Text = "" Then TxtQT.Text = "無"</p><p>  Adodc2.Recordset!會員標準 = ComboJinE.Text</p><p>  Adodc2.Recordset!打折 = ComboDaZhe.Text</p><p>  Adodc2.Recor

110、dset!贈送禮品 = TxtLiPin.Text</p><p>  Adodc2.Recordset!備注 = TxtQT.Text</p><p>  Adodc2.Recordset.Update</p><p>  MsgBox "當前等級標準更新成功!", vbOKOnly + vbInformation, "會員政策&qu

111、ot;</p><p><b>  Exit Sub</b></p><p><b>  errEnd:</b></p><p>  MsgBox Err.Description, vbOKOnly + vbExclamation, "更新錯誤"</p><p><b>

112、;  End Sub</b></p><p>  Private Sub CmdReset_Click()</p><p>  TxtName.Text = ""</p><p>  TxtDanWei.Text = ""</p><p>  TxtDiZhi.Text = "&q

113、uot;</p><p>  TxtEmail.Text = ""</p><p>  TxtInfo.Text = ""</p><p><b>  End Sub</b></p><p>  Private Sub CmdSearch_Click()</p>&l

114、t;p>  Dim strSQL As String</p><p>  If TxtKeyWords.Text = "" Or TxtKeyWords.Text = "關鍵詞" Then</p><p>  MsgBox "請輸入檢索的關鍵詞!", vbOKOnly + vbExclamation, "圖書檢索&

115、quot;</p><p>  TxtKeyWords_Click</p><p><b>  Exit Sub</b></p><p><b>  End If</b></p><p>  If ComboLeiBie.Text = "" Or ComboLeiBie.Text

116、 = "選擇分類" Then</p><p>  MsgBox "請輸入檢索的依據(jù)!", vbOKOnly + vbExclamation, "圖書檢索"</p><p>  ComboLeiBie.SetFocus</p><p><b>  Exit Sub</b></p&g

117、t;<p><b>  End If</b></p><p>  On Error GoTo errEnd</p><p>  strSQL = "select * from [讀者查詢] where [" & ComboLeiBie.Text & "] like '%" & Txt

118、KeyWords.Text & "%'"</p><p>  Adodc1.CommandType = adCmdText</p><p>  Adodc1.RecordSource = strSQL</p><p>  Adodc1.Refresh</p><p>  Set DataGrid2.Data

119、Source = Adodc1</p><p>  DataGrid2.Refresh</p><p>  If Adodc1.Recordset.RecordCount = 0 Then</p><p>  MsgBox "沒有找到你要的相關記錄", vbOKOnly + vbInformation, "圖書檢索"</

120、p><p><b>  End If</b></p><p>  LabResult.Caption = "共找到 " & Adodc1.Recordset.RecordCount & " 條記錄"</p><p><b>  Exit Sub</b></p>

121、<p><b>  errEnd:</b></p><p>  MsgBox Err.Description, vbOKOnly + vbExclamation, "檢索錯誤"</p><p><b>  End Sub</b></p><p>  Private Sub CmdSet_C

122、lick()</p><p>  On Error GoTo errEnd</p><p>  If TxtShopName.Text = "" Then</p><p>  MsgBox "請輸入您的書店名稱!", vbOKOnly + vbExclamation, "書店簡介"</p>&

123、lt;p>  TxtShopName.SetFocus</p><p><b>  Exit Sub</b></p><p><b>  End If</b></p><p>  If TxtShopJianJie.Text = "" Then</p><p>  MsgB

124、ox "請輸入您的書店簡介!", vbOKOnly + vbExclamation, "書店簡介"</p><p>  TxtShopJianJie.SetFocus</p><p><b>  Exit Sub</b></p><p><b>  End If</b></p&

125、gt;<p>  If TxtDianHua.Text = "" Then</p><p>  MsgBox "請輸入您的電話!", vbOKOnly + vbExclamation, "書店簡介"</p><p>  TxtDianHua.SetFocus</p><p><b>

126、  Exit Sub</b></p><p><b>  End If</b></p><p>  If TxtShouJi.Text = "" Then</p><p>  TxtShouJi.Text = "無"</p><p><b>  End If&

127、lt;/b></p><p>  If TxtMail.Text = "" Then</p><p>  TxtMail.Text = "無"</p><p><b>  End If</b></p><p>  If TxtLianXiRen.Text = "&q

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內容里面會有圖紙預覽,若沒有圖紙預覽就沒有圖紙。
  • 4. 未經(jīng)權益所有人同意不得將文件中的內容挪作商業(yè)或盈利用途。
  • 5. 眾賞文庫僅提供信息存儲空間,僅對用戶上傳內容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內容本身不做任何修改或編輯,并不能對任何下載內容負責。
  • 6. 下載文件中如有侵權或不適當內容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論