《圖書館信息管理系統(tǒng) 大數據庫課程設計VB SQL》由會員分享，可在線閱讀，更多相關《圖書館信息管理系統(tǒng) 大數據庫課程設計VB SQL（28頁珍藏版）》請在裝配圖網上搜索。

1、word摘 要在計算機日益普與的今天，圖書作為教學和學習必不可少的工具，采用一套行之有效的圖書管理系統(tǒng)來管理書籍就顯得尤為重要。而圖書資料的管理需要有效的圖書管理軟件，減輕工作人員的工作量，方便工作人員對它的操作，提高管理的質量和水平，做到高效、智能化管理，達到提高圖書借閱信息管理效率的目的。 本文運用Visual Basic 6.0和SQL Server 2005軟件，進展圖書館管理系統(tǒng)的課程設計。首先對系統(tǒng)進展需求分析，根據系統(tǒng)功能設計E-R模型，再進展邏輯結構設計實現E-R圖向關系模型的轉換，并優(yōu)化數據模型，使其擁有一般系統(tǒng)擁有的功能，它可以增加讀者信息，可以對新書進展入庫，刪除舊書，可

2、以查詢所有的讀者信息，還可以對圖書進展修改校正，以與解決自己登錄安全性的問題，最重要的是可以進展對圖書的借閱和歸還，并對超過還書期限的讀者進展處罰，同時改變圖書庫存和被借閱次數的信息。具體功能有圖書館圖書信息瀏覽、讀者信息瀏覽、圖書信息查詢、圖書入庫管理、圖書出庫管理、讀者借書超期罰款管理和讀者信息維護等。本圖書館信息管理系統(tǒng)具有可運行，功能較完整，界面美觀，操作方便等特點，它可以更加人性化的滿足小型圖書館的日常借閱問題，達到一個很理想的智能管理的目的。關鍵詞 圖書館信息管理系統(tǒng)；VB；SQL；數據庫目 錄1 系統(tǒng)功能概述11.1 系統(tǒng)的功能11.2 系統(tǒng)結構總圖22 數據庫設計32.1 需求

3、分析32.2 E-R模型32.3 關系模型32.4 表結構設計63 系統(tǒng)各功能模塊的詳細設計103.1 封面103.2 登錄113.3 主菜單123.4 注冊新用戶143.5 讀者信息管理153.6 圖書庫存信息查詢17總結20參考文獻20文案大全1 系統(tǒng)功能概述1.1 系統(tǒng)的功能圖書館信息管理的主要任務是用計算機對圖書交換過程進展日常管理,如圖書館圖書信息瀏覽、讀者信息瀏覽、圖書信息查詢、借還書等，迅速準確地完成各種信息的統(tǒng)計計算和匯總工作,并快速打印信息報表。針對系統(tǒng)服務對象的具體要求,設計了圖書館信息管理系統(tǒng)。圖書館信息管理系統(tǒng)主要包含以下功能:(1)圖書管理：對圖書中圖書的信息，如圖書

4、編號、書名等根本信息進展維護和管理。能夠完成各種信息的新增、確認、刪除、取消操作，也可按照一定的條件查詢這些信息。(2)讀者管理：系統(tǒng)可以完成讀者根本信息的新增、確認、刪除、取消操作，并可按照一定的條件查詢與圖書相關的信息。(3)庫存管理：在系統(tǒng)中可以完成圖書入庫信息的管理，完成圖書相關信息的新增、確認、刪除、取消操作，可以按一定得條件查詢這些信息。數據庫包含以下實體與其屬性：(1) 圖書信息 (圖書編號、書名、作者、版次、出版日期、類別、借閱次數、借閱狀態(tài)(2) 讀者信息 (借書證號、某某、性別、年齡、單位、聯(lián)系、讀者類別、是否超期)(3) 圖書入庫信息 (圖書編號、庫存量、單價、入庫日期)

5、(4)圖書出庫信息借書證號、書名、借閱日期、還書日期(5) 圖書庫存信息 (圖書編號、書名、庫存量、單價)(6) 讀者罰款信息借書證號、書名、處罰日期、超期天數、罰款金額(7)系統(tǒng)信息用戶名、密碼1.2 系統(tǒng)結構總圖根據功能畫出圖書館信息管理系統(tǒng)結構圖，如圖1.1所示。圖1.1圖書館信息管理系統(tǒng)的總體結構2數據庫設計2.1 需求分析面對大量繁雜的圖書信息管理、分類、查詢與借還工作，迫切需要通過計算機來幫助解決，減少圖書館管理人員的工作量。隨著辦公自動化的深入與普與和網絡技術的不斷開展，圖書館信息管理系統(tǒng)越來越被社會所需要，本圖書館信息管理系統(tǒng)具有界面友好、使用方便等優(yōu)點。 1、圖書信息查詢。當

6、需要從數據庫中查找滿足查詢條件的圖書時，可以使用該功能。選擇查詢條件填入對應的功能，點擊“查詢完成查詢操作。 2、借閱管理。借閱管理分為借閱和歸還兩局部。點擊“借閱單項選擇按鈕，這時掃入圖書相關信息就可以借閱了。 3、注冊新用戶。注冊新用戶是用來注冊能使用該軟件的用戶名和密碼。當注冊完用戶之后，退出該軟件重新進入，會要求選擇用戶名和密碼，此時如果不能正確輸入密碼，如此不能進入該軟件。2.2 E-R模型圖書館信息管理系統(tǒng)E-R圖，如圖2.1所示。圖2.1 圖書館信息管理系統(tǒng)E-R圖2.3 關系模型一個實體型轉換為一個關系模式1。實體的屬性就是關系的屬性，實體的碼就是關系的碼。根據E-R圖向關系模

7、型轉換的原如此，E-R圖轉換為關系模型。1圖書信息 (圖書編號、書名、作者、版次、出版日期、類別、借閱次數、借閱狀態(tài)圖2.2 圖書信息關系模型圖2讀者信息 (借書證號、某某、性別、年齡、單位、聯(lián)系、讀者類別、是否超期)圖2.3 讀者信息關系模型圖3圖書入庫信息 (圖書編號、庫存量、單價、入庫日期圖2.4 圖書入庫信息關系模型圖4圖書出庫信息借書證號、書名、借閱日期、還書日期圖2.5 圖書出庫信息關系模型圖(5)圖書庫存信息 (圖書編號、書名、庫存量、單價)圖2.6 圖書庫存信息關系模型圖6讀者罰款信息借書證號、書名、處罰日期、超期天數、罰款金額圖2.7 讀者罰款信息關系模型圖2.4 表結構設計

8、本系統(tǒng)需在SQL Server中建立七個表，分別為圖書信息，讀者信息，圖書入庫信息、圖書出庫信息、圖書庫存信息、讀者借書信息和系統(tǒng)信息。（1） 圖書信息表的結構與根本數據：表結構：圖2.8圖書信息表結構 根本數據如下：圖2.9 圖書信息數據（2） 讀者信息表的結構與根本數據：表結構：圖2.10 讀者信息表結構根本數據如下：圖2.11 讀者信息根底數據（3） 圖書入庫信息表的結構與根本數據：表結構：圖2.12 圖書入庫表結構根本數據如下：圖2.13 圖書入庫根底數據（4） 圖書出庫信息表的結構與根本數據：表結構：圖2.14 圖書出庫表結構根本數據如下：圖2.15 圖書出庫根底數據（5） 圖書庫存

9、信息表的結構與根本數據：表結構：圖2.16 圖書庫存表結構根本數據如下：圖2.17 圖書庫存根底數據（6） 讀者借書信息表的結構與根本數據：表結構：圖2.18 讀者借書表結構根本數據如下：圖2.19 讀者借書根底數據（7） 系統(tǒng)信息表的結構與根本數據：表結構：圖2.20 系統(tǒng)信息表結構根本數據如下：3系統(tǒng)各功能模塊的詳細設計本圖書館信息管理系統(tǒng)共包括11個窗體，分別為歡迎，登錄，注冊新用戶，圖書信息瀏覽，讀者信息瀏覽，圖書出庫信息，圖書入庫信息，圖書信息查詢，讀者信息查詢，圖書庫存信息查詢和主窗體。其中主窗體為MDI窗體2。下面介紹各個窗體的設計語句與實現功能。3.1 封面封面，如圖3.1所示

10、，標題為“歡迎進入圖書館管理系統(tǒng)，點擊“進入系統(tǒng)按鈕，就可以關閉本窗體并打開登錄窗體。圖3.1 封面封面代碼如下：Private Sub mand1_Click()Unload MeEnd SubPrivate Sub Timer1_Timer()Static n As Integer n = n + 1If n 15 Then n = 0End IfLabel1.ForeColor = QBColor(n)End Sub3.2 登錄登錄，如圖3.2所示，假如已經有賬號，只需輸入正確的用戶名和密碼，點擊“登陸按鈕就可以打開MDI主窗體，如圖3.4所示；假如沒有賬號，點擊“注冊按鈕，就可以打開注

11、冊新用戶窗體，如圖3.5所示。圖3.2 登錄登錄代碼如下：Private Sub mand1_Click()End SubPrivate Sub mand2_Click()Dim micount As IntegerDim str As Stringstr = select 密碼 from 系統(tǒng)信息 where 用戶名 = & Text1.Text & Adodc1.RecordSource = strIf Adodc1.Recordset.EOF = True ThenMsgBox 用戶名錯誤,請重新輸入, vbExlamation, 警告Text1.Text = Text2.Text =

12、ElseIf Trim(Adodc1.Recordset.Fields(密碼) = Trim(Text2.Text) ThenUnload MeElse MsgBox 密碼錯誤，請重新輸入, vbExlamation, 警告Text2.Text = End IfEnd Ifmicount = micount + 1If micount = 3 Then Unload MeEnd SubPrivate Sub mand3_Click()Unload MeEnd Sub3.3 主菜單主窗體，如圖3.3所示，設計為MDI窗體，含有主菜單：系統(tǒng)管理、數據管理、數據查詢。系統(tǒng)管理菜單包含注冊新用戶菜單和

13、退出菜單。數據管理包含圖書出庫管理菜單，圖書入庫管理菜單， 讀者罰款管理菜單和讀者信息管理菜單。數據查詢包含查詢圖書信息菜單，查詢圖書庫存信息菜單和查詢讀者信息菜單。圖3.3 主窗體主菜單代碼如下：Private Sub 圖書信息瀏覽_Click()End SubPrivate Sub mFExit_Click()Unload MeEnd SubPrivate Sub 查詢讀者信息_Click()End SubPrivate Sub 查詢圖書庫存信息_Click()End SubPrivate Sub 查詢圖書信息_Click()End SubPrivate Sub 讀者罰款管理_Click(

14、)End SubPrivate Sub 圖書出庫信息_Click()End SubPrivate Sub 讀者信息管理_Click()End SubPrivate Sub 新用戶注冊_Click()End SubPrivate Sub 圖書信息查詢_Click()End SubPrivate Sub 讀者信息查詢_Click()End SubPrivate Sub 圖書入庫信息_Click()End Sub3.4 注冊新用戶注冊新用戶窗體可用于添加新的用戶名和密碼?？梢酝ㄟ^單擊“注冊新用戶菜單，打開對話框；也可以在登錄窗體，點擊“注冊按鈕，進展注冊。假如輸入正確，如此將新的用戶名和密碼保存到“

15、系統(tǒng)信息表中，并提示“注冊完成，關閉本窗體，如圖3.4所示。圖3.4 注冊成功注冊新用戶代碼如下：Private Sub mand1_Click()Dim str1 As Stringstr1 = select * from 系統(tǒng)信息Adodc1.RecordSource = str1If Text3.Text Text2.Text ThenMsgBox 密碼不一樣，請重新輸入！Text2.Text = Text3.Text = ElseAdodc1.Recordset.Fields(用戶名) = Text1Adodc1.Recordset.Fields(密碼) = Text2MsgBox 注

16、冊完成！End IfUnload MeEnd SubPrivate Sub mand2_Click()Unload MeEnd Sub3.5 讀者信息管理讀者信息管理窗體用于瀏覽和錄入讀者信息4。該窗體以文本框顯示當前記錄，用按鈕首記錄、末記錄、前移、后移，控制記錄指針的移動；用一個標簽Label顯示：當前記錄號/記錄總數；單擊返回按鈕，可以關閉本窗體，返回主窗體?？梢詫τ涗涍M展添加、確認、刪除、取消操作，如圖3.5所示。其余信息管理窗體與代碼均與此類似，不作說明。圖3.5 讀者信息瀏覽窗體讀者信息代碼如下：Private Sub cmdadd_Click()cmdadd.Enabled =

17、Falsecmddel.Enabled = Falsecmdok.Enabled = TruecmdCancel.Enabled = TrueEnd SubPrivate Sub cmdCancel_Click()Unload MeEnd SubPrivate Sub cmddel_Click()x = MsgBox(確實要刪除當前記錄嗎？, vbYesNo + vbQuestion)If x = vbYes ThenIf Adodc1.Recordset.EOF = True ThenEnd IfElseEnd IfEnd SubPrivate Sub cmdfirst_Click()cmd

18、first.Enabled = Falsecmdpre.Enabled = Falsecmdnext.Enabled = Truecmdlast.Enabled = TrueEnd SubPrivate Sub cmdlast_Click()cmdfirst.Enabled = Truecmdpre.Enabled = Truecmdnext.Enabled = Falsecmdlast.Enabled = FalseEnd SubPrivate Sub cmdnext_Click()cmdfirst.Enabled = Truecmdpre.Enabled = TrueIf Adodc1.R

19、ecordset.EOF = True Thencmdlast.Enabled = Falsecmdnext.Enabled = FalseEnd IfEnd SubPrivate Sub cmdok_Click()cmdadd.Enabled = Truecmddel.Enabled = Truecmdok.Enabled = FalsecmdCancel.Enabled = FalseEnd SubPrivate Sub cmdpre_Click()cmdnext.Enabled = Truecmdlast.Enabled = TrueIf Adodc1.Recordset.BOF = T

20、rue Thencmdfirst.Enabled = Falsecmdpre.Enabled = FalseEnd IfEnd SubPrivate Sub mand1_Click()Unload MeEnd SubPrivate Sub Form_Load()cmdfirst.Enabled = Falsecmdpre.Enabled = Falsecmdnext.Enabled = Truecmdlast.Enabled = Truecmdadd.Enabled = Truecmddel.Enabled = Truecmdok.Enabled = FalsecmdCancel.Enable

21、d = TrueEnd Sub3.6 圖書庫存信息查詢圖書庫存信息查詢窗體可以滿足按各種條件的查找5，這些條件放在組合列表框bo中,供用戶選擇。在文本框中輸入要查詢的內容，如圖3.6所示，單擊查詢按鈕，查詢結果用網格控件顯示如3.7所示。其余查詢窗體與代碼均與此類似，不作另行說明。圖3.6 圖書庫存信息查詢窗體圖3.7 查詢結果圖書庫存信息查詢代碼如下：Private Sub mand1_Click()Dim str As Stringstr = Select * From 圖書庫存 str = str & Where 圖書庫存. & bo1.Text & Like & Text1 & % A

22、dodc1.RecordSource = strEnd SubPrivate Sub mand2_Click()Unload MeEnd SubPrivate Sub mand3_Click()Unload MeEnd SubPrivate Sub Form_Load()bo1.AddItem 圖書編號bo1.AddItem 書名bo1.AddItem 庫存量bo1.AddItem 單價Text1.Text = bo1.Text = End SubPrivate Sub DataGrid1_Click()Unload MeEnd SubPrivate Sub Form_Load()bo1.Ad

23、dItem 圖書編號bo1.AddItem 圖書名bo1.AddItem 庫存量bo1.AddItem 單價Text6.Text = End Sub總結通過這次數據庫課程設計，我學會了如何利用Microsoft SQL Server2005軟件建立相關信息的數據庫，并通過Microsoft Visual Basic 6.0實現對相關信息的查詢，將所學知識都運用到實踐中去，增加了我對數據庫的興趣，讓我能更清楚地了解到數據庫在現實生活中為我們帶來的極大便利，方便我們將所需要的信息進展規(guī)劃和管理，將信息集中管理也為我們查詢我們所需要的信息帶來了簡易的途經。但是，這個圖書館信息管理系統(tǒng)并不是很完善，還有需改良之處。最后，感謝數據庫課程設計教師對我耐心的教誨和幫助，為我解決了許多在課堂上沒弄懂的問題，讓我對數據庫有了更進一步的認識和了解。今后我會更加努力學習數據庫的相關知識，相信能為我以后帶來很大的幫助。參考文獻1 王珊.數據庫系統(tǒng)簡明教程.：高等教育.2004,92 賽奎春.Visual Basic信息系統(tǒng)開發(fā)實例精選. ：高等教育.2004，93 X韜,何旭洪.Visual BASIC數據庫系統(tǒng)開發(fā)實例導航.：人民郵電.2002，104 X海潘.軟件工程導論.：清華大學.1999,19(2);1381435 閆宏印.VB程序設計.：電子工業(yè).2002;120文案大全