【正文】 checkAddNew = False = True = True = 添加 (amp。A) Then = 確定 SetTextEmpty 39。To check operator ID If = 修改 Then = 確定 = False = False Else With objRs .Fields(0).Value = Trim() .Fields(1).Value = Trim() .Fields(2).Value = Trim() .Fields(3).Value = Trim() 計(jì)算機(jī)學(xué)院軟件工程課程設(shè)計(jì) 29 .Update End With = 修改 = True = True = True End If End Sub Private Sub cmdExit_Click() Unload Me End Sub Private Sub cmdRefresh_Click() RefreshOperator 39。To executer refresh once End With checkAddNew = False 39。 39。This function is set all text to empty = = = = = End Sub Sub RefreshOperator() 39。Reference function to make objcon break if connection is open Load frmAdmin Case vipReg CheckConnect 39。Reference function to make objcon break if connection is open Load frmBookQuery End Sub Private Sub mnuBookRegist_Click() CheckConnect 39。Static intLogTimes to save user login times Static intLogTimes As Integer intLogTimes = intLogTimes + 1 39。 Trim() amp。本系統(tǒng) 決定采用一個(gè)數(shù)據(jù)庫，在其下創(chuàng)建 5個(gè)數(shù)據(jù)表，其結(jié)構(gòu)分別如下： （ tBook），其字段列表如表 41 所示。 ： 根據(jù)用戶的輸入顯示相應(yīng)的對(duì)話框 。 ： 操作結(jié)果顯示 。 計(jì)算機(jī)學(xué)院軟件工程課程設(shè)計(jì) 8 圖 書 管 理 系 統(tǒng)學(xué)生管理圖書管理借閱管理歸還管理管理措施借閱查詢正常歸還登記超期處罰設(shè)置押金設(shè)置丟失賠償設(shè)置超期或丟失處理借閱登記圖書信息查詢圖書信息登記學(xué)生信息查詢學(xué)生信息管理 圖 圖書管理系統(tǒng)功能模塊圖 系統(tǒng)的流程圖 依據(jù)軟件工程的基本原理，綜合以上分析給出系統(tǒng)流程圖如圖 所示。 第三 章 系統(tǒng) 總體設(shè)計(jì) 新的業(yè)務(wù)流程 根據(jù)需求分析的得到的現(xiàn)行業(yè)務(wù)處理流程，在用戶反復(fù)研究后，首先確定目標(biāo)系統(tǒng)的業(yè)務(wù)流程，其處理流程如圖 。要實(shí)現(xiàn)這一點(diǎn)，就要求系統(tǒng)應(yīng)該盡量使用用戶熟悉的術(shù)語和中文信息的界面；針對(duì)用戶可能出現(xiàn)的使用問題，要提供足夠的在線幫助，縮短用戶對(duì)系統(tǒng)熟悉的過程。在系統(tǒng)設(shè)計(jì)和開發(fā)過程中，要充分考慮系統(tǒng)當(dāng)前和將來可能承受的工作量，使系統(tǒng)的處理能力和響應(yīng)時(shí)間能夠滿足學(xué)校對(duì)信息處理的需求。 學(xué) 生3 . 1合 法 性檢 查3 . 2借 閱 圖書學(xué) 生圖 書學(xué) 生 借 閱 請(qǐng) 求借 閱 結(jié) 果借 閱 條 件學(xué) 生 信 息圖 書 信 息圖 書 信 息 (1) 計(jì)算機(jī)學(xué)院軟件工程課程設(shè)計(jì) 4 學(xué) 生4 . 1合 法 性檢 查4 . 2歸 還 圖書學(xué) 生圖 書學(xué) 生 歸 還 圖 書歸 還 結(jié) 果符 合 管 理 條 件學(xué) 生 信 息圖 書 借 閱 信 息圖 書 信 息不 符 管 理 條 件4 . 3罰 款 o r賠 償提 示 懲 罰 信 息 (2) 圖 進(jìn)一步細(xì)化 數(shù)據(jù)流圖 有了系統(tǒng)的數(shù)據(jù)流圖后，還有相當(dāng)多的數(shù)據(jù)信息如圖書、借閱、歸還等信息需要進(jìn)一步描述，這就是需要定義數(shù)據(jù)字典，才能把現(xiàn)有的系統(tǒng)描述清楚。 根據(jù)以上調(diào)查分析，可以給出其現(xiàn)行業(yè)務(wù)流程圖如圖 所示。隨著科學(xué)技術(shù)的不斷提高，這種 傳統(tǒng)的手工管理方法必然被以計(jì)算機(jī)為基礎(chǔ)的信息管理方法所取代。另外，隨著圖書資料數(shù)量的增加，其工作量也將大大增加，這必將增加圖書資料管理者的工作量和勞動(dòng)強(qiáng)度，這將給圖書資料信息的查找、更新和維護(hù)都帶來了很多困難。 ，上到書架以備學(xué)生借閱。 管 理員學(xué) 生 信 息1學(xué) 生管 理D 1學(xué) 生 信 息圖 書 信 息2圖 書管 理D 2圖 書 信 息 登 記圖 書 信 息 登 記圖 書 信 息學(xué) 生 借 閱圖 書3借 閱 管理借 閱 信 息借 閱 登 記D 34歸 還 管理學(xué) 生 信 息歸 還 圖 書歸 還 登 記D 4學(xué) 生借 閱 結(jié) 果歸 還 圖 書歸 還 結(jié) 果 圖 圖書管理系統(tǒng)數(shù)據(jù)流圖（頂層 DFD 圖） 對(duì)頂層 DFD 圖中的一個(gè)加工“學(xué)生管理”進(jìn)行展開， 如圖 。 ，歸還的登記功能：系統(tǒng)的主要功能之一，供本校學(xué)生借閱圖書、歸還圖書，并進(jìn)行登記。通過軟件的修補(bǔ)、替換完成系統(tǒng)的升級(jí)和更新?lián)Q代。另一方面，在系統(tǒng)設(shè)計(jì)和開發(fā)的過程中，應(yīng)在考慮成本的基礎(chǔ)上盡量采用當(dāng)前主流并先進(jìn)且有良好發(fā)展前途的產(chǎn)品。 ：即對(duì)所有圖書的借閱情況，或?qū)W生的基本情況和借閱情況進(jìn)行查詢。 計(jì)算機(jī)學(xué)院軟件工程課程設(shè)計(jì) 11 開 始管 理 員 登 陸是 否 合 法借 閱 圖 書N o結(jié) 束管 理 員 注 銷選 擇歸 還 圖 書 退 出查 詢 信 息學(xué) 生 信 息表 操 作圖 書 信 息表 操 作選 擇增 加 修 改刪 除退 出確 認(rèn)更 新N oY e s選 擇 查詢 方 式書 名 書 號(hào) 作 者 出 版 社輸 入 所 需 記 錄 要 求查 找 記 錄顯 示 記 錄繼 續(xù)Y e sN o讀 入 書 號(hào) 讀 入 書 號(hào)超 期已 借 出N o讀 入 學(xué) 號(hào)確 認(rèn)更 新 數(shù) 據(jù) 庫Y e s繼 續(xù)Y e sY e sY e sN oY e s罰 款更 新 數(shù) 據(jù) 庫繼 續(xù)Y e sN oN o 圖 程序流程 圖 程序輸入輸出描述 主模塊 ： 操作系統(tǒng)傳遞至的各種消息以及用戶的輸入數(shù)據(jù) 。 歸還管理模塊 ：圖書編 號(hào) 。下面給出概念結(jié)構(gòu)設(shè)計(jì)得 ER 圖如圖 所示。 表 45 管理員 信息表的結(jié)構(gòu) 序 字段名稱 字 類 位 屬 備計(jì)算機(jī)學(xué)院軟件工程課程設(shè)計(jì) 20 號(hào) 段說明 型 數(shù) 性 注 1 cOperatorID 管理員編號(hào) 文本 5 必須非空 2 cOperatorName 管理員姓名 文本 10 必須非空 3 cOperatorPassword 密碼 文本 6 必須非空 4 cOperatorAddTime 管理員加入時(shí)間 時(shí)間日期 10 必須非空 計(jì)算機(jī)學(xué)院軟件工程課程設(shè)計(jì) 21 第五 章 編碼實(shí)現(xiàn) 程序編碼 登陸界面如圖 所示。 password error 計(jì)算機(jī)學(xué)院軟件工程課程設(shè)計(jì) 22 Else Check_Password = 2 39。 CurrentOpname (1).Visible = False (2).Visible = False End If End Sub Private Sub MDIForm_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = vbRightButton Then PopupMenu mnuOperation 39。Reference function to make objcon break if connection is open Load frmVipQuery End Sub Private Sub mnuVipRegist_Click() CheckConnect 39。Reference function to make objcon break if connection is open Load frmReadRegist Case readQuery CheckConnect 39。 reference settextempty founction to set empty = False = False = False Else If Trim() = Then MsgBox Operator name must not null ,please input operator name !, vbInformation + vbOKOnly Exit Sub ElseIf Trim() = Then MsgBox Operator ID must not null ,please input operator ID !, vbInformation + vbOKOnly Exit Sub ElseIf Trim() = Then MsgBox Operator password must not null ,please input operator password !, vbInformation + vbOKOnly Exit Sub Else With objRs checkAddNew = True .Filter = cOperatorID=39。A) = False = True = True checkAddNew = False Exit Sub End If checkAddNew = True .AddNew 計(jì)算機(jī)學(xué)院軟件工程課程設(shè)計(jì) 28 .Fields(0).Value = Trim() .Fields(1).Value = Trim() .F