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