【正文】 im conn As New Dim sql As String If Trim() = Then MsgBox 請(qǐng)選擇讀者類(lèi)別 , 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=。 amp。 amp。 39。Persist Security Info=false。 data source= amp。 \ sql = select * from 讀者類(lèi)別 sql, conn, adOpenKeyset, adLockPessimistic 基于 VB的圖書(shū) 管理系統(tǒng) 的 設(shè)計(jì)與實(shí)現(xiàn) 21 Do While Not (0) Loop 男 女 End Sub 讀者管理界面設(shè)計(jì) 讀者管理主要針對(duì)所添加的讀者信息進(jìn)行管理，有 圖 44 讀者管理界面 關(guān)鍵代碼如下： Private Sub Command1_Click() Dim rs_findreader As New Dim conn As New Dim sql As String If = vbChecked Then sql = 讀者編號(hào) =39。 Trim( amp。 39。 amp。 ) amp。 基于 VB的圖書(shū) 管理系統(tǒng) 的 設(shè)計(jì)與實(shí)現(xiàn) 22 Else sql = sql amp。 amp。 ) amp。 End If End If If = vbChecked Then If Trim(sql) = Then sql = 讀者類(lèi)別 =39。 Trim( amp。 39。 and 讀者類(lèi)別 =39。 Trim( amp。 39。 data source= amp。 \ If Trim(sql) = Then MsgBox 請(qǐng)選擇查詢(xún)方式 !, vbOKOnly + vbExclamation Exit Sub End If sql = select * from 讀者信息 where amp。 data source= amp。 \ sql, conn, adOpenKeyset, adLockPessimistic If Not Then Do While Not (0) Loop = 0 End If End Sub 還書(shū)界面設(shè)計(jì) 還書(shū)登記界面判斷該圖書(shū)是否過(guò)期，如果過(guò)期則交費(fèi)，沒(méi)有則正常還書(shū)或者續(xù)借 [16]。 amp。 39。 data source= amp。 \ = adUseClient sql, conn, adOpenKeyset, adLockPessimistic Set = rs_reader = False = False = False End Sub 基于 VB的圖書(shū) 管理系統(tǒng) 的 設(shè)計(jì)與實(shí)現(xiàn) 25 Private Sub Command2_Click() Dim rs_book As New Dim conn As New Dim sql As String findform = False sql = select * from 借閱信息 where 書(shū)籍編號(hào) = 39。 amp。 provider=。 amp。 data source= 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。 book_number amp。 39。 amp。 39。 amp。 39。軟件測(cè)試的定義是使用人工和自動(dòng)手段來(lái)運(yùn)行或測(cè)試某個(gè)系統(tǒng)的過(guò)程，其目的在于檢驗(yàn)它是否滿足規(guī)定的需求或弄清預(yù)期結(jié)果與實(shí)際結(jié)果之間的差別 [21]。 白盒測(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ù)定要求正確工作。 本系統(tǒng) 在完成代碼編寫(xiě)后通過(guò)模塊設(shè)計(jì)和源程序，清楚地了解了該模塊的輸入輸出條件和模塊的邏輯結(jié)構(gòu)，采用白盒測(cè)試，檢驗(yàn)程序是否都能按預(yù)定要求正常工作，然后 采 用黑盒法進(jìn)行功能測(cè)試。 1．圖書(shū)管理 模塊 選擇菜單欄上的 “圖書(shū)管理 ”命令 ,即可打開(kāi) 相應(yīng) 窗體，在該 圖書(shū)管 理菜單中包括兩大模塊為圖書(shū)類(lèi)別管理和圖書(shū)信息管理 。 (2) 選擇 “圖書(shū)管理 ”菜單下的“圖書(shū)信息管理” ， 再選擇“添加圖書(shū)信息”輸入要添加的圖書(shū)編號(hào)、書(shū)名、類(lèi)別、出版日期、作者、登記日期、出版社就可以成功的添加書(shū)籍。 基于 VB的圖書(shū) 管理系統(tǒng) 的 設(shè)計(jì)與實(shí)現(xiàn) 29 (1)選擇 “圖書(shū)借閱管理 ”菜單下的“借書(shū)管理 ” ， 再選擇“添加借書(shū)信息”輸入書(shū)名、編號(hào)、圖書(shū)類(lèi)別就可以查詢(xún)到自己想要的圖書(shū)信息 。 系統(tǒng)部分測(cè)試效果圖 在 圖書(shū)管理模塊中的添加圖書(shū)類(lèi)別這一界面，輸入其相關(guān)信息，其運(yùn)行效果如圖 51 所示。 基于 VB的圖書(shū) 管理系統(tǒng) 的 設(shè)計(jì)與實(shí)現(xiàn) 30 圖 52 圖書(shū)借閱管理模塊 運(yùn)行效果圖 測(cè)試結(jié)果分析 通過(guò)以上測(cè)試方法，對(duì)系統(tǒng)的各個(gè)細(xì)節(jié)和模塊功能進(jìn)行了詳細(xì)測(cè)試，得出了以 下結(jié)果： 軟件基本滿足開(kāi)發(fā)需求并實(shí)現(xiàn)了預(yù)期功能，可以對(duì) 圖書(shū)管理 、 讀者管理 、 圖書(shū)借閱管理 和 系統(tǒng)管理進(jìn)行使用和運(yùn)行 等功能 ，對(duì)圖書(shū)的相關(guān)信息進(jìn)行更新和添加刪除。 基于 VB的圖書(shū) 管理系統(tǒng) 的 設(shè)計(jì)與實(shí)現(xiàn) 31 第 6 章 結(jié)束語(yǔ) 通過(guò)這次圖書(shū)管理系統(tǒng)畢業(yè)設(shè)計(jì)，使我更大程度上了解了管理信息系統(tǒng)的功能，提高了實(shí)踐能力。 （ 2）系統(tǒng)的 圖書(shū)分類(lèi)還可以更規(guī)范化一些，使讀者也能夠查閱到更多圖書(shū)信息。使圖書(shū)館管理工作更全面化，科學(xué)化。對(duì)特定讀者的約束還應(yīng)加強(qiáng)其嚴(yán)密性。在實(shí)踐中能夠及時(shí)的發(fā)現(xiàn)問(wèn)題、解決問(wèn)題。 最后，衷心感謝 黃 老師的悉心指導(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)用的查詢(xún)方法 [J].電腦學(xué)習(xí) .2020 [12] 郭鵬 .VB 中處理 復(fù)雜查詢(xún)的方法 [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ì)、幫助和支持下，最終順利完成。 首先，我 要特別 感謝我的指導(dǎo)老師 黃 老師， 黃 老師做事認(rèn)真負(fù)責(zé)，待人親切和藹， 在論文設(shè)計(jì)期間按時(shí)檢查進(jìn)度， 對(duì) 本人 的論文和程序積極督促，耐心指導(dǎo)和正確引導(dǎo) ，及時(shí)詢(xún) 問(wèn)我們?cè)谠O(shè)計(jì)過(guò)程中遇到的困難，他給予我大量的關(guān)心和照顧， 讓我從茫然 不知所措 到如屢平地 ，我非常感謝，為他的行為所感動(dòng) 。 其次， 還要感謝學(xué)院領(lǐng)導(dǎo)這 兩 年來(lái)對(duì)我的培養(yǎng)和關(guān)心，在這 兩 年當(dāng)中，院里領(lǐng)導(dǎo)為我們做好 的服務(wù)工作 ，對(duì)于我們的困難，院領(lǐng)導(dǎo)總是熱情的幫我們解決，我除了學(xué)會(huì)大學(xué)里應(yīng)該學(xué)會(huì)的課程外，還學(xué)會(huì)了怎樣做人，做一個(gè)對(duì)社會(huì)有貢獻(xiàn)的人 ，一個(gè)感恩的人 。 感謝他們?cè)谠O(shè)計(jì)上對(duì)我的關(guān)心和指導(dǎo)，在生活中給予的幫助， 正是有了 他 們的支持，我才能順利的完成畢