【正文】 = False = False End Sub Private Sub Command3_Click() Dim book_number As String Dim reader_number As String Dim answer As String Dim rs_back As New Dim conn As New Dim sql As String provider=。 amp。 amp。 ) amp。 amp。 39。 amp。 amp。在點(diǎn)擊各模塊中的菜單后，會(huì)在主界面上顯示相對(duì)于該功能的界面 [14]。 基于 VB的圖書(shū) 管理系統(tǒng) 的 設(shè)計(jì)與實(shí)現(xiàn) 16 圖 41登錄界面 關(guān)鍵代碼如下： Private Sub cmdOK_Click() Dim sql As String Dim rs_login As New Dim conn As New provider=。 2．讀者查詢窗口設(shè)計(jì)：提供多種查詢方式以供用戶選擇，在輸入關(guān)鍵字一欄也可以輸入讀者關(guān)鍵字，查詢讀者信息。還有圖書(shū)館中最常借閱的書(shū)的統(tǒng)計(jì)，即最受歡迎圖書(shū)。 1．圖書(shū)管理部分：這一部分包括圖書(shū)信息的更新和圖書(shū)信息查詢兩部分。 圖 33 讀者 ER 圖 圖書(shū)實(shí)體與屬性如圖 34 所示，圖書(shū)的屬性主要包括：圖書(shū)編號(hào)，圖書(shū)名稱，圖書(shū)作者，出版社，出版時(shí)間，圖書(shū)類型 ，圖書(shū)狀態(tài)，進(jìn)庫(kù)時(shí)間，借閱數(shù)量，圖書(shū)總數(shù)，圖書(shū)單價(jià)，圖書(shū)簡(jiǎn)介。準(zhǔn)確性如電話號(hào)碼的輸入必須是 數(shù)字，且大于等于九位數(shù)。 數(shù)據(jù)庫(kù)及數(shù)據(jù)的要求 劃分為數(shù)據(jù)庫(kù)、數(shù)據(jù)訪問(wèn)層和業(yè)務(wù)邏輯層 [11]。 Access 2020的功能十分強(qiáng)大，利用它可以方便地實(shí)現(xiàn)對(duì)信息保存、維護(hù)、查詢、統(tǒng)計(jì)、打印、交流、發(fā)布，而且它可以十分方便地與 Office 其他組件交流數(shù)據(jù)，這些功能對(duì)于一般用戶而言已經(jīng)足夠了 [9]。 系統(tǒng)開(kāi)發(fā)環(huán)境的分析 本系統(tǒng)的開(kāi)發(fā)目標(biāo)是為了實(shí)現(xiàn)圖書(shū)管理系統(tǒng)在管理方面的自動(dòng)化和系統(tǒng)化，為圖書(shū)在借閱、歸還、查詢方面等提高效率。針對(duì)這四個(gè)方面可行性都是沒(méi)有問(wèn)題的，本系統(tǒng)預(yù)采用 Visual Basic 編程語(yǔ)言加Access 數(shù)據(jù)庫(kù)。這些信息的發(fā)布和注銷要求管理員及時(shí)掌握，時(shí)效性非常重要。當(dāng)然，如果能夠作到盡善盡美更好，但是學(xué)校的資金和場(chǎng)地能否達(dá)到也是要考慮的。 基于 VB的圖書(shū) 管理系統(tǒng) 的 設(shè)計(jì)與實(shí)現(xiàn) 3 計(jì)和數(shù)據(jù)庫(kù)設(shè)計(jì)，以及系統(tǒng)測(cè)試。圖書(shū)管理信息化是信息發(fā)展的必然趨勢(shì)。隨著數(shù)據(jù)庫(kù)技術(shù)、網(wǎng)絡(luò)技術(shù)和科學(xué)管理方法的發(fā)展，計(jì)算機(jī)在管理上的應(yīng)用日益廣泛，管理信息系統(tǒng)逐漸成熟起來(lái)，并且給管理帶來(lái)了新的革命。 Visual Basic。利用 VB 技術(shù)及其提供的各種面向?qū)ο蟮拈_(kāi)發(fā)工具，建立完整性強(qiáng)、安全性好的數(shù)據(jù)庫(kù)，開(kāi)發(fā)出功能完備，易使用的應(yīng)用程序。 一個(gè)好的圖書(shū)館系統(tǒng)對(duì)管理員方便管理書(shū)籍，對(duì)借閱者方便很好的借閱書(shū)籍。 該圖書(shū)館管理系統(tǒng)采用 Access 2020 數(shù)據(jù)庫(kù)管理系統(tǒng)、 Visual Basic 應(yīng)用程序設(shè)計(jì)技術(shù)，本系統(tǒng)主要完成對(duì)圖書(shū)管理系統(tǒng)的需求分析、功能模塊劃分、數(shù)據(jù)庫(kù)模式分析，并由此設(shè)計(jì)了數(shù)據(jù)庫(kù)結(jié)構(gòu)和應(yīng)用程序。在未來(lái)對(duì)于圖書(shū)管理信息化的要求會(huì)更高，圖書(shū)管理系統(tǒng)的目的是應(yīng)用信息化的技術(shù)對(duì)圖書(shū)進(jìn)行的管理，減少大量的數(shù)據(jù)冗余和傳統(tǒng)管理的繁瑣工作量，實(shí)現(xiàn)圖書(shū)系 統(tǒng)的主要子模塊有圖書(shū)管理，讀者管理，借閱管理等，可實(shí)現(xiàn)日常圖書(shū)管理業(yè)務(wù)，最終達(dá)到提高工作效率的目的 [1]。手工管理還存在許多弊端 ,由于不可避免的人為因素 ,造成數(shù)據(jù)的遺漏、誤報(bào)等。 論文結(jié)構(gòu) 本文介紹了圖書(shū)館管理系統(tǒng)的開(kāi)發(fā)前景、需求分析、各功能模塊的設(shè)計(jì)和主要功能實(shí)現(xiàn)。圖書(shū)館作為政府，學(xué)校，以及一些其他辦學(xué)機(jī)構(gòu)所開(kāi)辦的公眾性場(chǎng)所，其商業(yè)性質(zhì)不能和其他商業(yè)機(jī)構(gòu)相提并論。一個(gè)好的圖書(shū)館不僅僅看它的藏書(shū)的種類和數(shù)量是否齊全，還要看它的管理機(jī)制是否健全。通過(guò)長(zhǎng)時(shí)間的觀察與實(shí)踐，我認(rèn)為圖書(shū)館管理系統(tǒng)的可行性分析如下： 技術(shù)可行性分析 技術(shù)上的可行性分析主要分析現(xiàn)有技術(shù)條件能否順利完成開(kāi)發(fā)工作，硬件、軟件配置能否滿足開(kāi)發(fā)者的需要，各類技術(shù)人員的數(shù)量， 水平，來(lái)源等。同時(shí)也促進(jìn)了學(xué)校信息化的進(jìn)程，提高學(xué)院的管理效率。 VB 是具有強(qiáng)大功能的軟件，主要表現(xiàn)在：所見(jiàn)即所得的界面設(shè)計(jì)，基于對(duì)象的設(shè)計(jì)方法，極短的軟件開(kāi)發(fā)周期，較易維護(hù)的生成代碼。 圖書(shū)管理的業(yè)務(wù)其實(shí)說(shuō)起來(lái)也都大同小異，管理對(duì)象也就是讀者和圖書(shū) [10]。 (2)數(shù)據(jù)訪問(wèn)層建立在數(shù)據(jù)庫(kù)之上，應(yīng)用程序通過(guò)該層訪問(wèn)數(shù)據(jù)庫(kù)。 系統(tǒng)組織機(jī)構(gòu)圖 用 戶 登 錄讀 者 數(shù) 據(jù) 管 理借 書(shū)圖 書(shū) 編 目 管 理還 書(shū)續(xù) 借借 閱 記 錄 查 詢系 統(tǒng) 用 戶 管 理圖 書(shū) 書(shū) 目 查 詢維 護(hù) 人 員借 閱 者工 作 人 員 圖 31組織機(jī)構(gòu)圖 本圖書(shū)管理系統(tǒng)是針對(duì)院校而開(kāi)發(fā)的，主要有四個(gè)部門(mén)。身份不同，借書(shū)數(shù)量和借書(shū)期限都 有所不同。 2．讀者管理部分：這一部分包括讀者信息的更新管理和讀者信息查詢管理兩部分。 本系統(tǒng)界面始終一致，減輕了用戶的負(fù)擔(dān)，讓用戶始終用同一種方式思考與操作。讀者編號(hào)采用順序碼如： R001,R 代表 Reader 即讀者， 001 讀者編號(hào)。 \ If Trim() = Then MsgBox 用戶名不能為空，請(qǐng)重新輸入！ Else sql = select * from 用戶表 where user_ID=39。 圖 43 添加讀者界面 關(guān)鍵代碼如下： Private Sub Command1_Click() Dim rs_addreader As New Dim conn As New Dim sql As String If Trim() = Then MsgBox 請(qǐng)選擇讀者類別 , vbOKOnly + vbExclamation, Exit Sub End If If Trim() = Then MsgBox 讀者姓名不能為空 , vbOKOnly + vbExclamation, Exit Sub 基于 VB的圖書(shū) 管理系統(tǒng) 的 設(shè)計(jì)與實(shí)現(xiàn) 19 End If If Trim() = Then MsgBox 讀者編號(hào)不能為空 , vbOKOnly + vbExclamation, Exit Sub End If If Not IsDate() Then MsgBox 請(qǐng)按照 yyyymmdd 格式輸入登記日期 , vbOKOnly + vbExclamation, Exit Sub End If If Trim() = Then MsgBox 請(qǐng)選讀者性別 , vbOKOnly + vbExclamation, Exit Sub End If provider=。Persist Security Info=false。 39。 amp。 39。 data source= amp。 amp。 amp。 \ book_number = (3).CellValue() reader_number = (1).CellValue() answer = MsgBox(確定要還這本書(shū)嗎 ?, vbYesNo, ) 基于 VB的圖書(shū) 管理系統(tǒng) 的 設(shè)計(jì)與實(shí)現(xiàn) 26 If answer = vbYes Then sql = select * from 借閱信息 where 書(shū)籍編號(hào) = 39。 39。 白盒測(cè)試是按照程序內(nèi)部的結(jié)構(gòu)測(cè)試程序，通過(guò)測(cè)試來(lái)檢測(cè)產(chǎn)品內(nèi)部動(dòng)作是否按照設(shè)計(jì)規(guī)格說(shuō)明書(shū)的規(guī)定正常進(jìn)行，檢驗(yàn)程序中的每條通路是否都能按預(yù)定要求正確工作。 基于 VB的圖書(shū) 管理系統(tǒng) 的 設(shè)計(jì)與實(shí)現(xiàn) 29 (1)選擇 “圖書(shū)借閱管理 ”菜單下的“借書(shū)管理 ” ， 再選擇“添加借書(shū)信息”輸入書(shū)名、編號(hào)、圖書(shū)類別就可以查詢到自己想要的圖書(shū)信息 。 （ 2）系統(tǒng)的 圖書(shū)分類還可以更規(guī)范化一些，使讀者也能夠查閱到更多圖書(shū)信息。 最后，衷心感謝 黃 老師的悉心指導(dǎo)和幫助我的同學(xué)們！ 基于 VB的圖書(shū) 管理系統(tǒng) 的 設(shè)計(jì)與實(shí)現(xiàn) 32 參考文獻(xiàn) [1]姚迎 .我國(guó)公共圖書(shū)館管理的創(chuàng)新 [D],武漢大學(xué) ,2020 年 [2]彭蓮好 .圖書(shū)館隱知識(shí)管理研究 [D],武漢大學(xué) ,2020 年 [3] 龍浩健 .《圖書(shū)館計(jì)算機(jī)集成系統(tǒng)管理及維護(hù)策略》 [J ].現(xiàn)代圖書(shū)情報(bào)技 術(shù) ,2020 [4] 申傳斌 .教學(xué)型高校圖書(shū)館管理模式重構(gòu)研究 [D],四川大學(xué) ,2020 年 [5] 葉俊民，汪望珠 .面向?qū)ο筌浖こ?[M] .第二版 .清華大學(xué)出版社 , [6] 人杰、殷人昆、陶永雷 .《實(shí)用軟件工程（第二版） 》清華大學(xué)出版社 [7] 趙池龍 ,楊林 ,孫偉 .實(shí)用軟件工程 (第 2 版 )[M].北京 .電子工業(yè)出版社 ,2020 [8] Visual Basic 程序設(shè)計(jì)，劉新民，清華大學(xué)出版社， 2020 [9] 李耀洲，馬廣月，王堯，黃青等編著《中文 Access2020 實(shí)用教程》，人民郵電出版社， 2020 [10] 劉銘徽 .基于 VB 的圖書(shū)管理系統(tǒng)設(shè)計(jì) [J].湖北經(jīng)濟(jì)學(xué)院學(xué)報(bào) (人文社會(huì)科學(xué) 版 ),2020 [11] 李占宣 .數(shù)據(jù)庫(kù)中面向復(fù)雜應(yīng)用的查詢方法 [J].電腦學(xué)習(xí) .2020 [12] 郭鵬 .VB 中處理 復(fù)雜查詢的方法 [J].中國(guó)高新技術(shù)企業(yè) .2020 [13] Visual Basic 程序設(shè)計(jì)教程，龔沛增，清華大學(xué)出版社， 2020 [14] Visual Basic 程序設(shè)計(jì)教程，羅朝盛，人民郵電出版社， 2020 [15] （美） Paul Vick 著：《 Visual 編程語(yǔ)言（英文版）》，電子工 業(yè)出版社， [16] 銀華強(qiáng) .visual 經(jīng)典開(kāi)發(fā)案例 [M].中國(guó)鐵道出版社 [17] 胡勝利 .動(dòng)態(tài)報(bào)表在 中的設(shè)計(jì)和實(shí)現(xiàn) [J].江蘇技術(shù)師范學(xué)院學(xué)報(bào) . [18] 喬美娥 .ADO 技術(shù)在 VB 系統(tǒng)開(kāi)發(fā)中的高級(jí)應(yīng)用 [J].中國(guó)科技信息 .2020 [19] 姚小兵 .VB 中 ADO 技術(shù)的應(yīng)用 [J].電腦與信息技術(shù) .2020 [20] 鄭阿奇，彭作民 . Visual 程序設(shè)計(jì)教程 [M] .機(jī)械工業(yè)出版社， [21] 朱少民 .軟件測(cè)試方法和技術(shù) [M].北京 :清華大學(xué)出版社 ,2020 基于 VB的圖書(shū) 管理系統(tǒng) 的 設(shè)計(jì)與實(shí)現(xiàn) 33 [22] Gerald ,劉旭輝 ,周維續(xù)譯 .Database Management Systems Designing and Building Business Applications(Third Edition)[M].北京 :機(jī)械工業(yè)出版社 ,2020 基于 VB的圖書(shū) 管理系統(tǒng) 的 設(shè)計(jì)與實(shí)現(xiàn) 34 致 謝 畢業(yè)設(shè)計(jì)終于結(jié)束，此為大學(xué)里最后一次考核，我在大家的鼓勵(lì)、幫助和支持下，最終順