計算機專業(yè)(高職大專)畢業(yè)論文--圖書管理系統(tǒng)(編輯修改稿)
2024-10-15 17:31 本頁面
【文章內(nèi)容簡介】 典設(shè)計數(shù)據(jù)庫結(jié)構(gòu) 4 最后在實現(xiàn)各個功能模塊 時采用先模塊后系統(tǒng)集成的方式即各系統(tǒng)功能模塊分別獨立設(shè)計和調(diào)試在創(chuàng)建系統(tǒng)主窗體時才將各個功能模塊通過主窗體菜單系統(tǒng)集成到一起最后進行系統(tǒng)整體的設(shè)計和調(diào)試 33 系統(tǒng)模塊功能解析第四章 圖 41 用戶登錄流程邏輯 加模塊 1 程序描述此程序用于添加新的用戶用戶通過向數(shù)據(jù)庫內(nèi)輸入必要的信息來注冊成為新的用戶才通過一系列的驗證之后即注冊成為真正的用戶 2 功能實現(xiàn)對用戶的添加功能 3 性能查詢新用戶的用戶名是否存在若存在則停止添加返還數(shù)據(jù)庫若用戶不存在則進行添加并進行注冊注冊成功后返回 4 輸入項輸入用戶的詳細信息包括姓名出生日期性別地址身份證號碼電話號碼等信息 5 輸出項若添加成功則輸出提示用戶注冊成功界面若未成功則提示輸出未成功原因界面 6 流程邏輯如下圖所示 圖 42 用戶添加模塊流程邏輯 詢模塊 1 程序描述此程序用于實現(xiàn)用戶對想要借閱的查詢功能用戶通過輸入相應(yīng)的圖書信息來查詢數(shù)據(jù)庫根據(jù)用戶提供的信息來搜索最后給出客戶相應(yīng)的圖書信息 2 功能實現(xiàn)圖書查詢功能 3 性能對進行想要查詢的書籍進行搜索若存在此書則顯示該書的詳細信息若不存在此書則提示沒有此書并返回 4輸入項輸入圖書的詳細信息包括圖書名稱書籍 ID圖書作者出版社單價等信息 5 輸出項若輸入的圖書存在即輸出圖書詳細信息界面若輸入的圖書不存在則顯示圖書不存在界面 6 流程邏輯如下圖所示 圖 43 圖書查詢模塊流程 閱模塊 1程序描述此程序用于圖書的借閱用戶通過登錄自己的借閱 ID后對需要借閱的圖書進行借閱操作如果符合借閱的要求則可進行借閱 2 功能實現(xiàn)對圖書的書籍借閱功能 3性能首先驗證借閱者輸入的借閱 ID是否存在若存在進行下一步若不存在則返回 4 若借閱 ID 存在則檢查此借閱 ID 是 否借閱書籍超出 4 本若超出則提示超出借閱數(shù)目返回若沒有超出則進行下一操作 5 對想要借閱的圖書 ID 進行搜索若此書不存在則提示此書不存在若此書存在則進行下一步操作 將借閱者借閱的數(shù)量増一將數(shù)據(jù)庫中此書數(shù)量減一同時提醒借閱成功然后返回 6 輸入項輸入借閱證的 ID 圖書 ID 7輸出項若借閱證 ID正確且圖書 ID正確且符合借閱要求則輸出提示借閱成功界面若存在借閱 ID或圖書 ID或不符合借閱要求等問題則輸出提示沒有借閱成功原因的界面 8 流程邏輯如下圖 圖 44 圖書借閱模塊 還模塊 1程序描述此 程序用于圖書的歸還用戶在登錄自己的 ID之后用戶可以對需要歸還的圖書進行操作如果符合歸還要求則可以將圖書歸還 2 功能實現(xiàn)對圖書的書籍歸還功能 3性能首先驗證借閱者輸入的借閱 ID是否存在若存在進行下一步若不存在則返回 對想要歸還的圖書 ID 進行搜索若此書不存在則提示此書不存在若此書存在則進行下一步操作將借閱者借閱的數(shù)量減一將數(shù)據(jù)庫中此書數(shù)量加一同時提醒借閱歸還然后返回 4 輸入項輸入借閱證 ID 和圖書 ID 5 輸出項若借閱證 ID 和圖書 ID 正確則輸出提示圖書歸還成功界面若借閱證 ID 或圖書 ID 不正確 則輸出提示沒有成功原因的界面 6 流程邏輯如下圖 圖 45 圖書歸還模塊 庫模塊 1 程序描述此程序用戶對新進圖書的入口登記處理用戶可以將新書的詳細信息進行輸入保存在數(shù)據(jù)庫中后新書即登記成功 2 功能實現(xiàn)新進圖書入庫功能 3 性能對數(shù)據(jù)庫查詢是否已存在此書若存在則將此書數(shù)量加一提示添加成功若沒有此書則將此書的基本信息存入數(shù)據(jù)庫并提示添加書籍成功 4 輸入項輸入新書的書籍 ID 書名作者出版社單價等信息 5 輸出項若添加成功則輸出提示新書添加成功界面若沒有添加成功 輸出提示未成功原因界面 6 流程邏輯如 下圖 圖 46 新書入庫模塊 第五章 編碼與測試 51 各功能模塊的實現(xiàn) Const LogTimes As Integer 3 Private Sub cmdcancel_Click If MsgBox 是否真的退出系統(tǒng)登錄 vbYesNo 登錄驗證 vbYes Then Unload Me End If End Sub Private Sub cmdok_Click Static intLogTimes As Integer intLogTimes intLogTimes 1 If intLogTimes LogTimes Then MsgBox 超過登錄次數(shù) vbCritical 登錄驗證 Else With Library_ManagersSysUsers Open If RecordCount 0 Then MoveFirst Find 編號 Trim txtLog 0 If EOF Then MsgBox Trim txtLog 0 不是系統(tǒng)用戶請檢查輸入 vbCritical 登錄驗證 txtLog 0 SetFocus txtLog 0 SelStart 0 txtLog 0 SelLength Len txtLog 0 ElseIf Fields 口令 Trim txtLog 1 Then MsgBox 口令錯誤請檢查輸入口令 vbCritical 登錄驗證 txtLog 1 SetFocus txtLog 1 Else CurrentUserNum Fields 編號 CurrentUserPassword Fields 口令 CurrentUserStatus Fields 權(quán)限 MsgBox 歡迎使用常州信息學(xué)院管理系統(tǒng) vbInformation 登陸成功 Unload Me End If End If Close End With End If End Sub Private Sub Form_Load Sys
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1