XXXX畢業(yè)論文學(xué)院年級(jí)專業(yè)班級(jí)姓名指導(dǎo)老師課題VB環(huán)境下基于ACCESS數(shù)據(jù)庫圖書管理系統(tǒng)的開發(fā)與實(shí)現(xiàn)目錄內(nèi)容摘要1關(guān)鍵詞1ABSTRACT1KEYWORDS11概述211數(shù)據(jù)庫及其應(yīng)用212數(shù)據(jù)庫設(shè)計(jì)概念213數(shù)據(jù)庫設(shè)計(jì)周期32需求分析521項(xiàng)目提出的背景522圖書管理信息系統(tǒng)的構(gòu)成53系統(tǒng)的概念631系統(tǒng)ER圖設(shè)計(jì)632ACCESS數(shù)據(jù)庫設(shè)計(jì)74圖書管理系統(tǒng)的實(shí)現(xiàn)1441管理員登陸模塊設(shè)計(jì)1442增加用戶模塊設(shè)計(jì)1543修改密碼模塊設(shè)計(jì)1744圖書登記模塊設(shè)計(jì)1845圖書借閱模塊設(shè)計(jì)2146圖書賠償模塊設(shè)計(jì)2347查詢輸出模塊設(shè)計(jì)2648值班管理模塊設(shè)計(jì)2749菜單編輯器模塊設(shè)計(jì)305調(diào)試與分析33參考文獻(xiàn)34致謝35VB環(huán)境下基于ACCESS數(shù)據(jù)庫的圖書管理系統(tǒng)的開發(fā)與實(shí)現(xiàn)內(nèi)容摘要圖書管理系統(tǒng)是一個(gè)教育單位不可缺少的部分,是典型的信息管理系統(tǒng)MIS，其開發(fā)主要包括后臺(tái)數(shù)據(jù)庫的建立和維護(hù)以及前端應(yīng)用程序的開發(fā)。對(duì)于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的庫。而對(duì)于后者則要求應(yīng)用程序功能完備,易使用等特點(diǎn)。因此，結(jié)合我校師生較多和生源較雜的情況，以方便我校師生和圖書管理人員，再加上對(duì)MICROSOFTACCESS2003數(shù)據(jù)庫管理系統(tǒng)、VB應(yīng)用程序的學(xué)習(xí)和應(yīng)用，主要完成對(duì)圖書管理系統(tǒng)的需求分析、結(jié)構(gòu)設(shè)計(jì)、總體規(guī)劃及數(shù)據(jù)庫的實(shí)現(xiàn)。關(guān)鍵詞圖書管理、圖書資料、值班管理、系統(tǒng)管理ABSTRACTTHEBOOKMANAGEMENTSYSTEMISANEDUCATIONUNITINDISPENSABILITYOFPART,WHICHISTYPICALMODELOFINFORMATIONMANAGEMENTSYSTEMITSDEVELOPMENTISMAINTOINCLUDEABACKSTAGEDATABASEOFOFESTABLISHMENTANDMAINTENANCEANDHEADAPPLICATIONPROCEDUREOFDEVELOPMENTFORTHEFORMERREQUESTSESTABLISHMENTDATACONSISTENCYANDINTEGRITYSTRONG,THEDATASAFETYGOODDATABASEBUTFORTHELATTERREQUESTSAPPLICATIONTHEPROCEDUREFUNCTIONBECOMPLETED,EASYUSAGEETCCHARACTERISTICSTHEREFORECOMBINGTEACHERSANDTHESTUDENTSINMYSCHOOLISMOREWITHLIVINGTHESOURCEANDMOREMISCELLANEOUSCIRCUMSTANCE,WITHCONVENIENCETEACHERSANDTHESTUDENTSINMYSCHOOLANDBOOKMANAGER,AGAINPLUS2003DATABASESTOTHEMICROSOFTACCESSMANAGEMENTSYSTEM,VBAPPLICATIONPROCEDUREOFSTUDYANDAPPLICATION,ITSMAINCOMPLETIONISTOBOOKMANAGEMENTSYSTEMOFNEEDANALYSIS,STRUCTUREDESIGN,TOTALPROGRAMMINGANDDATABASEOFREALIZATIONKEYWORDSBOOKMANAGEMENT、BOOKDATA、ONDUTYMANAGEMENT、SYSTEMMANAGEMENT第一章概述11數(shù)據(jù)庫及其應(yīng)用從廣義上講，數(shù)據(jù)庫就是數(shù)據(jù)或信息的集合，相當(dāng)于一個(gè)數(shù)據(jù)倉庫。具體地說，數(shù)據(jù)庫是一組經(jīng)過計(jì)算機(jī)整理后的數(shù)據(jù)，它由許多數(shù)據(jù)組成。自20世紀(jì)70年代以來,數(shù)據(jù)庫技術(shù)得到迅速發(fā)展目前世界上已經(jīng)有數(shù)百萬個(gè)數(shù)據(jù)庫系統(tǒng)在運(yùn)行,其應(yīng)用已經(jīng)深入到社會(huì)生活的各個(gè)領(lǐng)域,從企業(yè)管理,銀行管理,資源管理,經(jīng)濟(jì)預(yù)測(cè)一直到信息檢索,檔案管理,普查統(tǒng)計(jì)等。我國(guó)20世紀(jì)90年代初在全國(guó)范圍內(nèi)裝備了12個(gè)以數(shù)據(jù)庫為基礎(chǔ)的大型計(jì)算機(jī)系統(tǒng),這些系統(tǒng)分布在郵電,計(jì)委,銀行,電力,鐵路,氣象,民航,情報(bào),公安,軍事,航天和財(cái)稅等行業(yè)?，F(xiàn)在,數(shù)據(jù)庫技術(shù)還在不斷發(fā)展,并且不斷的與其它計(jì)算機(jī)技術(shù)相互滲透。數(shù)據(jù)庫技術(shù)與網(wǎng)絡(luò)通信技術(shù)相結(jié)合,產(chǎn)生了分布式的數(shù)據(jù)庫系統(tǒng)。數(shù)據(jù)庫技術(shù)與面象對(duì)象技術(shù)相結(jié)合,產(chǎn)生了面向?qū)ο髷?shù)據(jù)庫系統(tǒng)等各種數(shù)據(jù)庫系統(tǒng)。在人類邁向21世紀(jì)知識(shí)經(jīng)濟(jì)的時(shí)候,信息變?yōu)榻?jīng)濟(jì)發(fā)展的戰(zhàn)略資源,信息技術(shù)已成為社會(huì)生產(chǎn)力重要的組成部分。人們充分認(rèn)識(shí)到,數(shù)據(jù)庫是信息化社會(huì)中信息資源管理與開發(fā)利用的基礎(chǔ)。對(duì)于一個(gè)國(guó)家,數(shù)據(jù)庫的建設(shè)規(guī)模,使用水平已成為衡量該國(guó)信息化程度的重要標(biāo)志因此,數(shù)據(jù)庫的學(xué)習(xí)是非常重要的。12數(shù)據(jù)庫設(shè)計(jì)概念數(shù)據(jù)庫設(shè)計(jì)是指對(duì)于一個(gè)給定的應(yīng)用環(huán)境，提供一個(gè)確定最優(yōu)數(shù)據(jù)模型與處理模式的邏輯設(shè)計(jì)，以及一個(gè)確定數(shù)據(jù)庫存儲(chǔ)結(jié)構(gòu)與存取方法的物理設(shè)計(jì)，建立起既能反映現(xiàn)實(shí)世界信息和信息聯(lián)系，滿足用戶數(shù)據(jù)要求和加工要求，又能被某個(gè)數(shù)據(jù)庫管理系統(tǒng)所接受，同時(shí)能實(shí)現(xiàn)系統(tǒng)目標(biāo)，并有效存取數(shù)據(jù)的數(shù)據(jù)庫。當(dāng)數(shù)據(jù)庫所存儲(chǔ)的的信息邏輯關(guān)系簡(jiǎn)單、數(shù)據(jù)記錄量不大時(shí)，數(shù)據(jù)庫的設(shè)計(jì)相對(duì)容易、編輯修改也方便；而當(dāng)數(shù)據(jù)庫內(nèi)容龐大、關(guān)系復(fù)雜且在使用中發(fā)現(xiàn)問題時(shí)再進(jìn)行修改，就有可能造成數(shù)據(jù)丟失，這是用戶所不希望發(fā)生的。所以在設(shè)計(jì)前應(yīng)該精心構(gòu)思，使之遵循以下幾條規(guī)則。規(guī)則一字段的惟一性，即表中的每個(gè)字段只能含有惟一類型的數(shù)據(jù)信息。規(guī)則二記錄的惟一性，即表中沒有完全一樣的兩個(gè)記錄。規(guī)則三功能相關(guān)性，即在數(shù)據(jù)庫中，任意一個(gè)數(shù)據(jù)表都應(yīng)該有一個(gè)主關(guān)鍵字段與表中記錄的各實(shí)體相對(duì)應(yīng)。規(guī)則四字段無關(guān)性，即在不影響其他字段的情況下，必須能夠?qū)θ我庾侄芜M(jìn)行修改總之，用戶在設(shè)計(jì)好一個(gè)數(shù)據(jù)庫之后，可以根據(jù)這4條規(guī)則一條一條地去檢驗(yàn)所設(shè)計(jì)的數(shù)據(jù)庫，對(duì)不合理的地方進(jìn)行修改，以使數(shù)據(jù)庫符合以上規(guī)則。13數(shù)據(jù)庫設(shè)計(jì)周期根據(jù)軟件工程的思想，數(shù)據(jù)庫設(shè)計(jì)的周期可以劃分為六個(gè)階段（1）規(guī)劃階段確定開發(fā)的總目標(biāo)，給出計(jì)劃開發(fā)的軟件系統(tǒng)的功能、性能、可靠性以及接等方面的設(shè)想。（2）需求分析階段認(rèn)真細(xì)致地了解用戶對(duì)數(shù)據(jù)的加工要求，確定系統(tǒng)的功能與邊界。本階段的最終結(jié)果，提供一個(gè)可作為設(shè)計(jì)基礎(chǔ)的系統(tǒng)說明書，包括對(duì)軟硬件環(huán)境的要求和一整套完善的數(shù)據(jù)流程圖。（3）設(shè)計(jì)階段把需求分析階段所確定的功能細(xì)化，主要工作是概念設(shè)計(jì)階段、邏輯設(shè)計(jì)階段、物理設(shè)計(jì)階段，然后，對(duì)每個(gè)階段內(nèi)部設(shè)計(jì)詳細(xì)的流程。（4）程序編制階段以一種或幾種特定的程序設(shè)計(jì)語言表達(dá)上一階段確定的各模塊控制流程。程序編制時(shí)應(yīng)遵循結(jié)構(gòu)化程序設(shè)計(jì)方法。（5）調(diào)試階段對(duì)已編好的程序進(jìn)行單元調(diào)試（分調(diào)），整體調(diào)試（聯(lián)調(diào)）和系統(tǒng)測(cè)試（驗(yàn)收）。（6）運(yùn)行和維護(hù)階段這是整個(gè)設(shè)計(jì)周期最長(zhǎng)的階段，其工作重點(diǎn)是收集和記錄系統(tǒng)實(shí)際運(yùn)行的數(shù)據(jù)。在運(yùn)行中，必須保持?jǐn)?shù)據(jù)庫的完整性，必須有效的處理數(shù)據(jù)故障和進(jìn)行數(shù)據(jù)庫恢復(fù)。同時(shí)解決開發(fā)過程的遺留問題，改正錯(cuò)誤進(jìn)行功能完善?？偨Y(jié)本文設(shè)計(jì)的是一個(gè)關(guān)于學(xué)校圖書館圖書管理的數(shù)據(jù)庫系統(tǒng),通過這個(gè)系統(tǒng)管理員可以快速、方便的對(duì)圖書記錄查閱、增加、刪除等功能，而用戶也可以通過這個(gè)系統(tǒng)進(jìn)行圖書查詢、借閱、歸還等功能。本系統(tǒng)采用MICROSOFTACCESS2003技術(shù)建立數(shù)據(jù)庫，使用VB60技術(shù)建立數(shù)據(jù)源的鏈接,并且生成圖書管理的數(shù)據(jù)庫應(yīng)用程序從而實(shí)現(xiàn)數(shù)據(jù)庫的管理功能。第二章需求分析需求分析階段確定的系統(tǒng)邏輯模型是以后設(shè)計(jì)和實(shí)現(xiàn)目標(biāo)系統(tǒng)的基礎(chǔ)，因此必須準(zhǔn)確完整地體現(xiàn)用戶的要求。在這一章里，我將給出系統(tǒng)的功能結(jié)構(gòu)圖，為系統(tǒng)的設(shè)計(jì)奠定基礎(chǔ)。21項(xiàng)目提出的背景隨著計(jì)算機(jī)技術(shù)的飛速發(fā)展，其應(yīng)用方面已滲透到社會(huì)生活的各個(gè)領(lǐng)域。它已經(jīng)成為我們學(xué)習(xí)和工作的得力助手。在學(xué)校，尤其是在一些高校，圖書是學(xué)校的一項(xiàng)重要資源，圖書的管理也是學(xué)校的一項(xiàng)常規(guī)性的重要工作。近年來，我校招生情況越來越好，所以圖書管理越來越嚴(yán)重。又加之我校自08年10月份升入本科院校之后，由于（生源雜、師生多、管理人員并沒有增加等）種種原因，因此原有的圖書管理系統(tǒng)已不能適應(yīng)現(xiàn)行的工作需要。同時(shí)，以前的圖書管理系統(tǒng)也不能更好地滿足師生借閱圖書的要求，又不能體現(xiàn)我校圖書館藏書豐富的特點(diǎn)。在此種情況下，做一個(gè)結(jié)合我校實(shí)際情況的圖書管理系統(tǒng)是很有必要的。22圖書管理信息系統(tǒng)的構(gòu)成圖書管理圖書資料值班管理系統(tǒng)管理圖書登記圖書借閱圖書賠償查詢輸出增加用戶修改密碼退出圖書管理系統(tǒng)圖22圖書管理系統(tǒng)功能結(jié)構(gòu)圖第三章系統(tǒng)的概念此階段主要的任務(wù)和目標(biāo)是根據(jù)需求分析的結(jié)果，畫出對(duì)應(yīng)的ER圖。對(duì)于復(fù)雜的系統(tǒng)，通常首先要對(duì)它的各功能模塊進(jìn)行分析，然后再把它的功能結(jié)構(gòu)圖畫出來，便是設(shè)計(jì)和優(yōu)化。功能分析之后，再根據(jù)各個(gè)模塊、各個(gè)用戶對(duì)數(shù)據(jù)和使用權(quán)限的不同要求做出局部ER圖，然后再把各個(gè)局部ER圖結(jié)合起來形成統(tǒng)一的整體ER圖。31系統(tǒng)ER圖設(shè)計(jì)軟件系統(tǒng)本質(zhì)上是信息處理系統(tǒng)，因此，在軟件系統(tǒng)的整個(gè)開發(fā)過程中都必須考慮兩方面的問題“數(shù)據(jù)”及對(duì)數(shù)據(jù)的“處理”。為了把用戶的數(shù)據(jù)要求清晰明確地表達(dá)出來，系統(tǒng)分析員通常建立一個(gè)概念性的數(shù)據(jù)模型。概念性數(shù)據(jù)模型是一種面向問題的數(shù)據(jù)模型，是按照用戶的觀點(diǎn)來對(duì)數(shù)據(jù)和信息建模，它描述了從用戶角度看到的數(shù)據(jù)，它反映了用戶的現(xiàn)實(shí)環(huán)境，且與在軟件系統(tǒng)中的實(shí)現(xiàn)方法無關(guān)。這里運(yùn)用最常用的表示概念性數(shù)據(jù)模型的方法，是實(shí)體聯(lián)系方法即ER模型。通常，軟件系統(tǒng)中有許多數(shù)據(jù)是需要長(zhǎng)期保存的。為減少數(shù)據(jù)冗余，簡(jiǎn)化修改數(shù)據(jù)的過程，實(shí)現(xiàn)對(duì)數(shù)據(jù)進(jìn)化、規(guī)范化。圖書登記書名編號(hào)類型定價(jià)購買日期力日?qǐng)D311圖書登記實(shí)體圖書借閱書名編號(hào)類型姓名借書證號(hào)圖312圖書借閱實(shí)體歸還日期日期借閱日期備注圖313圖書賠償實(shí)體圖書賠償書名編號(hào)類型姓名圖書證號(hào)賠償金額損壞程度解決方案值班開始日期值班開始時(shí)間32ACCESS數(shù)據(jù)庫設(shè)計(jì)這里采用ACCESS2003數(shù)據(jù)庫,用ADO作為連接對(duì)象。1建立ACCESS數(shù)據(jù)庫啟動(dòng)MICROSOFTACCESS2003，建立一個(gè)空的數(shù)據(jù)庫LIBRARYMDB,如311所示。使用程序設(shè)計(jì)器建立系統(tǒng)需要的表格如下。圖書登記表，如312值班管理值班人記事值班截止日期圖314值班管理實(shí)體值班截止日期查詢輸出圖書編號(hào)購買日期力日?qǐng)D315查詢輸出實(shí)體圖311建立LIBRARY數(shù)據(jù)庫圖312圖書借閱表圖書借閱表,如313圖313圖書借閱表圖書賠償表，如314圖314圖書賠償表圖書資料表,如315圖315圖書資料表系統(tǒng)管理表,如316圖316系統(tǒng)管理表值班管理表,如317圖317值班管理表2連接數(shù)據(jù)在VISUALBASIC環(huán)境下，選擇菜單欄“工程”“部件”，打開“部件”對(duì)話框，在隨后出現(xiàn)的對(duì)話框中選擇“MICROSOFTADODATACONTROL60”，然后單擊“確定”按鈕，如圖321所示。圖321”部件”對(duì)話框?qū)DO數(shù)據(jù)控件與DATAGRID控件添加到窗體上ADO控件默認(rèn)名為ADODC1，如322所示。圖322窗體上的ADO與DATAGRID控件其中，ADO控件包括一個(gè)連接字符串屬性CONNECTIONSTRING，用于連接到計(jì)算機(jī)上某個(gè)數(shù)據(jù)源。（1）數(shù)據(jù)源連接選擇數(shù)據(jù)源連接方式。鼠標(biāo)右鍵單擊ADO數(shù)據(jù)控件，選擇彈出菜單中的“ADODC”屬性命令，打開控件“屬性頁”對(duì)話框，如圖323所示。數(shù)據(jù)源連接有三種不同的方式，日前使用的方式是“使用連接字符串”。連接字符串包含了用于與數(shù)據(jù)源建立連接的相關(guān)信息。圖323ADO“屬性頁”對(duì)話框選擇數(shù)據(jù)庫類型單擊“生成”按鈕，打開如圖324所示的數(shù)據(jù)鏈接屬性窗口，OLEDB提供者決定了將使用的數(shù)據(jù)庫類型，數(shù)據(jù)提供者可看成某種類型數(shù)據(jù)庫的驅(qū)動(dòng)程序。連接ACCESS2003及更高版本的數(shù)據(jù)庫時(shí)，需要選擇MICROSOFTJET40OLEDBPROVIDER圖324“數(shù)據(jù)鏈接屬性”對(duì)話框指定數(shù)據(jù)庫文件名在選擇了OLEDB提供者后，單擊“下一步”按鈕或選擇“連接”按鈕，進(jìn)入如圖325所示的對(duì)話框，指定數(shù)據(jù)庫文件名。為保證連接有效，可單擊右下方的“測(cè)試連接”按鈕，如果測(cè)試成功則關(guān)閉該對(duì)話框，返回到如圖323所示的“屬性頁”對(duì)話框。圖325指定數(shù)據(jù)庫文件名指定記錄源。選擇圖323中的“RECORDSOURCE”選項(xiàng)卡，彈出記錄源“屬性頁”對(duì)話框，如圖326所示。（2）利用DATAGRID來顯示數(shù)據(jù)選定DATAGRID控件，將其DATASOURCE屬性設(shè)置為ADODC1控件，將網(wǎng)格綁定到產(chǎn)生的記錄集。運(yùn)行該程序即可對(duì)數(shù)據(jù)庫進(jìn)行瀏覽。ADO控件上的4個(gè)箭頭為數(shù)據(jù)庫的導(dǎo)航裝置。單擊最左邊的箭頭移動(dòng)到數(shù)據(jù)庫的第一條記錄，最右邊的箭頭移動(dòng)到數(shù)據(jù)庫的最后一條記錄，中間兩個(gè)箭頭讓分別移動(dòng)到前一條或后一條記錄。第四章圖書管理系統(tǒng)的實(shí)現(xiàn)41管理員登陸模塊設(shè)計(jì)登陸界面的主要任務(wù)根據(jù)用戶名、密碼是否正確來判斷是否可以進(jìn)入系統(tǒng)后臺(tái)。管理員登陸模塊界面代碼如下PRIVATESUBCOMMAND1_CLICKIFTEXT1TEXT“THENMSGBOX“用戶名不能為空“,VBOKONLYEXITSUBELSEIFTEXT2TEXT“THENMSGBOX“密碼不能為空“,VBOKONLYEXITSUBELSEADODC1RECORDSETFIND“用戶名“TEXT1TEXT“IFADODC1RECORDSETEOFFALSETHENIFADODC1RECORDSETFIELDS“密碼“TEXT2TEXTTHENMSGBOX“登錄成功“,VBOKONLYUNLOADMEFORMMAINSHOWELSEMSGBOX“密碼不正確“,VBOKONLYENDIFELSEMSGBOX“用戶名不正確“,VBOKONLYEXITSUBENDIFENDIFENDIFENDSUBPRIVATESUBCOMMAND2_CLICKENDENDSUBPRIVATESUBFORM_LOADADODC1REFRESHENDSUB42增加用戶模塊設(shè)計(jì)增加用戶模塊是用來增加用戶的用戶名、密碼和權(quán)限的。增加用戶模塊界面代碼如下PRIVATESUBCOMMAND1_CLICKIFTEXT1TEXT“THENIFTEXT2TEXTTEXT3TEXTTHENADODC1RECORDSETFIND“用戶名“TEXT1TEXT“IFADODC1RECORDSETEOFFALSETHENMSGBOX“已存在此用戶,請(qǐng)重新輸入“,VBOKONLYEXITSUBELSEADODC1RECORDSETADDNEWADODC1RECORDSETFIELDS“用戶名“TRIMTEXT1TEXTADODC1RECORDSETFIELDS“密碼“TRIMTEXT2TEXTADODC1RECORDSETUPDATEMSGBOX“新用戶添加成功“,VBOKONLYENDIFELSEMSGBOX“兩次密碼輸入不一致,請(qǐng)重新輸入“,VBOKONLYEXITSUBENDIFENDIFENDSUBPRIVATESUBCOMMAND2_CLICKUNLOADMEENDSUBPRIVATESUBFORM_LOADADODC1REFRESHENDSUB43修改密碼模塊設(shè)計(jì)修改密碼模塊是用來修改用戶密碼的。修改密碼界面如下代碼如下PRIVATESUBCOMMAND1_CLICKIFTEXT1TEXT“THENIFTEXT2TEXTTEXT3TEXTTHENADODC1RECORDSETFILTER“用戶名“TRIMTEXT1TEXT“IFADODC1RECORDSETEOFFALSETHENADODC1RECORDSETFIELDS“密碼“TRIMTEXT2TEXTADODC1RECORDSETUPDATEMSGBOX“修改成功“,VBOKONLYEXITSUBELSEMSGBOX“不存在此用戶,無法修改“,VBOKONLYENDIFELSEMSGBOX“兩次密碼輸入不一致,請(qǐng)重新輸入“,VBOKONLYEXITSUBENDIFENDIFENDSUBPRIVATESUBCOMMAND2_CLICKUNLOADMEENDSUBPRIVATESUBFORM_LOADADODC1REFRESHENDSUB44圖書登記模塊設(shè)計(jì)本模塊用來填寫圖書登記的信息。圖書登記模塊界面代碼如下PRIVATESUBCOMMAND1_CLICKONERRORGOTOADDERRTEXT1SETFOCUSADODC1RECORDSETADDNEWEXITSUBADDERRMSGBOXERRDESCRIPTIONENDSUBPRIVATESUBCOMMAND2_CLICKONERRORGOTODELETEERRWITHADODC1RECORDSETIFNOTEOFANDNOTBOFTHENIFMSGBOX“刪除當(dāng)前記錄嗎“,VBYESNOVBQUESTIONVBYESTHENADODC1RECORDSETDELETEADODC1RECORDSETMOVENEXTIFADODC1RECORDSETEOFTHENADODC1RECORDSETMOVELASTENDIFENDIFENDWITHEXITSUBDELETEERRMSGBOXERRDESCRIPTIONENDSUBPRIVATESUBCOMMAND3_CLICKADODC1RECORDSETMOVENEXTIFADODC1RECORDSETEOFTHENMSGBOX“這是最后一條記錄“,VBOKCANCELVBQUESTIONADODC1RECORDSETMOVELASTENDIFENDSUBPRIVATESUBCOMMAND4_CLICKADODC1RECORDSETMOVEPREVIOUSIFADODC1RECORDSETBOFTHENMSGBOX“這是第一條記錄“,VBOKCANCELVBQUESTIONADODC1RECORDSETMOVEFIRSTENDIFENDSUBPRIVATESUBCOMMAND5_CLICKIFADODC1RECORDSETRECORDCOUNT0THENMSGBOX“空記錄“,VBOKCANCELVBQUESTIONELSEADODC1RECORDSETMOVELASTENDIFENDSUBPRIVATESUBCOMMAND6_CLICKIFADODC1RECORDSETEOFTHENMSGBOX“記錄空“,VBOKCANCELVBQUESTIONENDELSEADODC1RECORDSETMOVEFIRSTENDIFEXITSUBENDSUBPRIVATESUBCOMMAND7_CLICKFORMMAINSHOWFORM4HIDEENDSUB45圖書借閱模塊設(shè)計(jì)圖書借閱模塊主要列出了書借閱的詳細(xì)信息。圖書借閱模塊界面代碼如下PRIVATESUBCOMMAND1_CLICKONERRORGOTOADDERRTEXT1SETFOCUSADODC1RECORDSETADDNEWEXITSUBADDERRMSGBOXERRDESCRIPTIONENDSUBPRIVATESUBCOMMAND2_CLICKONERRORGOTODELETEERRWITHADODC1RECORDSETIFNOTEOFANDNOTBOFTHENIFMSGBOX“刪除當(dāng)前記錄嗎“,VBYESNOVBQUESTIONVBYESTHENADODC1RECORDSETDELETEADODC1RECORDSETMOVENEXTIFADODC1RECORDSETEOFTHENADODC1RECORDSETMOVELASTENDIFENDIFENDWITHEXITSUBDELETEERRMSGBOXERRDESCRIPTIONENDSUBPRIVATESUBCOMMAND3_CLICKADODC1RECORDSETMOVENEXTIFADODC1RECORDSETEOFTHENMSGBOX“這是最后一條記錄“,VBOKCANCELVBQUESTIONADODC1RECORDSETMOVELASTENDIFENDSUBPRIVATESUBCOMMAND4_CLICKADODC1RECORDSETMOVEPREVIOUSIFADODC1RECORDSETBOFTHENMSGBOX“這是第一條記錄“,VBOKCANCELVBQUESTIONADODC1RECORDSETMOVEFIRSTENDIFENDSUBPRIVATESUBCOMMAND5_CLICKIFADODC1RECORDSETEOFTHENMSGBOX“記錄空“,VBOKCANCELVBQUESTIONENDELSEADODC1RECORDSETMOVEFIRSTENDIFEXITSUBENDSUBPRIVATESUBCOMMAND6_CLICKIFADODC1RECORDSETRECORDCOUNT0THENMSGBOX“空記錄“,VBOKCANCELVBQUESTIONELSEADODC1RECORDSETMOVELASTENDIFENDSUBPRIVATESUBCOMMAND7_CLICKFORMMAINSHOWFORM6HIDEENDSUB46圖書賠償模塊設(shè)計(jì)該模塊是用來填寫圖書是否損壞及如何賠償?shù)男畔?。圖書賠償模塊界面代碼如下PRIVATESUBCOMMAND1_CLICKONERRORGOTOADDERRTEXT1SETFOCUSADODC1RECORDSETADDNEWEXITSUBADDERRMSGBOXERRDESCRIPTIONENDSUBPRIVATESUBCOMMAND2_CLICKONERRORGOTODELETEERRWITHADODC1RECORDSETIFNOTEOFANDNOTBOFTHENIFMSGBOX“刪除當(dāng)前記錄嗎“,VBYESNOVBQUESTIONVBYESTHENADODC1RECORDSETDELETEADODC1RECORDSETMOVENEXTIFADODC1RECORDSETEOFTHENADODC1RECORDSETMOVELASTENDIFENDIFENDWITHEXITSUBDELETEERRMSGBOXERRDESCRIPTIONENDSUBPRIVATESUBCOMMAND3_CLICKADODC1RECORDSETMOVENEXTIFADODC1RECORDSETEOFTHENMSGBOX“這是最后一條記錄“,VBOKCANCELVBQUESTIONADODC1RECORDSETMOVELASTENDIFENDSUBPRIVATESUBCOMMAND4_CLICKADODC1RECORDSETMOVEPREVIOUSIFADODC1RECORDSETBOFTHENMSGBOX“這是第一條記錄“,VBOKCANCELVBQUESTIONADODC1RECORDSETMOVEFIRSTENDIFENDSUBPRIVATESUBCOMMAND5_CLICKIFADODC1RECORDSETEOFTHENMSGBOX“記錄空“,VBOKCANCELVBQUESTIONENDELSEADODC1RECORDSETMOVEFIRSTENDIFEXITSUBENDSUBPRIVATESUBCOMMAND6_CLICKIFADODC1RECORDSETRECORDCOUNT0THENMSGBOX“空記錄“,VBOKCANCELVBQUESTIONELSEADODC1RECORDSETMOVELASTENDIFENDSUBPRIVATESUBCOMMAND7_CLICKFORMMAINSHOWFORM7HIDEENDSUB47查詢輸出模塊設(shè)計(jì)查詢輸出模塊的主要任務(wù)就是對(duì)所有圖書信息進(jìn)行查詢。查詢輸出界面代碼如下PRIVATESUBCOMMAND1_CLICKDIMCONDITIONASSTRINGIFTEXT1TEXT“THENCONDITIONCOMBO1TEXT“TEXT1TEXT“ADODC1RECORDSETFILTERCONDITIONIFADODC1RECORDSETEOFTRUETHENMSGBOX“沒有你要搜索的信息“,VBOKONLYENDIFSETDATAGRID1DATASOURCEADODC1ELSEMSGBOX“搜索條件不能為空“,VBOKONLYENDIFENDSUBPRIVATESUBCOMMAND2_CLICKFORMMAINSHOWFORM3HIDEENDSUBPRIVATESUBFORM_LOADCOMBO1ADDITEM“購買日期“ENDSUB48值班管理模塊設(shè)計(jì)值班管理模塊的作用是把值班人員的時(shí)間安排形成列表。值班管理界面代碼如下PRIVATESUBCOMMAND1_CLICKONERRORGOTOADDERRORIFCOMMAND1CAPTION“新增記錄“THENCOMMAND1CAPTION“確定“COMMAND2ENABLEDFALSEDATAGRID1ALLOWADDNEWTRUEDATAGRID1ALLOWUPDATETRUEELSEIFNOTISNULLDATAGRID1BOOKMARKTHENIFNOTISDATETRIMDATAGRID1COLUMNS“值班開始日期“CELLTEXTDATAGRID1BOOKMARKTHENMSGBOX“請(qǐng)按照格式Y(jié)YYYMMDD輸入值班開始日期“,VBOKONLYVBEXCLAMATION,“EXITSUBENDIFIFNOTISDATETRIMDATAGRID1COLUMNS“值班開始時(shí)間“CELLTEXTDATAGRID1BOOKMARKTHENMSGBOX“請(qǐng)按照格式HHMM輸入值班開始時(shí)間“,VBOKONLYVBEXCLAMATION,“EXITSUBENDIFIFNOTISDATETRIMDATAGRID1COLUMNS“值班截止日期“CELLTEXTDATAGRID1BOOKMARKTHENMSGBOX“請(qǐng)按照格式Y(jié)YYYMMDD輸入值班截止日期“,VBOKONLYVBEXCLAMATION,“EXITSUBENDIFIFNOTISDATETRIMDATAGRID1COLUMNS“值班截止時(shí)間“CELLTEXTDATAGRID1BOOKMARKTHENMSGBOX“請(qǐng)按照格式HHMM輸入值班截止時(shí)間“,VBOKONLYVBEXCLAMATION,“EXITSUBENDIFIFTRIMDATAGRID1COLUMNS“值班人“CELLTEXTDATAGRID1BOOKMARK“THENMSGBOX“值班人不能為空“,VBOKONLYVBEXCLAMATION,“EXITSUBENDIFADODC1UPDATEMSGBOX“添加信息成功“,VBOKONLYVBEXCLAMATION,“DATAGRID1ALLOWADDNEWFALSEDATAGRID1ALLOWUPDATEFALSEELSEMSGBOX“沒有添加信息“,VBOKONLYVBEXCLAMATION,“ENDIFCOMMAND1CAPTION“新增記錄“COMMAND2ENABLEDTRUEENDIFADDERRORIFERRNUMBER0THENMSGBOXERRDESCRIPTIONENDIFENDSUBPRIVATESUBCOMMAND2_CLICKDIMANSWERASSTRINGONERRORGOTODELERRORANSWERMSGBOX“確定要?jiǎng)h除嗎“,VBYESNO,“IFANSWERVBYESTHENDATAGRID1ALLOWDELETETRUEADODC1DELETEADODC1UPDATEDATAGRID1REFRESHMSGBOX“成功刪除“,VBOKONLYVBEXCLAMATION,“DATAGRID1ALLOWDELETEFALSEELSEEXITSUBENDIFDELERRORIFERRNUMBER0THENMSGBOXERRDESCRIPTIONENDIFEND