【文章內(nèi)容簡(jiǎn)介】 ... 圖 （ 1） 圖書(shū)信息 ER 圖 為了記錄借閱圖書(shū)的的讀者信息，特規(guī)劃出讀者信息實(shí)體，該實(shí)體包括讀者編號(hào)、讀者姓名、性別、手機(jī)號(hào)碼、登記日期等屬性。讀者信息實(shí)體的 ER 圖如圖 （ 2）。 ... 圖 （ 2） 讀者信息 ER 圖 讀者借書(shū)、讀者還書(shū)信息實(shí)體 ER 圖如 （ 3）、 （ 4）所示。 ? 圖 （ 3） 借書(shū)信息 ER 圖 書(shū)籍名稱(chēng) 類(lèi)別代碼 作者 ISBN 出版社 條碼號(hào) 圖書(shū)信息 讀者信息 讀者編號(hào) 讀者姓名 性別 手機(jī)號(hào)碼 住址 登記日期 稱(chēng) 讀者借書(shū) 讀者編號(hào) 讀者姓名 條碼號(hào) 書(shū)籍名稱(chēng) 借書(shū)日期 還書(shū)日期 圖書(shū)管理系統(tǒng) (Visual Basic + Access ) 10 / 43 ? 圖 （ 4） 還書(shū)信息 ER 圖 數(shù)據(jù)庫(kù)的邏輯設(shè)計(jì) 根據(jù)設(shè)計(jì)好的 ER 圖在數(shù)據(jù)庫(kù)中創(chuàng)建數(shù)據(jù)表，系統(tǒng)數(shù)據(jù)庫(kù)中各表的結(jié)構(gòu)如下。 Books（圖書(shū)信息表）用于存儲(chǔ)圖書(shū)館中的圖書(shū)信息，其結(jié)構(gòu)如表 （ 1）。 字段名稱(chēng) 數(shù)據(jù)類(lèi)型 字段大小 書(shū)籍名稱(chēng) 文本 50 類(lèi)別代碼 文本 20 作者 文本 20 出版社 文本 30 訂購(gòu)價(jià)格 貨幣 復(fù)本數(shù) 數(shù)字（小數(shù)） 附件 文本 10 條碼號(hào) 文本 30 規(guī)定天數(shù) 數(shù)字（小數(shù)） ISBN 文本 30 借書(shū)數(shù)量 數(shù)字（長(zhǎng)整型） 表 （ 1） books表的結(jié)構(gòu) dzxxtb（讀者信息表）用于存儲(chǔ)圖書(shū)館中所有讀者的相關(guān)信息，其結(jié)構(gòu)如表 （ 2）。 字段名稱(chēng) 數(shù)據(jù)類(lèi)型 字段大小 讀者編號(hào) 文本 50 讀者還書(shū) 借出日期 還書(shū)日期 書(shū)籍名稱(chēng) 讀者編號(hào) 實(shí)際天數(shù) 條碼號(hào) 圖書(shū)管理系統(tǒng) (Visual Basic + Access ) 11 / 43 讀者姓名 文本 50 性別 文本 10 手機(jī)號(hào)碼 文本 50 住址 文本 50 登記日期 日期 /時(shí)間 表 （ 2） dzxxtb表的結(jié)構(gòu) dzjstb(讀者借書(shū)表 )用于保存讀者所借圖書(shū)的相關(guān)信息，其結(jié)構(gòu)如表（ 3）。 字段名稱(chēng) 數(shù)據(jù)類(lèi)型 字段大小 讀者編號(hào) 文本 50 讀者姓名 文本 10 條碼號(hào) 文本 30 書(shū)籍名稱(chēng) 文本 50 書(shū)籍價(jià)格 貨幣 規(guī)定天數(shù) 數(shù)字（小數(shù)） 出版社 文本 30 作者 文本 20 借書(shū)數(shù)量 數(shù)字（長(zhǎng)整型） 類(lèi)別代碼 文本 5 借書(shū)日期 日期 /時(shí)間 應(yīng)還日期 日期 /時(shí)間 借 文本 4 表 （ 3） dzjstb表的結(jié)構(gòu) dzhstb（讀者還書(shū)表）用于存儲(chǔ)讀者的還書(shū)信息，其結(jié)構(gòu)如表 （ 4）。 字段名稱(chēng) 數(shù)據(jù)類(lèi)型 字段大小 條碼號(hào) 文本 30 讀者編號(hào) 文本 50 書(shū)籍名稱(chēng) 文本 50 書(shū)籍價(jià)格 貨幣 出版社 文本 30 作者 文本 20 規(guī)定天數(shù) 數(shù)字（小數(shù)） 借出日期 日期 /時(shí)間 圖書(shū)管理系統(tǒng) (Visual Basic + Access ) 12 / 43 歸還日期 日期 /時(shí)間 實(shí)際天數(shù) 數(shù)字（小數(shù)） 實(shí)還日期 日期 /時(shí)間 超出天數(shù) 數(shù)字（小數(shù)） 表 （ 4） dzhstb表的結(jié)構(gòu) User(用戶信息表 )用于存儲(chǔ)系統(tǒng)用戶的信息，其結(jié)構(gòu)如表 （ 5）。 字段名稱(chēng) 數(shù)據(jù)類(lèi)型 字段大小 用戶名稱(chēng) 文本 50 密碼 （ 5） user表的結(jié)構(gòu) 數(shù)據(jù)庫(kù)的調(diào)整維護(hù) 由于應(yīng)用環(huán)境不斷變化，數(shù)據(jù)庫(kù)運(yùn)行過(guò)和中物理存儲(chǔ)也會(huì)不斷變化，對(duì)數(shù)據(jù)庫(kù)設(shè)計(jì)進(jìn)行調(diào)整，修改等維護(hù)工作是設(shè)計(jì)工作的繼續(xù)和提高。對(duì)數(shù)據(jù)庫(kù)經(jīng)常性的維護(hù)工作主要包括： （ 1） .數(shù)據(jù)庫(kù)的轉(zhuǎn)儲(chǔ)和恢復(fù) 針對(duì)不同的應(yīng)用要求制定不同的轉(zhuǎn)儲(chǔ)計(jì)劃，保證一旦發(fā)生故障能盡快將數(shù)據(jù)庫(kù)恢復(fù)到某種一致的狀態(tài)，盡可能減少對(duì)數(shù)據(jù)庫(kù)的破壞。 （ 2） .數(shù)據(jù)庫(kù)的安全性、完整性控制 在數(shù)據(jù)庫(kù)運(yùn)行過(guò)程中由于應(yīng)用環(huán)境的變 化，對(duì)安全性的要求也會(huì)發(fā)生變化，如原來(lái)機(jī)密的數(shù)據(jù)現(xiàn)在可以公開(kāi)查詢了，新加入的數(shù)據(jù)又可能是機(jī)密的了。系統(tǒng)中用戶的密級(jí)改變。這都需要根據(jù)實(shí)際情況修改原有的安全性控制，可以設(shè)置數(shù)據(jù)庫(kù)密碼及用戶權(quán)限。 （ 3） .數(shù)據(jù)庫(kù)的重組及重構(gòu)造 數(shù)據(jù)庫(kù)運(yùn)行一段時(shí)間后，由于記錄不斷增、刪、改，增添、修改的數(shù)據(jù)不能為空，否則不能保存到數(shù)據(jù)庫(kù)中。使數(shù)據(jù)庫(kù)的物理存儲(chǔ)情況變壞，降低了數(shù)據(jù)的存取效率，數(shù)據(jù)庫(kù)性能下降，這時(shí)要對(duì)數(shù)據(jù)庫(kù)進(jìn)行重組織，或部分重組織（只對(duì)頻繁增、刪的表進(jìn)行重組織），按原設(shè)計(jì)要求重新安排存儲(chǔ)位置、回收垃圾、減少指針鏈等， 提高系統(tǒng)性能。 圖書(shū)管理系統(tǒng) (Visual Basic + Access ) 13 / 43 第四章 系統(tǒng)的需求分析 隨著科學(xué)技術(shù)的不斷提高 ， 計(jì)算機(jī)科學(xué)日漸成熟 ， 其強(qiáng)大的功能已為人們深刻認(rèn)識(shí) ， 它已進(jìn)入人類(lèi)社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來(lái)越重要的作用。作為計(jì)算機(jī)應(yīng)用的一部分 ， 使用計(jì)算機(jī)對(duì)圖書(shū)資源信息進(jìn)行管理 ， 具有手工管理所無(wú)法比擬的優(yōu)點(diǎn) 。 例如 :查閱迅速、安全性高、可靠性高、存儲(chǔ)量大、保密性好、成本低等。這些優(yōu)點(diǎn)能夠極大地提高圖書(shū)館管理的效率 ，也是學(xué)校的科學(xué)化、正規(guī)化管理 ， 與世界接軌的重要條件，因此，開(kāi)發(fā)這樣的管理軟件是很有必要。 系統(tǒng)的功能概述 用戶的需求可分為三個(gè)方面：一方面是 圖書(shū)館工作人員通過(guò)圖書(shū)管理系統(tǒng)來(lái)管理各類(lèi)圖書(shū)，使得圖書(shū)館的各項(xiàng)工作能夠有序地進(jìn)行，從而滿足學(xué)生的需求；二方面是學(xué)生們能通過(guò)該系統(tǒng)來(lái)查詢圖書(shū)館中的各類(lèi)圖書(shū)，來(lái)確定自已需要的書(shū)籍的借閱情況，為借閱做好準(zhǔn)備；三方面是對(duì)圖書(shū)館數(shù)據(jù)庫(kù)管理的需求，數(shù)據(jù)庫(kù)在系統(tǒng)中扮演著極其重要的角色，所以能對(duì)系統(tǒng)數(shù)據(jù)庫(kù)進(jìn)行安全和全面地管理也成為了圖書(shū)管理者的一個(gè)重要需求。 系統(tǒng) 功能分析 圖書(shū)信息管理模塊： 訂購(gòu)新書(shū) ； 驗(yàn)收入庫(kù) ； 圖書(shū)信息檢索 ； 修改、刪除 圖書(shū)信息； 讀者信息管理模塊： 登記 讀者信息；修改讀者信息； 刪除讀者信息；查詢讀者信息； 讀者借閱管理模塊： 借書(shū)管理 ； 還書(shū)管理 ； 超提提醒 ； 丟失管理 ； 續(xù)借管理； 圖書(shū)管理系統(tǒng) (Visual Basic + Access ) 14 / 43 用戶管理維護(hù)模塊： 用戶管理；口令更改； 系統(tǒng)設(shè)置； 第五章 系統(tǒng)的模塊設(shè)計(jì) 公共模塊設(shè)計(jì) 通過(guò)使用模塊可以減少程序的代碼量。在系統(tǒng)中，將數(shù)據(jù)庫(kù)連接的通用代碼以及公共全局變量等都集中存放在數(shù)據(jù)模塊中，從而節(jié)省代碼量，提高編程效率 ，同時(shí)使得修改和維護(hù)代碼都很方便 。 模塊中定義的公共變量如下 ： Public temp,str,BS As String 定義字符串變量 Public adoCon As New 定義數(shù)據(jù)連接變量 Public adoRs As New 定義數(shù)據(jù)集對(duì)象 為了優(yōu)化 ADO 數(shù)據(jù)庫(kù)的連接，可以在公共模塊中建立數(shù)據(jù)庫(kù)連接共享函數(shù)以及共享數(shù)據(jù)庫(kù)連接字符串。這樣，如果使用對(duì)象操作數(shù)據(jù)庫(kù)，就可以直接調(diào)用數(shù)據(jù)庫(kù)連接 n 函數(shù)。如果使用 ADO 控件訪問(wèn)數(shù)據(jù)庫(kù)，可直接將數(shù)據(jù)庫(kù)共享連接字符串變量的值 賦給 ADO控件的 ConnectionString屬性，從而避免使用 ADO 控件頻繁地建立數(shù)據(jù)庫(kù)連接。 模塊中連接數(shù)據(jù)庫(kù)的程序代碼如下： Function n()As ADODB Connection Set n = New 實(shí)例化對(duì)象 執(zhí)行數(shù)據(jù)庫(kù)連接 “Provider=。DataSource=“amp。 amp。”\。Presist Security Info=False” End Function 圖書(shū)管理系統(tǒng) (Visual Basic + Access ) 15 / 43 主窗體的設(shè)計(jì) 主窗體用于調(diào)用程序的所有功能，該主窗體主要有菜單欄，帶圖片的工具欄、左側(cè)的樹(shù)狀導(dǎo)航菜單、右側(cè)的功能列表以及底部的狀態(tài)欄組成。用戶單擊左側(cè)的樹(shù)狀導(dǎo)航菜單中的節(jié)點(diǎn)，可以在右側(cè)的窗格中顯示出該主菜單下的子菜單。 如圖 .(1)。 圖 .(1) 圖書(shū)管理系統(tǒng) 主窗體 技術(shù)分析： 在主窗體中使用一個(gè)比較重要的控件就是 TreeView 控件 以及 ListView控件。在窗體加載的時(shí)候調(diào)用自定義的過(guò)程 Tree_Change,向 TreeView 控件中添加菜單信息，這里主要應(yīng)用的就是 TreeView 控件中的 Node 對(duì)象的 Add方法。將程序的菜單以數(shù)據(jù)表的形式存儲(chǔ)到數(shù)據(jù)庫(kù)中，過(guò)程執(zhí)行的時(shí)候從數(shù)據(jù)庫(kù)調(diào)用。在程序運(yùn)行時(shí)，當(dāng)單擊 TreeView 控件中的節(jié)點(diǎn)時(shí)，通過(guò)TreeView 控件的 NodeClick 事件將該節(jié)點(diǎn)下的子菜單顯示在 ListView 控件中。 在主窗體 TreeView 控件和 ListView 控件中添加一個(gè) Picture 控件，通過(guò)它對(duì)應(yīng)的鼠標(biāo)時(shí)間來(lái) 調(diào)節(jié) 控件的大小。 主要代碼： （ 1） 定義 Tree_Change 過(guò)程 。 Public Sub Tree_change() Dim Key As String, Text As String, BH As String Dim Nod As Node 圖書(shū)管理系統(tǒng) (Visual Basic + Access ) 16 / 43 = select * from Table_zcd If 0 Then Do While = False Key = Trim((主菜單名稱(chēng) )) Text = (主菜單名稱(chēng) ) Set Node1 = (, tvwChild, Key, Text, 1 = select * from Table_zcd_zcd where 主菜單名稱(chēng) = 39。 + (主菜單名稱(chēng) ) + 39。 If 0 Then Do While = False Key = Trim((子菜單名稱(chēng) )) Text = (子菜單名稱(chēng) ) Set Node2 = (, tvwChild, Key, Text, 1) Loop End If Loop End If End Sub （ 2） 向 ListView 中加載 TreeView 節(jié)點(diǎn)對(duì)應(yīng)