畢業(yè)設(shè)計(jì)（論文）-基于VB的圖書(shū)館管理系統(tǒng)設(shè)計(jì)

1、畢業(yè)論文第1章 需求分析1.1 引言1.1.1背景隨著科學(xué)技術(shù)的發(fā)展，特別是計(jì)算機(jī)在人們生活中的普及，使人們的各項(xiàng)工作變得越來(lái)越便利，工作效率大大的提高。也為管理現(xiàn)代化的發(fā)展帶來(lái)了新的契機(jī)。學(xué)校的圖書(shū)管理工作是學(xué)校管理工作中一個(gè)重要的組成部分，其內(nèi)容復(fù)雜，工作繁多。如果使用計(jì)算機(jī)處理各項(xiàng)圖書(shū)管理業(yè)務(wù)，不僅節(jié)約了大量人力，而且還大大提高了工作效率，經(jīng)濟(jì)效益十分明顯。本系統(tǒng)就是基于這一現(xiàn)實(shí)條件而開(kāi)發(fā)的。雖然就本系統(tǒng)還不能說(shuō)讓圖書(shū)管理的管理現(xiàn)代化，但這與本系統(tǒng)開(kāi)發(fā)的目的并不相悖，整個(gè)社會(huì)的信息化建設(shè)，并不是一朝一夕的事，也不是一個(gè)人所能解決的，所以本系統(tǒng)的開(kāi)發(fā)只是起到嘗試的作用。1.1.2.編寫目的

2、圖書(shū)館作為一種信息資源的集散地，圖書(shū)和用戶借閱資料繁多，包含很多的信息數(shù)據(jù)的管理，現(xiàn)今，有很多的圖書(shū)館都是初步開(kāi)始使用，甚至尚未使用計(jì)算機(jī)進(jìn)行信息管理。根據(jù)調(diào)查得知，他們以前對(duì)信息管理的主要方式是基于文本、表格等紙介質(zhì)的手工處理，對(duì)于圖書(shū)借閱情況（如借書(shū)天數(shù)、超過(guò)限定借書(shū)時(shí)間的天數(shù)）的統(tǒng)計(jì)和核實(shí)等往往采用對(duì)借書(shū)卡的人工檢查進(jìn)行，對(duì)借閱者的借閱權(quán)限、以及借閱天數(shù)等用人工計(jì)算、手抄進(jìn)行。數(shù)據(jù)處理手工操作，工作量大，出錯(cuò)率高，出錯(cuò)后不易更改。圖書(shū)館采取手工方式對(duì)圖書(shū)借閱情況進(jìn)行人工管理，由于信息比較多，圖書(shū)借閱信息的管理工作混亂而又復(fù)雜；一般借閱情況是記錄在借書(shū)證上，圖書(shū)的數(shù)目和內(nèi)容記錄在文件中，圖

3、書(shū)館的工作人員和管理員也只是當(dāng)時(shí)對(duì)它比較清楚，時(shí)間一長(zhǎng)，如再要進(jìn)行查詢，就得在眾多的資料中翻閱、查找了，造成查詢費(fèi)時(shí)、費(fèi)力。如要對(duì)很長(zhǎng)時(shí)間以前的圖書(shū)進(jìn)行更改就更加困難了。基于這此問(wèn)題，我認(rèn)為有必要建立一個(gè)圖書(shū)管理系統(tǒng)，使圖書(shū)管理工作規(guī)范化，系統(tǒng)化，程序化，避免圖書(shū)管理的隨意性，提高信息處理的速度和準(zhǔn)確性，能夠及時(shí)、準(zhǔn)確、有效的查詢和修改圖書(shū)情況。1.1.3定義術(shù)語(yǔ)需求：用戶解決問(wèn)題或達(dá)到目標(biāo)所需的條件或功能；系統(tǒng)或系統(tǒng)部件要滿足合同、標(biāo)準(zhǔn)，規(guī)范或其它正式規(guī)定文檔所需具有的條件或權(quán)能。需求分析：包括提煉，分析和仔細(xì)審查已收集到的需求，以確保所有的風(fēng)險(xiǎn)承擔(dān)者都明其含義并找出其中的錯(cuò)誤，遺憾或其它不

4、足的地方。模塊的獨(dú)立性：是指軟件系統(tǒng)中每個(gè)模塊只涉及軟件要求的具體的子功能，而和軟件系統(tǒng)中其他的模塊的接口是簡(jiǎn)單的。1.2項(xiàng)目開(kāi)發(fā)環(huán)境1.2.1.硬件環(huán)境：586或以上的微機(jī)一臺(tái)（包括CD-ROM,軟驅(qū)），打印機(jī)一臺(tái)。1.2.2.軟件環(huán)境：1.操作系統(tǒng)：windows 9X,NT,2000,xp2.開(kāi)發(fā)工具：visual basic 6.0vb6.0是微軟公司出品的一個(gè)快速可視化程序開(kāi)發(fā)工具軟件，具有強(qiáng)大的可視化計(jì)和面向?qū)ο蟪绦蛟O(shè)計(jì)的功能，近年來(lái)得到了廣泛的應(yīng)用，它主要有以下特點(diǎn)：（1） 簡(jiǎn)單易學(xué)（2） 簡(jiǎn)化了復(fù)雜的界面設(shè)計(jì)工作（3） 強(qiáng)大的多媒體功能（4） 網(wǎng)絡(luò)功能支持了Internet編程

5、（5） 具有所見(jiàn)即所得的功能（6） 支持用戶開(kāi)發(fā)的ActiveX控件1.2.3.數(shù)據(jù)庫(kù)：ACCESS 2000Access2000是Microsoft公司推出的同時(shí)面向數(shù)據(jù)庫(kù)最終用戶和數(shù)據(jù)庫(kù)開(kāi)發(fā)人員的關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng)，它實(shí)現(xiàn)了計(jì)算機(jī)“易于使用”的特點(diǎn)，即用戶只需按照“向?qū)А边M(jìn)行簡(jiǎn)單操作，就可以設(shè)計(jì)出一個(gè)數(shù)據(jù)庫(kù)系統(tǒng)。作為一種數(shù)據(jù)庫(kù)軟件，Access可以完成以下功能：可以為每一種類型的信息創(chuàng)建一個(gè)表，利用表存儲(chǔ)相應(yīng)的信息；可以定義各個(gè)表之間的關(guān)系；可以利用宏或Visual Basic將各數(shù)據(jù)庫(kù)對(duì)象連接在一起，形成一個(gè)數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)，而且用戶也不需要編寫復(fù)雜的程序。充分利用Access數(shù)據(jù)庫(kù)是關(guān)系

6、數(shù)據(jù)庫(kù)的特性，仔細(xì)分析各類數(shù)據(jù)之間的關(guān)系，創(chuàng)建表并建立表間的關(guān)聯(lián)，使每個(gè)表限制到一個(gè)主題，避免了重復(fù)信息和冗余數(shù)據(jù)。并且利用Access與VB窗體建立聯(lián)系，顯示表或查詢每一個(gè)記錄的完整信息，一次只錄入一組相關(guān)的數(shù)據(jù)。簡(jiǎn)單明了，提高了基礎(chǔ)數(shù)據(jù)正確性。為使“計(jì)劃規(guī)?！睌?shù)據(jù)庫(kù)更為實(shí)用，又作了進(jìn)一步的編寫工作，利用Access的窗體具有的可與其它應(yīng)用程序進(jìn)行鏈接的功能，創(chuàng)建同步窗體或嵌套窗體，可非常直觀地點(diǎn)擊不同的按鈕，就能進(jìn)入相應(yīng)的錄入、查詢模塊，查看所需的信息。1.2.4 VB與ACCESS的結(jié)合微軟的JET數(shù)據(jù)庫(kù)引擎提供了與數(shù)據(jù)庫(kù)打交道的途徑,我是通過(guò)它以及VB來(lái)訪問(wèn)數(shù)據(jù)并對(duì)其各種操作。再使用D

7、ATA控件和ADOC控件在數(shù)據(jù)庫(kù)中的信息與將信息顯示給用戶看的VB程序之間架起一座橋梁。設(shè)置這兩個(gè)控件的各個(gè)屬性，告訴它要調(diào)用哪個(gè)數(shù)據(jù)庫(kù)的哪個(gè)部分。通過(guò)設(shè)計(jì)跳轉(zhuǎn)按鈕來(lái)動(dòng)態(tài)地改變數(shù)據(jù)庫(kù)表中的記錄。1.3項(xiàng)目概述1.3.1 目標(biāo)通過(guò)對(duì)學(xué)校圖書(shū)館內(nèi)部的各種機(jī)構(gòu)的劃分和管理，以及各種業(yè)務(wù)的處理過(guò)程的分析，設(shè)計(jì)出一個(gè)行之有效的能夠在實(shí)際中幫助圖書(shū)館實(shí)施管理現(xiàn)代化、業(yè)務(wù)信息化，從而大大提高工作效率運(yùn)行于已有的硬件平臺(tái)上的圖書(shū)館管理系統(tǒng)。1.3.2. 產(chǎn)品描述根據(jù)用戶的實(shí)際管理要求和圖書(shū)館職能的劃分，我們將本系統(tǒng)劃分為系統(tǒng)管理模塊、讀者管理模塊、圖書(shū)管理模塊、借書(shū)/還書(shū)模塊、數(shù)據(jù)報(bào)表模塊和幫助模塊等六個(gè)子系

8、統(tǒng)。1.3.3. 產(chǎn)品功能用戶管理模塊實(shí)現(xiàn)用戶管理、重新登錄系統(tǒng)、退出系統(tǒng)；讀者管理模塊實(shí)現(xiàn)對(duì)查詢讀者、讀者管理、激活卡號(hào)、卡號(hào)掛失、卡號(hào)注銷五項(xiàng)功能；圖書(shū)管理模塊實(shí)現(xiàn)了多種方式查詢圖書(shū)、管理圖書(shū)的功能；借書(shū)/還書(shū)模塊實(shí)現(xiàn)了借書(shū)操作和還書(shū)操作、查看借書(shū)情況；數(shù)據(jù)報(bào)表模塊實(shí)現(xiàn)了對(duì)圖書(shū)信息、讀者信息、借書(shū)信息、罰款信息以報(bào)表形式打印出來(lái)；幫助模塊介紹了本系統(tǒng)的一些使用方法。普通用戶只能使用登錄系統(tǒng)、退出系統(tǒng)、查詢讀者、卡號(hào)掛失、卡號(hào)注銷、查詢圖書(shū)、借書(shū)操作、還書(shū)操作、查看借書(shū)情況以及圖書(shū)信息、讀者信息、借書(shū)信息、罰款信息的報(bào)表打印；管理員每一項(xiàng)功能都可以使用。第2章 系統(tǒng)設(shè)計(jì)我們將本系統(tǒng)劃分為系統(tǒng)

9、管理模塊、讀者管理模塊、圖書(shū)管理模塊、借書(shū)/還書(shū)模塊、數(shù)據(jù)報(bào)表模塊和幫助模塊等六個(gè)子系統(tǒng)。2.1設(shè)計(jì)原則安全可靠是一個(gè)應(yīng)用系統(tǒng)的靈魂，一個(gè)極小的差錯(cuò)，可能會(huì)造成整個(gè)系統(tǒng)的癱瘓，甚至可能造成企業(yè)的巨大損失。因此系統(tǒng)設(shè)計(jì)必需把安全性、可靠性、容錯(cuò)性放在首位。從發(fā)展的眼光看，一個(gè)綜合的計(jì)算機(jī)管理系統(tǒng)要實(shí)現(xiàn)市場(chǎng)、決策、管理、設(shè)計(jì)、制造等各環(huán)節(jié)的信息共享，完成不同制造廠商的設(shè)備和計(jì)算機(jī)軟硬件資源的數(shù)據(jù)交換。建立一個(gè)由開(kāi)放式，標(biāo)準(zhǔn)化的系統(tǒng)，開(kāi)放式標(biāo)準(zhǔn)化的異構(gòu)式數(shù)據(jù)庫(kù)組成的平臺(tái)來(lái)滿足當(dāng)前的需求，同時(shí)又能適應(yīng)今后新技術(shù)的引進(jìn)、開(kāi)發(fā)和推廣。 系統(tǒng)設(shè)計(jì)盡量簡(jiǎn)單，靈活易于管理，有利于將來(lái)需要時(shí)進(jìn)行功能改進(jìn)和新技術(shù)引

10、入。我們所處的時(shí)代是信息時(shí)代，通信和計(jì)算機(jī)技術(shù)的發(fā)展日新月異。因而，應(yīng)用系統(tǒng)的建設(shè)不僅應(yīng)適應(yīng)新技術(shù)發(fā)展方向，保證其先進(jìn)性，同時(shí)兼顧成熟的計(jì)算機(jī)技術(shù)、保證系統(tǒng)的可靠。系統(tǒng)的建設(shè)要考慮長(zhǎng)遠(yuǎn)，不能今年投入使用，兩三年內(nèi)就不能滿足要求，以至不得不做很大的設(shè)計(jì)修改；但也不能考慮太遠(yuǎn)，否則會(huì)導(dǎo)致初期投資規(guī)模過(guò)大，同時(shí)可能降低系統(tǒng)的可靠省和安全性能。2.2 模塊劃分原則本圖書(shū)管理系統(tǒng)包含六大模塊：系統(tǒng)管理：用戶管理（普通、管理員）、重新登錄、退出系統(tǒng)。讀者管理：查詢讀者、讀者管理、卡號(hào)激活、卡號(hào)掛失、注銷卡號(hào)。圖書(shū)管理：查詢圖書(shū)、圖書(shū)管理。借書(shū)/還書(shū)：借書(shū)、還書(shū)、查看借書(shū)情況。數(shù)據(jù)報(bào)表：讀者報(bào)表、讀書(shū)報(bào)表、

11、借書(shū)報(bào)表。幫助：主題、關(guān)于2.3系統(tǒng)結(jié)構(gòu)框圖圖書(shū)管理系統(tǒng)系統(tǒng)管理讀者管理圖書(shū)管理借書(shū)還書(shū)系統(tǒng)幫助數(shù)據(jù)報(bào)表圖2-1系統(tǒng)管理退出系統(tǒng)重新登錄用戶管理圖2-2讀者管理讀者掛失激活卡號(hào)讀者管理查詢讀者注銷卡號(hào)圖2-3圖書(shū)管理圖書(shū)管理查詢圖書(shū)圖2-4借書(shū)/還書(shū)借書(shū)總表還書(shū)借書(shū)圖2-5圖2-5數(shù)據(jù)報(bào)表讀者報(bào)表 圖書(shū)報(bào)表借書(shū)報(bào)表圖2-6幫助關(guān)于主題圖2-7系統(tǒng)結(jié)構(gòu)圖第3章 系統(tǒng)功能說(shuō)明3.1登錄用戶可以分普通用戶和管理員，在通過(guò)用戶輸出入用戶名和密碼無(wú)誤后，才可登錄。如果以普通用戶登錄（即用戶），只能查詢讀者、卡號(hào)掛失、查詢圖書(shū)、借書(shū)、還書(shū)，數(shù)據(jù)報(bào)表；如果以管理員身份登錄，任何功能項(xiàng)都能使用。3.2用戶管理

12、 管理員可以增加用戶、刪除用戶，通過(guò)點(diǎn)擊“保存”按鈕更新數(shù)據(jù)庫(kù)。 3.3讀者管理按照系統(tǒng)模塊劃分圖可知其分為四個(gè)具體的功能模塊，分別為查詢讀者、讀者管理、激活卡號(hào)、讀者掛失。查詢讀者：輸入卡號(hào)即可查詢，將在本窗體中顯示該讀者的相關(guān)信息。讀者管理：添加：在“增加讀者”窗體中輸入讀者基本信息，點(diǎn)擊“確定”即可增加讀者。刪除：方法一：將記錄指針定位到要?jiǎng)h除的記錄上，點(diǎn)擊“刪除”按鈕即可刪除信息。方法二：在工具條上，點(diǎn)擊“注銷卡號(hào)”，待輸入卡號(hào)和密碼無(wú)誤后，將刪除該卡號(hào)的記錄，并更新數(shù)據(jù)庫(kù)。激活卡號(hào)：該卡號(hào)已掛失，需要再使用時(shí)。掛失卡號(hào)：當(dāng)讀者卡丟失時(shí)，可以向圖書(shū)館工作人員申請(qǐng)掛失。在輸入卡號(hào)和密碼無(wú)

13、誤后，即可掛失，但在讀者表中還保存該讀者的相關(guān)信息。注銷卡號(hào)：當(dāng)讀者卡無(wú)效時(shí)或不遵守圖書(shū)館的管理規(guī)定等，即可刪除讀者，并從數(shù)據(jù)庫(kù)中真正刪除該記錄。3.4 圖書(shū)管理圖書(shū)查詢：用戶可以按照書(shū)號(hào)、書(shū)名、書(shū)籍類別、作者幾種方式查詢圖書(shū)，查詢結(jié)果直接在本窗體中顯示出來(lái)。圖書(shū)管理:增加：在增加書(shū)籍窗體中填入圖書(shū)信息后，點(diǎn)擊“確定”后即可增加圖書(shū)。刪除：刪除書(shū)籍信息，將記錄指針定位到要?jiǎng)h除的記錄上，即可刪除該記錄。3.5借書(shū)/還書(shū)按照系統(tǒng)模塊劃分圖可知其分為三個(gè)具體的功能模塊，分別為借書(shū)、還書(shū)、查詢借書(shū)情況。借書(shū)借書(shū)主要功能：1.根據(jù)用戶輸入借書(shū)的卡號(hào)及其密碼后，點(diǎn)擊“確定”按鈕。2.顯示讀者信息后，再輸入

14、書(shū)號(hào)，并顯示該書(shū)的信息。3.在輸入卡號(hào)密碼無(wú)誤情況下，以下幾種情況不能借書(shū)：第一：讀者如果已經(jīng)借書(shū)數(shù)超過(guò)了規(guī)定的數(shù)目，不能再借。第二：讀者的卡號(hào)如果掛失，不能借。第三：讀者沒(méi)交罰款。第四：書(shū)庫(kù)沒(méi)有讀者需要的書(shū)。在讀者借書(shū)時(shí)，可以通過(guò)點(diǎn)擊借書(shū)窗體上的“查借”按鈕，查看用戶借書(shū)的情況：還書(shū)一般情況：輸入書(shū)號(hào)，點(diǎn)“確定”按鈕顯示該書(shū)的信息后，再輸入卡號(hào)即可還書(shū)，數(shù)據(jù)庫(kù)中的信息更新: 特殊情況：在用戶輸入書(shū)號(hào)后，如果提示“你的書(shū)已經(jīng)超期,請(qǐng)交罰款金后,還書(shū)!如果現(xiàn)在交罰款金請(qǐng)按確定,否則按取消”，則用戶需填寫罰款單，交納罰款后，才能還書(shū)，并將罰款記錄寫入數(shù)據(jù)庫(kù)。3.6 數(shù)據(jù)報(bào)表采用設(shè)計(jì)器DataEnv

15、ironment1與數(shù)據(jù)表中的中的字段綁定，將讀者表(student)、圖書(shū)表(book)、借書(shū)情況表(lend)、罰款表(fakuan)的數(shù)據(jù)通過(guò)報(bào)表顯示出來(lái)。第4章 系統(tǒng)運(yùn)行操作概況4.1 硬件環(huán)境586或以上的微機(jī)一臺(tái)（包括CD-ROM,軟驅(qū)），打印機(jī)一臺(tái)4.2軟件環(huán)境 windows 9X,NT,2000,xp 4.3操作流程：查詢普通用戶管理員登錄通過(guò)驗(yàn)證系統(tǒng)登錄MDI主窗口（系統(tǒng)主窗口）以普通用戶身份登錄讀者通過(guò)讀者驗(yàn)證通過(guò)驗(yàn)證借書(shū)卡借通過(guò)書(shū)號(hào)卡號(hào)還以管理員身份登錄圖書(shū)查詢管理借書(shū)情況用戶注銷借書(shū)卡生成各數(shù)據(jù)報(bào)表掛失借書(shū)卡第5章 具體設(shè)計(jì)詳細(xì)設(shè)計(jì)階段的根本目標(biāo)是確定應(yīng)該怎樣具體地實(shí)

16、現(xiàn)所要求的系統(tǒng)，也就是說(shuō)，經(jīng)過(guò)這個(gè)階段的設(shè)計(jì)工作，應(yīng)該得出對(duì)目標(biāo)系統(tǒng)的精確描述，從而在編碼階段可以把這個(gè)描繪直接翻譯成用某種程序設(shè)計(jì)語(yǔ)言書(shū)寫的程序。換句話說(shuō)，詳細(xì)設(shè)計(jì)的目標(biāo)不僅僅是邏輯上正確地實(shí)現(xiàn)每個(gè)模塊的功能，更重要的是設(shè)計(jì)出的處理過(guò)程應(yīng)該盡可能簡(jiǎn)明易懂。而結(jié)構(gòu)程序設(shè)計(jì)技術(shù)是實(shí)現(xiàn)上述目標(biāo)的關(guān)鍵技術(shù)，是詳細(xì)設(shè)計(jì)的邏輯基礎(chǔ)。它采用的自頂向下逐步求精的設(shè)計(jì)方法和單入口單出口的控制結(jié)構(gòu)，在后面的設(shè)計(jì)中，大家可以看到這一點(diǎn)。在詳細(xì)設(shè)計(jì)中，有描述程序處理過(guò)程中的工具稱為詳細(xì)設(shè)計(jì)的工具，它們可以分為圖形、表格和語(yǔ)言三類，不論是哪類工具，對(duì)它們的基本要求都是能提供對(duì)設(shè)計(jì)的無(wú)歧義的描述，也就是應(yīng)該能指明控制流

17、程、處理功能、數(shù)據(jù)組織以及其他方面的實(shí)現(xiàn)細(xì)節(jié)。5.1 基本數(shù)據(jù)流程1. 用戶信息錄入：添加、刪除、更新2.讀者信息錄入：查詢、添加、刪除、更新3.圖書(shū)信息錄入：查詢、添加、刪除、更新4.借書(shū)信息錄入：查詢、添加、刪除、更新5.罰款信息錄入：添加、打印通過(guò)DATA和ADOC1控件連接數(shù)據(jù)庫(kù)中的表，對(duì)表中記錄進(jìn)行相關(guān)操作。借書(shū)情況錄入罰款情況錄入刪除用戶用戶表錄入增加圖書(shū)讀者綜合信息圖書(shū)綜合信息用戶綜合信息增加用戶借書(shū)綜合信息罰款信息查詢圖書(shū)增加圖書(shū)刪除圖書(shū)圖書(shū)報(bào)表查詢圖書(shū)刪除圖書(shū)圖書(shū)報(bào)表查詢記錄增加記錄刪除記錄借書(shū)報(bào)表增加記錄罰款清單圖書(shū)管理系統(tǒng)讀者情況錄入況錄入讀者表錄入圖書(shū)表錄入借書(shū)情況表錄

18、入圖書(shū)情況錄入用戶情況錄入罰款表錄入5.2數(shù)據(jù)庫(kù)設(shè)計(jì) 針對(duì)此圖書(shū)館管理系統(tǒng)，通過(guò)對(duì)圖書(shū)館管理工作過(guò)程的內(nèi)容和數(shù)據(jù)流程分析，設(shè)計(jì)如下面所示的數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)：讀者信息，包括的數(shù)據(jù)項(xiàng)有：卡號(hào)，密碼，姓名，班級(jí)，專業(yè)，性別，已借書(shū)數(shù)、掛失否。圖書(shū)信息，包括的數(shù)據(jù)項(xiàng)有：書(shū)號(hào)、書(shū)名、書(shū)籍類別、作者、出版社、在庫(kù)數(shù)目、總數(shù)、單價(jià)、購(gòu)買日期借書(shū)信息，包括的數(shù)據(jù)項(xiàng)有：卡號(hào)、書(shū)號(hào)、借書(shū)日期、還書(shū)日期用戶信息，包括的數(shù)據(jù)項(xiàng)有：classname(用戶名)、password（用戶密碼、class(班級(jí))罰款信息，包括的數(shù)據(jù)項(xiàng)有：卡號(hào)、書(shū)號(hào)、日期、罰金、罰款原因5.2.1基本數(shù)據(jù)模型讀者情況表結(jié)構(gòu)(student)序

19、號(hào)字段名稱數(shù)據(jù)類型寬度小數(shù)位數(shù)索引可否為空1卡號(hào)文本15無(wú)有（無(wú)重復(fù)）否2密碼文本50無(wú)無(wú)否3姓名文本14無(wú)無(wú)否4班級(jí)文本12無(wú)無(wú)否5專業(yè)文本14無(wú)無(wú)是6性別文本4無(wú)無(wú)是7已借書(shū)數(shù)數(shù)字整型無(wú)無(wú)否8掛失否是/否2無(wú)無(wú)否圖書(shū)情況表結(jié)構(gòu)（book）序號(hào)字段名稱類型寬度小數(shù)位數(shù)索引可否為空1書(shū)號(hào)文本10無(wú)有（無(wú)重復(fù)）否2書(shū)名文本30無(wú)無(wú)否3書(shū)籍類別文本12無(wú)無(wú)是4作者文本14無(wú)無(wú)是5出版社文本50無(wú)無(wú)是6總數(shù)數(shù)字整型自動(dòng)無(wú)否7在庫(kù)數(shù)目數(shù)字整型自動(dòng)無(wú)否8單價(jià)貨幣貨幣2無(wú)是9購(gòu)買日期日期/時(shí)間8無(wú)是借書(shū)情況表結(jié)構(gòu)（lend）序號(hào)字段名稱類型寬度索引可否為空1卡號(hào)文本15有（有重復(fù)）否2書(shū)號(hào)文本10有（無(wú)重

20、復(fù)）否3借書(shū)日期日期型8無(wú)否4還書(shū)日期日期型8無(wú)否 .用戶表結(jié)構(gòu)（manager）序號(hào)字段名稱類型寬度索引可否為空1username文本50無(wú)否2password文本50無(wú)否3class文本50無(wú)是.罰款表結(jié)構(gòu)（fakuan）序號(hào)字段名稱類型寬度索引可否為空1卡號(hào)文本15 無(wú)否2書(shū)號(hào)文本10無(wú)否3日期日期型8無(wú)否4罰金貨幣無(wú)否5罰款原因備注自動(dòng)無(wú)是 5.3數(shù)據(jù)表之間的關(guān)系：第6章 系統(tǒng)維護(hù) 軟件維護(hù)是軟件生命周期的最后一個(gè)階段，它處于系統(tǒng)投入生產(chǎn)性運(yùn)行以后的時(shí)期中。所謂軟件維護(hù)就是在軟件已經(jīng)交付使用之后，為了改正錯(cuò)誤或滿足新的需要而修改軟件的過(guò)程。本系統(tǒng)自從做好以后，給不同的人試用過(guò)，在這試用

21、期間還是看出來(lái)了系統(tǒng)確實(shí)存在不少的缺點(diǎn)和毛病，如重定向的問(wèn)題或某些操作不當(dāng)系統(tǒng)報(bào)錯(cuò)的問(wèn)題。但是由于水平有限，肯定還存在其他的問(wèn)題，也是在所難免的。希望大家原諒！結(jié)論經(jīng)過(guò)指導(dǎo)老師的測(cè)試，本系統(tǒng)采用登錄程序，很好的控制了系統(tǒng)的安全性，而且系統(tǒng)能夠很好的記載讀者的借書(shū)情況。讀者在每次借書(shū)時(shí)只需輸入自已的卡號(hào)和密碼以及書(shū)號(hào)，就可找到自已所需要書(shū)，用戶通過(guò)查看圖書(shū)信息來(lái)查找讀者所需要的書(shū)。管理員在維護(hù)數(shù)據(jù)庫(kù)的數(shù)據(jù)時(shí)不需要對(duì)數(shù)據(jù)庫(kù)進(jìn)行操作，可以在界面上進(jìn)行數(shù)據(jù)的添加、刪除和修改。在本系統(tǒng)設(shè)計(jì)中，利用VB中數(shù)據(jù)添加、刪除、更新等命令來(lái)對(duì)系統(tǒng)中的數(shù)據(jù)庫(kù)進(jìn)行相應(yīng)的操作。利用其中的DATA控件ADOC控件連接動(dòng)態(tài)

22、數(shù)據(jù)庫(kù)中記錄。而且還用到了相應(yīng)的SQL語(yǔ)句。通過(guò)此畢業(yè)設(shè)計(jì)，我深刻的體會(huì)到VB工具的強(qiáng)大功能，并將SQL語(yǔ)言的理論用到了實(shí)踐中去。系統(tǒng)可操作性還是很好的,比較方便靈活,唯一缺點(diǎn)是，數(shù)據(jù)庫(kù)的安全性不高,不能備份數(shù)據(jù)庫(kù),數(shù)據(jù)報(bào)表的打印也不能按條進(jìn)行打印輸出。參考文獻(xiàn)1 王福成、周鐵柱、黃淼云等：，北京：清華大學(xué)出版社2002年6月2郭振波編著： ， 北京： 人民郵電出版社 2003年3月3林永等編著： ， 北京：人民郵電出版社2002年11月4劉炳文等編著： ，北京：清華大學(xué)出版社 2000年7月5 王華杰：VB.NET編程實(shí)例詳解(含盤)， 北京：中國(guó)鐵道出版社 2002年4月6 康博譯：VB.

23、NET高級(jí)編程，北京：清華大學(xué)出版社 2002年3月7 張龍卿：Instant VB.NET實(shí)例解析VB.NET應(yīng)用編程， 北京：北京希望電子出版社 2002年1月8 林立軍，程斌，翁迪恩：Visual Basic 6.0數(shù)據(jù)庫(kù)開(kāi)發(fā)指南，陜西：西安電子科技大學(xué)出版社，2000年2月致 謝經(jīng)過(guò)兩個(gè)多月的設(shè)計(jì)和開(kāi)發(fā)，基于學(xué)校的圖書(shū)管理系統(tǒng)基本開(kāi)發(fā)完畢。完成了系統(tǒng)管理、讀者管理、圖書(shū)管理、借書(shū)還書(shū)、數(shù)據(jù)報(bào)表六大模塊，結(jié)合目前有些學(xué)校圖書(shū)館的管理方法，完全能實(shí)現(xiàn)圖書(shū)管理功能。在整個(gè)畢業(yè)設(shè)計(jì)過(guò)程中，從需求分析到設(shè)計(jì)思想的主體方案的形成，系統(tǒng)設(shè)計(jì)原理的確定到系統(tǒng)的實(shí)現(xiàn)，花費(fèi)了很大的功夫。我們查閱了大量與之

24、相關(guān)的書(shū)籍。同時(shí)，在劉洪輝老師認(rèn)真的工作態(tài)度和精心的指導(dǎo)下，我從實(shí)踐中走出來(lái)了，與此同時(shí)也得到了同學(xué)的大力支持。在此，對(duì)所有幫助我過(guò)的老師，同學(xué)表示忠心的感謝!附 錄源代碼程序 （一）登錄窗體功能的實(shí)現(xiàn):以用戶或管理員身份登錄。 使用data控件：指向用戶表（manager）Option ExplicitPublic jibie As StringPrivate Sub Command1_Click()Dim ts As RecordsetSet ts = userData.RecordsetDim condition As StringDim condition1 As StringDim

25、condition2 As Stringts.MoveFirstcondition = username= & Text1.Text & And password= & Text2.Text & userData.Recordset.FindFirst conditionIf userData.Recordset.NoMatch Then MsgBox 用戶名或密碼不正確,請(qǐng)重試! Text1.SetFocus Exit Sub Else If Option1.Value = False Then If Option2.Value = False Then MsgBox 你還沒(méi)有選擇用戶類型呢

26、,請(qǐng)選擇! Exit Sub Else Text3.Text = Option2.Captionjibie = Text3.Text userData.Recordset.MoveFirst condition1 = username= & Text1.Text & And password= & Text2.Text & and class= & Text3.Text & userData.Recordset.FindFirst condition1 If Not userData.Recordset.NoMatch Then Load MDIForm1 MDIForm1.Enabled =

27、 True MDIForm1.Toolbar1.Buttons(1).Enabled = False MDIForm1.Toolbar1.Buttons(5).Enabled = False MDIForm1.用戶管理.Enabled = False MDIForm1.管理讀者.Enabled = False MDIForm1.激活卡號(hào).Enabled = False MDIForm1.圖書(shū)管理.Enabled = False MDIForm1.Show Unload login Else MsgBox 用戶類型選擇不正確!請(qǐng)重試! Exit Sub End If End If Else Te

28、xt3.Text = Option1.Caption jibie = Text3.Text userData.Recordset.MoveFirst condition2 = username= & Text1.Text & And password= & Text2.Text & and class= & Text3.Text & userData.Recordset.FindFirst condition2 If Not userData.Recordset.NoMatch Then Load MDIForm1 MDIForm1.Show MDIForm1.Enabled = True U

29、nload login Else MsgBox 用戶類型選擇不正確!請(qǐng)重試! Exit Sub End If End IfEnd IfEnd SubPrivate Sub Command2_Click()Unload loginDim i As IntegerFor i = 1 To 11 Step 1 MDIForm1.Toolbar1.Buttons(i).Enabled = TrueNextMDIForm1.圖書(shū)管理.Enabled = TrueMDIForm1.系統(tǒng)管理.Enabled = TrueMDIForm1.讀者管理.Enabled = TrueMDIForm1.借書(shū)還書(shū).En

30、abled = TrueMDIForm1.幫助.Enabled = True圖書(shū)管理：Private Sub Command1_Click()Data1.Recordset.AddNewData1.Recordset.Fields(username) = Text1.TextData1.Recordset.Fields(password) = Text2.TextIf Option1.Value = True ThenData1.Recordset.Fields(class) = Option1.CaptionEnd IfIf Option2.Value = True Then Data1.R

31、ecordset.Fields(class) = Option2.CaptionEnd IfData1.Recordset.UpdateMsgBox 保存成功Data1.RefreshUnload addusermanager.Refreshusermanager.ShowEnd SubPrivate Sub Command2_Click()Unload addusermanager.ShowEnd SubPrivate Sub Command3_Click()Text1.Text = Text2.Text = End SubPrivate Sub Form_Load()Dim A As In

32、tegerEnd Sub圖書(shū)管理系統(tǒng)：Private Sub Command1_Click()condition10 = 書(shū)號(hào)= & Text1.Text & book.Recordset.MoveFirstbook.Recordset.FindFirst condition10If Not book.Recordset.NoMatch Then MsgBox 該書(shū)號(hào)已經(jīng)存在,請(qǐng)換一個(gè)書(shū)號(hào)! Text1.SetFocus Exit SubEnd Ifbook.Recordset.AddNewbook.Recordset.Fields(書(shū)號(hào)) = Text1.Textbook.Recordset

33、.Fields(書(shū)名) = Text2.Textbook.Recordset.Fields(書(shū)籍類別) = Text3.Textbook.Recordset.Fields(作者) = Text7.Textbook.Recordset.Fields(出版社) = Text4.Textbook.Recordset.Fields(總數(shù)) = Text5.Textbook.Recordset.Fields(在庫(kù)數(shù)目) = Text6.Textbook.Recordset.Fields(購(gòu)買日期) = Text8.Textbook.Recordset.Fields(單價(jià)) = Text9.TextA =

34、 MsgBox(確定要增加嗎?, vbOKCancel)If A = 1 Then book.Recordset.Update MsgBox 增加成功! book.Refresh updatebook.Refresh updatebook.DataGrid1.Refresh Unload addbookElse book.Recordset.CancelUpdateEnd IfEnd SubPrivate Sub Command2_Click()Text1.Text = Text2.Text = Text3.Text = Text4.Text = Text5.Text = Text6.Text

35、 = Text7.Text = Text8.Text = Text9.Text = End SubPrivate Sub Command3_Click()Unload addbookEnd SubPrivate Sub Command1_Click()condition = 卡號(hào)= & Text1.Text & Data1.Recordset.MoveFirst Data1.Recordset.FindFirst condition If Not Data1.Recordset.NoMatch Then MsgBox 該卡號(hào)已經(jīng)存在,請(qǐng)換卡號(hào)! Exit Sub Text1.SetFocus

36、End If If Option1.Value = False And Option2.Value = False Then MsgBox 你還沒(méi)有選擇性別呢,請(qǐng)選擇! Exit Sub End If Data1.Recordset.AddNew Data1.Recordset.Fields(卡號(hào)) = Text1.Text Data1.Recordset.Fields(密碼) = Text4.Text Data1.Recordset.Fields(姓名) = Text2.Text Data1.Recordset.Fields(班級(jí)) = Text3.Text Data1.Recordset.

37、Fields(專業(yè)) = Text6.Text Data1.Recordset.Fields(掛失否) = 否 Data1.Recordset.Fields(已借書(shū)數(shù)) = 0 If Option1.Value = True Then Data1.Recordset.Fields(性別) = Option1.Caption End If If Option2.Value = True Then Data1.Recordset.Fields(性別) = Option2.Caption End If Data1.Recordset.Update MsgBox 增加成功!End SubPrivate

38、 Sub Command2_Click() Text1.Text = Text4.Text = Text2.Text = Text3.Text = Text6.Text = Option1.Value = False Option2.Value = False End SubPrivate Sub Command3_Click()Unload addstudentEnd SubPrivate Sub Image1_Click()End SubPrivate Sub Command1_Click()fakuan.Recordset.AddNew fakuan.Recordset.Fields(卡

39、號(hào)) = Text1.Text fakuan.Recordset.Fields(書(shū)號(hào)) = Text3.Text fakuan.Recordset.Fields(罰金) = Text5.Text If Option1.Value = True Then fakuan.Recordset.Fields(罰款原因) = Option1.Caption Else fakuan.Recordset.Fields(罰款原因) = Option2.Caption End If fakuan.Recordset.Fields(日期) = Date fakuan.Recordset.Update MsgBox

40、 罰款成功!End SubPrivate Sub Command2_Click()Unload fakuan1End SubPrivate Sub Command3_Click()If Option1.Value = True Then Text5.Text = Val(Text2.Text) * 0.1End IfIf Option2.Value = True Then Text5.Text = Val(Text4.Text) * 3 End IfCommand1.Enabled = TrueEnd SubPrivate Sub Command4_Click()lend.Recordset.

41、MoveFirstcondition = 卡號(hào)= & Text1.Text & Do lend.Recordset.FindFirst condition If Not lend.Recordset.NoMatch Then List1.AddItem & lend.Recordset.Fields(書(shū)號(hào)) & & book.Recordset.Fields(書(shū)名) End If lend.Recordset.MoveNextLoop Until lend.Recordset.EOFEnd SubPrivate Sub Command5_Click()lend.Recordset.MoveFi

42、rstcondition4 = 卡號(hào)= & Text1.Text & and 書(shū)號(hào)= & Text3.Text & lend.Recordset.FindFirst condition4If Not lend.Recordset.NoMatch Then fakuan.Recordset.DeleteEnd Ifstudent.Recordset.MoveFirstcondition5 = 卡號(hào)= & Text1.Text & student.Recordset.FindFirst condition5If Not student.Recordset.NoMatch Then student.

43、Recordset.Fields(已借書(shū)數(shù)) = student.Recordset.Fields(已借書(shū)數(shù)) - 1End Ifbook.Recordset.MoveFirstcondition6 = 卡號(hào)= & Text3.Text & book.Recordset.FindFirst condition6 If Not book.Recordset.NoMatch Then book.Recordset.Fields(在庫(kù)數(shù)目) = book.Recordset.Fields(在庫(kù)數(shù)目) + 1 End If MsgBox 還書(shū)成功!End SubPrivate Sub Option1_

44、Click()Text2.Enabled = Truelend.Recordset.MoveFirstcondition2 = 卡號(hào)= & Text1.Text & and 書(shū)號(hào)= & Text3.Text & lend.Recordset.FindFirst condition2If Not lend.Recordset.NoMatch Then Text2.Text = Date - lend.Recordset.Fields(期限日期)End IfCommand3.Enabled = TrueCommand5.Enabled = TrueEnd SubPrivate Sub Option

45、2_Click()Text4.Enabled = Truecondition3 = 書(shū)號(hào)= & Text3.Text & book.Recordset.MoveFirstbook.Recordset.FindFirst condition3If Not book.Recordset.NoMatch Then Text4.Text = book.Recordset.Fields(單價(jià))Else MsgBox 該書(shū)號(hào)不存在,請(qǐng)重試! Exit Sub Text3.SetFocusEnd IfCommand3.Enabled = TrueEnd SubPrivate Sub Command1_Cli

46、ck()Dim A As IntegerIf Text1.Text = Then MsgBox 你還沒(méi)有輸入卡號(hào)呢,請(qǐng)輸入!Else studentdata1.Recordset.MoveFirstflag2: If InStr(studentdata1.Recordset.Fields(卡號(hào)), Text1.Text) And InStr(studentdata1.Recordset.Fields(密碼), Text2.Text) Then If studentdata1.Recordset.Fields(掛失否) = 否 Then A = MsgBox(確定要掛失嗎?, vbOKCance

47、l) If A = 1 Then studentdata1.Recordset.Edit studentdata1.Recordset.Fields(掛失否) = 是 studentdata1.Recordset.Update MsgBox 掛失成功! Unload guashi End If Else MsgBox 該讀者已經(jīng)掛失! End If Else studentdata1.Recordset.MoveNext If Not studentdata1.Recordset.EOF Then GoTo flag2 Else MsgBox 該卡號(hào)不存在 End If End IfEnd If End SubPrivate Sub Command2_Click()Unload guashiEnd SubPrivate Sub Command1_Click()Dim b As IntegerIf Text1.Text = Then MsgBox 你還沒(méi)有輸入卡號(hào)呢,請(qǐng)輸入!Else stu