1、首都師范大學信息工程學院成人2013年第一學期（數據庫原理）期末試卷年級專業：軟件工程（軟件質量與測試）試卷類型：課程設計姓名：劉偉 學號：3131008127 成績：題目：圖書借閱管理系統圖書借閱管理系統摘要隨著網絡技術的高速發展，計算機應用的普及，利用計算機對圖書的日常管理勢在必行。雖然目前很多大型的圖書館已經有一整套比較完善的管理系統，但是在一些中小型的圖書館中，大部分工作仍需要手工完成，工作起來效率比較低，管理員不能及時了解圖書館內各類圖書的借閱情況，讀者需要的圖書難以在短時間內找到，不便于動態及時地調整圖書結構。本文論述了基于ACCESS 2003的圖書館管理系統的實現思路和開發過程

2、，包括需求分析、系統設計、系統實現，系統測試等方面。目錄1.開發背景12.需求分析13.系統設計13.1系統目標13.2業務流程圖23.3系統功能結構圖24.數據庫設計34.1數據庫概要設計34.2數據庫邏輯結構設計44.3表關系55.編碼及實現55.1登錄界面設計55.2系統主頁設計6系統主頁界面6系統主頁實現過程75.3圖書管理模塊設計7圖書管理模塊界面7圖書管理的實現過程85.4讀者管理模塊設計11讀者管理模塊界面11讀者管理的實現過程125.5借閱管理模塊設計12借閱管理模塊界面12借閱管理的實現過程136.系統測試156.1登錄功能測試166.2圖書管理測試166.3讀者管理測試16

3、6.4借閱管理測試177.開發環境及注意事項171. 開發背景隨著現代圖書流通市場競爭的愈演愈烈，如何以一種新的管理方式提高圖書流通信息的反饋速度，降低庫存占用，加快資金周轉，提高工作效率，已經成為提高競爭力的關鍵。信息技術的發展給圖書的管理帶來了新的力量，通過圖書館管理系統對圖書的全程管理，不僅擺脫了人工管理所固有的一系列弊端和問題，更重要的是提高了工作效率。2. 需求分析長期以來，人們使用傳統的人工方式管理圖書館的日常業務，其操作流程比較繁瑣。在借書時，讀者首先將要借的書好借閱證交給工作人員，然后工作人員將每本書的信息卡片好讀者的借閱證放在一個小格欄里，最后在借閱證和每本書貼的借閱條上填寫

4、借閱信息。在還書時，讀者首先將要還的書交給工作人員，然后工作人員根據圖書信息找到相應的書卡好借閱證，并填寫相應的還書信息。從上述描述中可以發現，傳統的手工流程存在著種種不足。首先處理借書、還書業務流程的效率很低；其次處理能力比較低，一斷時間內，所能服務的讀者人數只能是很有限的。為此，圖書借閱管理系統需要為解決上述問題，提供快速的圖書信息檢索功能及快捷的圖書借閱、歸還流程。3. 系統設計3.1 系統目標根據圖書館日常圖書管理工作的需求，圖書借閱的管理流程，該系統實施后應達到以下目標。1. 界面設計友好、美觀，易維護，易操作。2. 圖書信息，讀者信息，借閱信息的分類管理。3. 借閱，歸還圖書功能。

5、4. 實時查詢圖書，讀者及借閱信息。5. 圖書，讀者，借閱相關信息統計功能。3.2 業務流程圖圖書借閱管理系統的系統流程如圖3-1所示。讀者圖書借閱圖書歸還管理獲取讀者信息獲取圖書信息借閱成功歸還成功借閱信息處理圖書出庫圖書入庫更新讀者信息，圖書信息，借閱信息圖3-1 系統流程圖3.3 系統功能結構圖根據圖書借閱管理系統的特點，可以將其分為系統設置、讀者管理、圖書管理、借閱管理4個部分，其中各個部分及其包括的具體功能模塊如圖3-2所示。圖書借閱管理系統系統設置讀者管理圖書管理借閱管理登錄注銷統計信息新增讀者刪除讀者修改圖書刪除圖書圖書借出圖書歸還新增圖書修改讀者查找讀者查找圖書借閱查詢圖3-2

6、 系統功能結構圖4. 數據庫設計本系統采用ACCESS 2003數據庫，名稱為圖書借閱管理系統.mdb，其中包含3張表。下面分別說明數據庫的概要設計及邏輯設計。4.1 數據庫概要設計通過對本系統進行的需求分析、系統流程設計以及系統功能結構的確定，規劃出系統中使用的數據庫實體對象，具體說明如下。圖書類：書名，作者，出版社，價格，圖書編號，庫存。 讀者類：姓名，性別，讀者編號，電話，身份證號，已借數量。實體E-R圖如圖4-1所示：圖4-1 實體 E-R圖4.2 數據庫邏輯結構設計根據實體E-R圖，設計出數據表的結構。以下是主要數據表的數據結構和用途。1. 圖書借閱表用于保存所有已借閱圖書的信息，該

7、表的結構如表4-2所示。表4-2 圖書借閱表字段名數據類型長度主鍵描述借閱編號自動編號10是借閱編號圖書編號文本100否圖書編號圖書名稱文本100否圖書名稱借出時間日期/時間短日期否借出日期歸還時間日期/時間短日期否歸還日期讀者編號文本50否讀者編號讀者姓名文本20否讀者姓名罰金貨幣10否罰金2. 圖書信息表用于保存所有圖書信息，該表的結構如表4-3所示。表4-3 圖書信息表字段名數據類型長度主鍵描述圖書編號自動編號100是圖書編號書名文本100否圖書名稱出版社文本100否出版社名稱作者文本80否作者姓名價格貨幣10否圖書價格庫存數字4否庫存量3. 讀者信息表用于保存所有讀者信息，該表的結構如

8、表4-4所示。表4-4讀者信息表字段名數據類型長度主鍵描述讀者編號自動編號50是讀者編號讀者姓名文本50否讀者姓名性別文本50否讀者性別身份證號文本50否身份證號電話文本50否聯系電話已借數量數字4否已借數量4.3 表關系圖4-5 “圖書借閱管理系統” 表間關系圖5. 編碼及實現5.1 登錄界面設計在登錄窗口中添加2個文本框控件，分別用于輸入用戶名和密碼，1個commandButton控件。用于觸發登錄事件，界面如圖5-1所示。圖5-1 登錄界面以下是“登錄”按鈕的click事件的主要代碼：Private Sub login_Click()Dim a, b As StringIf IsNull

9、(用戶名) ThenMsgBox ("請輸入用戶名！")ElseIf IsNull(密碼) ThenMsgBox ("請輸入密碼！")Elsea = Me.用戶名b = Me.密碼If a <> "liuwei" Or b <> "123" Then MsgBox ("用戶名或密碼有誤！") Me.用戶名 = "" Me.密碼 = "" Me.用戶名.SetFocusElseMsgBox ("歡迎登錄圖書借閱管理系統！&q

10、uot;) DoCmd.Close DoCmd.OpenForm "主頁"End IfEnd IfEnd Sub5.2 系統主頁設計5.2.1 系統主頁界面管理員通過“登錄”模塊驗證后，可以登錄到圖書借閱管理系統的主頁。系統主頁主要包括讀者管理、圖書管理、借閱管理、統計信息4部分。系統主頁界面如圖5-2所示。 圖5-2 系統主頁界面5.2.2 系統主頁實現過程（1） 添加一個標簽控件用于顯示系統名稱。（2） 添加4個commandButton控件用于各功能模塊入口。（3） 使用openform命令進行各窗體的鏈接。（4） 添加1個commandButton控件用于退出系統。

11、（5） 使用close命令退出系統。5.3 圖書管理模塊設計5.3.1 圖書管理模塊界面圖書管理模塊主要包括查看圖書詳細信息、添加圖書信息、修改圖書信息、刪除圖書信息、導出圖書詳細信息5個功能。在主頁點擊“圖書管理”進入到圖書管理頁面。頁面運行效果如圖5-3所示。圖5-3圖書管理界面5.3.2 圖書管理的實現過程1. 設計步驟（1） 本模塊使用的數據表是“圖書信息”。（2） 新建主窗體，并在主窗體中引用子窗體，用于顯示所有圖書信息。（3） 上方添加文本框和commandButton控件，用于圖書信息查找，導出。（4） 下方添加文本框和commandButton控件，用于圖書新增，修改，刪除。2

12、. 實現代碼commandButton控件均用單擊事件觸發，實現代碼如下：“查詢”圖書功能代碼：Private Sub 查詢_Click()Me.存書查詢子窗體.RequeryEnd Sub“刪除”圖書功能代碼：Private Sub 刪除_Click()Dim code, SQL As StringIf Me.圖書編號 = "自動編號" ThenMsgBox "請在上方列表中選擇要刪除的圖書！"Elsecode = Me.圖書編號SQL = "Delete * FROM 圖書信息 Where 圖書編號=" & codeCur

13、rentProject.Connection.Execute SQLMsgBox "刪除成功！"Me.存書查詢子窗體.RequeryEnd IfEnd Sub“新增”圖書功能代碼：Private Sub 新增_Click()Dimzz,cbs,kc,jg,sm,SQL As StringIf Me.圖書編號 <> "自動編號" Then Me.書名1 = Null Me.作者1 = Null Me.出版社1 = Null Me.價格1 = Null Me.庫存1 = Null Me.圖書編號 = "自動編號"ElseIf

14、IsNull(書名1) ThenMsgBox "請輸入書名！"ElseIf IsNull(作者1) ThenMsgBox "請輸入作者！"ElseIf IsNull(出版社1) ThenMsgBox "請輸入出版社！"ElseIf IsNull(價格1) ThenMsgBox "請輸入價格！"ElseIf IsNull(庫存1) ThenMsgBox "請輸入庫存！"Elsezz = Me.作者1cbs = Me.出版社1kc = Me.庫存1jg = Me.價格1sm = Me.書名1SQL

15、= "insert into 圖書信息(作者,出版社,庫存,價格,書名) values('" & zz & "','" & cbs & "'," & kc & "," & jg & ",'" & sm & "')"CurrentProject.Connection.Execute SQLMsgBox "新增成功！"Me.存書查詢子

16、窗體.RequeryEnd IfEnd Sub“修改”圖書功能代碼：Private Sub 修改_Click()Dim code,zz,cbs,kc,jg,sm,SQL As StringIf Me.圖書編號 = "自動編號" ThenMsgBox "請在上方列表中選擇要修改的圖書！"Elsecode = Me.圖書編號zz = Me.作者1cbs = Me.出版社1kc = Me.庫存1jg = Me.價格1sm = Me.書名1SQL = "update 圖書信息 set 作者='" & zz & &quo

17、t;',出版社='" & cbs & "',庫存=" & kc & ",價格=" & jg & ",書名='" & sm & "' Where 圖書編號=" & codeCurrentProject.Connection.Execute SQLMsgBox "修改成功！"Me.存書查詢子窗體.RequeryEnd IfEnd Sub5.4 讀者管理模塊設計5.4.1 讀者管理

18、模塊界面讀者管理模塊主要包括讀者新增，讀者修改，讀者刪除，讀者查找，讀者導出5個功能。在主頁點擊“讀者管理”進入到讀者管理頁面。頁面運行效果如圖5-4所示。圖5-4讀者管理界面5.4.2 讀者管理的實現過程1. 設計步驟（1） 本模塊使用的數據表是“讀者信息”。（2） 新建主窗體，并在主窗體中引用子窗體，用于顯示所有讀者信息。（3） 上方添加文本框和commandButton控件，用于讀者信息查找，導出。（4） 下方添加文本框和commandButton控件，用于讀者新增，修改，刪除。2. 實現代碼commandButton控件均用單擊事件觸發，部分實現代碼如下：“查詢”讀者功能代碼：Priv

19、ate Sub 查詢_Click()Me.讀者查詢子窗體.RequeryEnd Sub“刪除”讀者功能代碼：Private Sub 刪除_Click()Dim code, SQL As StringIf Me.讀者編號 = "自動編號" ThenMsgBox "請在上方列表中選擇要刪除的讀者！"Elsecode = Me.讀者編號SQL = "Delete * FROM 讀者信息 Where 讀者編號=" & codeCurrentProject.Connection.Execute SQLMsgBox "刪除成功！

20、"Me.讀者查詢子窗體.RequeryEnd IfEnd Sub“新增”，“修改”讀者功能代碼同新增修改圖書類似，這里不重復說明。5.5 借閱管理模塊設計5.5.1 借閱管理模塊界面借閱管理模塊主要包括圖書借出，圖書歸還、借閱查找，借閱導出4個功能。在主頁點擊“借閱管理”進入到借閱管理頁面。頁面運行效果如圖5-5所示。圖5-5 借閱管理界面5.5.2 借閱管理的實現過程1. 設計步驟（1） 本模塊使用的數據表是“圖書借閱”。（2） 新建主窗體，并在主窗體中引用子窗體，用于顯示所有借閱信息。（3） 上方添加文本框和commandButton控件，用于借閱信息查找，導出。（4） 下方添加

21、文本框和commandButton控件，用于圖書借出，圖書歸還。2. 實現代碼commandButton控件均用單擊事件觸發，實現代碼如下：“查詢”借閱信息功能代碼：Private Sub 查詢_Click()Me.借閱查詢子窗體.RequeryEnd Sub“歸還”圖書功能代碼：Private Sub 歸還_Click()Dim a, b, c, d, e, f, g, h, k As StringDim i, j As IntegerIf Not IsNull(歸還時間) ThenMsgBox "該圖書已歸還，不需要再次歸還！"Elsea = Me.借閱編號f = Me

22、.讀者編號1g = Me.圖書編號1h = Me.借出時間c = Datei = DateDiff("d", h, Now)b = "update 圖書借閱 set 歸還時間='" & c & "' where 借閱編號=" & ad = "update 圖書信息 set 庫存=庫存+1 where 圖書編號=" & ge = "update 讀者信息 set 已借數量=已借數量-1 where 讀者編號=" & fCurrentProje

23、ct.Connection.Execute bCurrentProject.Connection.Execute dCurrentProject.Connection.Execute eIf i <= 15 ThenMsgBox "歸還成功！"Me.借閱查詢子窗體.RequeryElsej = (i - 15) * 5k = "update 圖書借閱 set 罰金='" & j & "' where 借閱編號=" & aCurrentProject.Connection.Execute k

24、MsgBox "歸還成功！圖書借出時間超過了15天，應交罰款：" & j & "元"Me.借閱查詢子窗體.RequeryEnd IfEnd IfEnd Sub“借出”圖書功能代碼：Private Sub 借出_Click()Dim a, b, c, d, e, f, g As StringDim h, i As IntegerIf IsNull(圖書名稱1) ThenMsgBox "請輸入圖書名稱！"ElseIf IsNull(讀者姓名1) ThenMsgBox "請輸入讀者姓名！"Elsea =

25、Me.圖書編號1b = Me.圖書名稱1c = Me.讀者編號1d = Me.讀者姓名1h = DLookup("庫存", "圖書信息", "圖書編號=" & a & "")If h = 0 ThenMsgBox "該圖書已沒有庫存，請選擇其他圖書！"Elsee = "insert into 圖書借閱(讀者編號,讀者姓名,圖書編號,圖書名稱) values(" & c & ",'" & d & &qu

26、ot;'," & a & ",'" & b & "')"f = "update 圖書信息 set 庫存=庫存-1 where 圖書編號=" & ag = "update 讀者信息 set 已借數量=已借數量+1 where 讀者編號=" & cCurrentProject.Connection.Execute eCurrentProject.Connection.Execute fCurrentProject.Connection.Execute gMsgBox "借出成功！"Me.借閱查詢子窗體.RequeryEnd IfEnd IfEnd Sub6. 系統測試模塊功能測試，就是為了檢查在模塊中有沒有不能實現或實現有問題的功能，或是運行是否穩定以及能否反復使用。以下是對系統的主要功能進行測試的步驟及其測試結果。6.1 登錄功能測試測試目的：測試登錄功能是否運行正常。測試步驟：1.進入登陸界面；2.輸入用戶名liuwei，密碼：111，點擊登陸；3.輸入用戶名liuwei，密碼：123，點擊登陸。期望結果：1.當