【正文】 _AfterUpdate: MsgBox 您“用戶編號(hào)”輸入錯(cuò)誤，或者還沒(méi)有注冊(cè)，請(qǐng)檢查 !, vbCritical, 無(wú)此用戶 Resume Exit_用戶編號(hào) _AfterUpdate End Sub 30 Private Sub 用戶編號(hào) _BeforeUpdate(Cancel As Integer) On Error GoTo Err_用戶編號(hào) _BeforeUpdate 39。找出系統(tǒng)用戶的“用戶名” username = DLookup(用戶名 , 系統(tǒng)用戶 , 用戶編號(hào) = 39。使用 For? Next 循環(huán)語(yǔ)句在 Rs 數(shù)據(jù)集中循環(huán)判斷 For i = 1 To 39。 39。用戶登錄的“用戶編號(hào)” Public UserID As String 39。 Me![用戶編號(hào) ] amp。彈出“是否修改”窗口，提示用戶是否修改用戶權(quán)限 If MsgBox(確定要修改用戶權(quán)限嗎？ , vbYesNo, 是否修改 ) = vbYes Then Me![系統(tǒng)權(quán)限管理 子窗體 ].Locked = False Else Exit Sub End If Exit_修改權(quán)限 _Click: Exit Sub Err_修改權(quán)限 _Click: MsgBox Resume Exit_修改權(quán)限 _Click End Sub Private Sub 用戶編號(hào) _AfterUpdate() On Error GoTo Err_用戶編號(hào) _AfterUpdate 39。) If IsNull(sTemp) Then , , acSaveNo Else 39。 amp。判斷 STemp 變量值是否為空 If IsNull(sTemp) Then UserID = Null Me![用戶編號(hào) ] = Else UserID = sTemp Me![用戶名 ] = DLookup(用 戶名 , 系統(tǒng)用戶 , [用戶編號(hào) ]= 39。在這里我要衷心的謝謝 他 們，謝謝他 們?cè)诋厴I(yè)設(shè)計(jì)中對(duì)我的幫助和關(guān)懷。 在此，我首先感謝我的導(dǎo) 師陳時(shí)東 老師。 在 系統(tǒng) 設(shè)計(jì) 過(guò)程 中，我遇 到了很多困難。 23 圖 啟動(dòng)對(duì)話框 Startup Dialog Box 設(shè)置完成后，啟動(dòng)本數(shù)據(jù)庫(kù)的最終界面如圖 所示。 圖 幫助窗體 Helped Form 6 應(yīng)用系統(tǒng)設(shè)計(jì) 為窗體定義自定義菜單 在“視圖” “工具欄” “自定義”的對(duì)話框按下“新建”按鈕后，新增內(nèi)容為工具欄，若要更改為菜單欄，需按下“屬性”按鈕，將“類型”改為“菜單欄”，如圖 所示 22 圖 更改 類型 Change the Type 在新建的菜單欄中，加入新菜單，然后重新命名。 圖 系統(tǒng) 權(quán)限管理 窗體 Window of the Jurisdiction Management Contact 密碼維護(hù)窗體的創(chuàng)建 為了更好地 保護(hù)用戶信息的安全， 用戶在登錄系統(tǒng)后需要修改密碼。 按匯總或分組侯 的概覽形式分，報(bào)表可以分為以下幾種類型： 縱欄式：每次只縱向排列顯示表或查詢的一條記錄 ； 表格式：一行顯示一條記錄，每次可以顯示表或查詢 的多條記錄； 組合式：含有子報(bào)表的報(bào)表 ； 圖表式：將記錄數(shù)據(jù)以圖表形式顯示 ； 標(biāo)簽式：以標(biāo)簽形式顯示。 圖 來(lái)訪登記 窗體 Register Here Form 17 圖 宿舍物品維修登記窗體 Registration Dormitory Repair Items Form 宿舍狀態(tài)圖的設(shè)計(jì) 點(diǎn)擊“ 宿舍 狀態(tài)圖”命令按鈕，打開以下窗體如圖 所示，可以 對(duì) 各個(gè) 宿舍的 狀態(tài)進(jìn)行設(shè)計(jì) 。如在圖 所示的查詢中設(shè)置查詢條件為：“ Like [請(qǐng)輸入系別名稱 ]” ，如圖 所示。 圖 “顯示表”對(duì)話框 Show Table Dialog Box （ 4）在“顯示表”對(duì)話框中列出了可以添加到查詢中的表等，雙擊要添加到查詢中的表的名稱，添加表（這里添加“全院學(xué)生宿舍信息”表）。 在 Access 數(shù)據(jù)庫(kù)中，可以使用下列 5 種類型的查詢。 在全院學(xué)生宿舍信息、 1— 7 棟學(xué)生宿舍信息及晚歸登記的窗體中包含的命令按鈕基本相同。 該窗體的 程序代碼 如附件 B 所示 。 當(dāng)用戶輸入了正確的用戶編號(hào)和密碼后就可以進(jìn)入本系統(tǒng)進(jìn)行相應(yīng)的操作。通過(guò)窗體可以方便地輸入數(shù)據(jù)、編輯數(shù)據(jù)，查詢、排序、篩選和顯示數(shù)據(jù)。 要設(shè)置數(shù)據(jù)表之間的關(guān)系，必須先建立包含默寫通用信息的字段 (稱之為主鍵字段 )之間的連接。 ● 系統(tǒng)管理員 對(duì)系統(tǒng)用戶（即宿舍管理員）權(quán)限的限制，包括用戶編號(hào)、窗體編號(hào)、窗體名稱、權(quán)限。本 學(xué)生 宿舍 管理系統(tǒng) 需完成 的 功能主要有 ： ● 宿舍基本信息的輸入 、 查詢、修改 、刪除 ，包括 宿舍號(hào)、宿舍編號(hào)、宿舍 類型、入住狀態(tài) 。而且，由于數(shù)據(jù)庫(kù)是動(dòng)態(tài)的，隨時(shí)間的推移，用戶的數(shù)量和數(shù)據(jù)庫(kù)事務(wù)不斷擴(kuò)大，數(shù) 據(jù)庫(kù)系統(tǒng) 任務(wù) 必然增加。如果不能達(dá)到用戶的需求，就要反復(fù)修正或重新設(shè)計(jì)。 是否滿意 圖 數(shù)據(jù)庫(kù)設(shè)計(jì)流程圖 Database Design Flow Diagram 需求分析 由圖 可知，整個(gè)數(shù)據(jù)庫(kù)設(shè)計(jì) 流程從對(duì)系統(tǒng)需求分析開始。 VBA 是基于 Visual Basic 發(fā)展而來(lái)的，它們具有相似的語(yǔ)言結(jié)構(gòu) ， 是 Visual Basic 的子語(yǔ)言。不能反映現(xiàn)實(shí)世界事物之間的內(nèi)在聯(lián)系。在應(yīng)用需求的推動(dòng)下，在計(jì)算機(jī)硬件、軟件發(fā)展的基礎(chǔ)上，數(shù)據(jù)管理技術(shù)經(jīng)歷了人工管理、文件系統(tǒng)、數(shù)據(jù)庫(kù)系統(tǒng)三個(gè)階段。 因此， 學(xué)生 宿舍管理部分工作的信息化和科學(xué)化管理有著十分重要的實(shí)踐意義，本系統(tǒng)旨在實(shí)現(xiàn)對(duì)現(xiàn)有的宿舍管理系統(tǒng)中遇到的宿舍信息情況和大量數(shù)據(jù)進(jìn)行數(shù)據(jù)庫(kù)存儲(chǔ)的基礎(chǔ)上，設(shè)計(jì)并完成對(duì)其宿舍信息的分類 、 查詢、添加、刪除和修改，在深入研究的過(guò)程中，盡可能實(shí)現(xiàn)方便友好的操作界面和數(shù)據(jù)報(bào) 表 。 本系統(tǒng)旨在實(shí)現(xiàn)對(duì)現(xiàn)有的宿舍管理系統(tǒng)中遇到的宿舍信息情況和大量數(shù)據(jù)進(jìn)行數(shù)據(jù)庫(kù)存儲(chǔ)的基礎(chǔ)上，設(shè)計(jì)并完成對(duì)其宿舍信息的 分類 、 查詢、添加、刪除和修改。 ******學(xué)院本科生畢業(yè)設(shè)計(jì) 學(xué)生宿舍管理系統(tǒng) 的設(shè)計(jì) Design of Student Dormitory Management System 學(xué)生宿舍 管理系統(tǒng)的設(shè)計(jì) 摘要 宿舍管理科在高校宿舍管理工作中承擔(dān)著管理、檢查、督促和協(xié)調(diào)等重要的管理任務(wù)。系統(tǒng) 操作簡(jiǎn)便、靈活實(shí)用、 界面美觀，對(duì)高校的宿舍管理具有一定的借鑒意義。 系統(tǒng)開發(fā)環(huán)境的選擇 硬件環(huán)境 AMD3600+的 CPU，內(nèi)存 512MB，建議采用 1024768 分辨率。 數(shù)據(jù)庫(kù)的發(fā)展 人工管理階段 20 世紀(jì) 50 年代中期以前，計(jì)算機(jī)主要用于科學(xué)計(jì)算。在文件系統(tǒng)階段，程序與數(shù)據(jù)之間的關(guān)系如圖 所示。 VBA 的概念： Visual Basic 具有功能相當(dāng)強(qiáng)的系統(tǒng)結(jié)構(gòu)，因此微軟公司將其引用到其他常用的應(yīng)用程序上（例如：Access、 Excel、 Word、 PowerPoint 等等），首先在 加入宏程序的設(shè)計(jì)，這種夾在應(yīng)用程序中的 Visual Basic 版本稱之為 VBA（ Visual Basic for Application） ]2[ 。系統(tǒng)分析需求包括對(duì)數(shù)據(jù)庫(kù)的需求和對(duì)應(yīng)功能的需求兩方面的內(nèi)容。 需求分析 邏輯結(jié)構(gòu)設(shè)計(jì) 概念結(jié)構(gòu)設(shè)計(jì) 物理結(jié)構(gòu)設(shè)計(jì) 數(shù)據(jù)模型優(yōu)化 功能評(píng)價(jià)及優(yōu)化 數(shù)據(jù)庫(kù)的實(shí)施 是 是 數(shù)據(jù)庫(kù)的運(yùn)行 與 維護(hù) 是 6 物理設(shè)計(jì)結(jié)構(gòu) 物理設(shè)計(jì)結(jié)構(gòu) 設(shè)計(jì)同樣依賴與具體的數(shù)據(jù)庫(kù)管理系統(tǒng)。因此，數(shù)據(jù)庫(kù)管理員必須持續(xù)管理數(shù)據(jù)庫(kù)，并在必要的時(shí)候?qū)?shù)據(jù)庫(kù)進(jìn)行升級(jí) ]3[ 。 ● 宿舍 狀態(tài) 的 輸入、 查詢 、修改、刪除 。 系統(tǒng)功能模塊劃分 根據(jù)系統(tǒng)需求分析與系統(tǒng)功能描述，建立如圖 所示的學(xué)生宿舍管理系統(tǒng)功能模塊框圖。但是被連接的字段必須具有相同的數(shù)據(jù)類型和長(zhǎng)度。 一個(gè)好的數(shù)據(jù)庫(kù)系統(tǒng)不但要設(shè)計(jì)合理，滿足用戶需要，而且還必須擁有一個(gè)功能完善、操作方便、美觀的界面。 為了使界面更加 美觀，在窗體中還添加了跑馬燈的效果。 “用戶登錄 ”界面的運(yùn)行結(jié)果如圖 所示。窗體中的 “ 統(tǒng)計(jì)人數(shù) ” ，統(tǒng)計(jì)的是當(dāng)前窗體的記錄數(shù)。 1. 選擇查詢 ； 2. 交叉表查詢 ； 3. 參數(shù)查詢 ； 4. 動(dòng)作查詢 ； 5. SQL 查詢 。 （ 5）添加完需要的表后，單擊“ 關(guān)閉”按鈕。 圖 建立查詢條 件 Set up Query Conditions （ 9）如果需要保存查詢，可以單擊工具欄上的“保存”按鈕，輸入一個(gè)符合 Access對(duì)象命名規(guī)則的名稱，然后單擊“確定”按鈕。 圖 宿舍狀態(tài)圖 Dormitory Status Map 報(bào)表顯示 的設(shè)計(jì) 報(bào)表是數(shù)據(jù)庫(kù)中的數(shù)據(jù)通過(guò)打印機(jī)輸出的特有形式，是 Access 數(shù)據(jù)庫(kù)重要對(duì)象之一。 本系統(tǒng)所創(chuàng)建的報(bào)表結(jié)構(gòu)基本相同，在主窗體點(diǎn)擊報(bào)表顯示按鈕后系統(tǒng)將會(huì)出現(xiàn)一個(gè)報(bào)表顯示的窗體，其運(yùn)行結(jié)果如圖 所示?！靶薷拿艽a窗體”完成的就是用戶修 改密碼的操作。最后在新菜單中添加窗 體 、查詢、報(bào)表等對(duì)象。 圖 最終界面 Finally Interface 系統(tǒng)使用評(píng)價(jià) 本系統(tǒng)具有良好的人 機(jī)界面，可以運(yùn)用于學(xué)生宿舍管理的各個(gè)環(huán)節(jié)和層次，改善宿舍管理的環(huán)境，降低工作的強(qiáng)度，提高學(xué)生宿舍管理的實(shí)效。從一開始的無(wú)從下手到中期的舉步艱難，與后期屢屢 失敗 的調(diào)試過(guò)程。是 他 在畢業(yè)設(shè)計(jì)之 時(shí) 幫助我分析題目，講解整個(gè) 系統(tǒng) 的思路，為良好的開端奠定了基礎(chǔ)。 25 參考文獻(xiàn) [1] 韓澤坤編著 .Access 2020 公司數(shù)據(jù)庫(kù)管理綜合應(yīng)用 [M].北京：中國(guó)青年出版社， 2020. [2] 王成春，蕭雅云編著 .實(shí)戰(zhàn) Access 2020 VBA 程序設(shè)計(jì) [M].北京：中國(guó)鐵道出 版社， . [3] 楊濤，李敏，劉青蘭編著 .中文版 Access2020 實(shí)用教程 [M].北京：清華大學(xué)出版社， . [4] 華天科技編著 .無(wú)師自通 .Access2020 入門與應(yīng)用篇 [M].北京：人民郵電出版社 .. [5] 本書編委會(huì)編著 .Access2020 數(shù)據(jù)庫(kù)管理與提高 [M].北京：電子工業(yè)出版社，. [6] 張強(qiáng)編著 .中文 Access2020 入門 與實(shí)例教程 [M].北京：電子工業(yè)出版社，： 83. [7] 李佳，范俊弟，鄧劍民 編著 .Office 高手 — Access2020 數(shù)據(jù)庫(kù)應(yīng)用 [M].北京 ：人民郵電出版社 ,： 129. [8] 李春葆，曾平編著 .數(shù)據(jù)庫(kù)原理與應(yīng)用 — 基于 Access[M].北京：清華大學(xué)出版社， ： 119. [9] 華天科技編著 .無(wú)師自通 — Access2020 入門與應(yīng)用篇 [M].北京：人民郵電出版社 出版發(fā)行， ： 117. [10] 桂思強(qiáng)編著 .Access 行家實(shí)戰(zhàn)問(wèn)答集 [M].北京：中國(guó)鐵道出版社， ：72. [11] 張強(qiáng)編著 .中文 Access2020 入門 與實(shí)例教程 [M].北京：電子工業(yè)出版社 ，： 165. [12] 導(dǎo)向科技編著 .Access 2020 辦公應(yīng)用快易通 [M].北京 :人民郵電出版社 ,. [13] 王宇虹 ,熊 靖 ,李宏亮編著 .專家門診 — Access 開發(fā)答疑 200 問(wèn) [M].北京 :人民郵電出版社 ,. [14] 杰誠(chéng)文化編著 .數(shù)據(jù)專家 :Access 快速入門與實(shí)用范例精選 [M].北京 :中國(guó)青年 出版社 ,2020. [15] 章立民編著 .Access 2020 高手攻略 [M].北京 : 中國(guó)鐵道出版社 ,. [16] 譚浩強(qiáng)主編 .Access 數(shù)據(jù)庫(kù)應(yīng) 用技術(shù)基礎(chǔ)版 [M].華夏出版社， . 26 附錄 附錄 A 表 A1 學(xué)生信息表 Form of Student’s File 字段名稱 數(shù)據(jù)類型 字段大小 屬性 宿舍號(hào) 文本 50 主鍵 姓名 文本 50 — 學(xué)號(hào) 文本 50 掩碼： ************ 系別 文本 50 — 班別 文本 50 — 籍貫 文本 50 — 宿舍類型 文本 50 — 入住時(shí)間 日期 /時(shí)間 短日期 — 宿舍電話 文本 50 — 備注 文本 50 — 表 A2 晚歸登記表 Registration Form 字段名稱 數(shù)據(jù)類型 字段大