【正文】 理 .Open .CloseEnd WithSet objCn = Nothinglable7 = 已聯(lián)接到數(shù)據(jù)庫服務(wù)器 = 3000 = TrueExit SubDealError: MsgBox 不能正確聯(lián)接數(shù)據(jù)庫服務(wù)器,請與系統(tǒng)管理員聯(lián)系, vbInformation Unload MeEnd Sub(2)實現(xiàn)關(guān)閉啟動屏幕。 設(shè)計系統(tǒng)主窗體第一步，設(shè)計系統(tǒng)主窗體。系統(tǒng)主窗體使用 MDI 窗體，在窗體中通過菜單來執(zhí)行各項系統(tǒng)功能。在接下來設(shè)計的窗體中，將它們的 MDIChild 屬性設(shè)置為 True。窗體命名為 frmSysMain,保存為 。系統(tǒng)主窗體設(shè)計如下： 圖 52 系統(tǒng)主窗體第二步，實現(xiàn)系統(tǒng)菜單功能。(1)實現(xiàn)窗體初始化。 在系統(tǒng)主窗體加載時，根據(jù)當(dāng)前用戶身份啟動不同的系統(tǒng)功能，實現(xiàn)代碼如下：Private Sub MDIForm_Load() If currentUserType = 學(xué)生 Then = False = False ElseIf currentUserType = 教師 Then = False = False = False = False = False = False End IfEnd Sub(2)實現(xiàn)關(guān)閉系統(tǒng)主窗體。 在用戶選擇“文件”/“退出”菜單命令時，執(zhí)行 Unload Me 語句關(guān)閉系統(tǒng)主窗體。在關(guān)閉時，在 QueryUnload 事件中請求用戶確認(rèn)，確認(rèn)后退出系統(tǒng)。(3)實現(xiàn)系統(tǒng)功能菜單。在用戶執(zhí)行系統(tǒng)功能菜單命令時，執(zhí)行相應(yīng)窗體的 Show 方法來顯示系統(tǒng)功能子窗體，實現(xiàn)代碼如下：Private Sub mmuChoose_Click() : End SubPrivate Sub mmuClass_Click() : End SubPrivate Sub mmuDepart_Click() : End SubPrivate Sub mmuGrade_Click() : End SubPrivate Sub mmuQueryList_Click() : End SubPrivate Sub mmuQueryScore_Click() : End SubPrivate Sub mmuScore_Click() : End SubPrivate Sub mmuStudent_Click() : End SubPrivate Sub mmuTeacher_Click() : End SubPrivate Sub mmuUser_Click() : End Sub 設(shè)計系統(tǒng)登錄窗體用戶必須提供正確登錄信息，才能啟動系統(tǒng)主窗體。在系統(tǒng)登錄窗體中，用戶需要輸入用戶名和口令，并可請求驗證或退出登錄。在實現(xiàn)驗證功能時，限制了用戶登錄驗證的次數(shù)，超過限定次數(shù)登錄窗體會自動關(guān)閉。窗體命名為 frmLogon,保存為 。第一步，設(shè)計系統(tǒng)登錄窗體。系統(tǒng)登錄窗體設(shè)計如下：53 系統(tǒng)登錄窗體圖第二步，實現(xiàn)系統(tǒng)登錄功能。(1) 實現(xiàn)窗體級變量。(2) 實現(xiàn)窗體初始化。(3) 實現(xiàn)登錄身份驗證。(4) 實現(xiàn)退出登錄功能。(5) 實現(xiàn)窗體清理功能。 系統(tǒng)用戶管理模塊系統(tǒng)用戶管理指對系統(tǒng)管理員的登錄信息數(shù)據(jù)進(jìn)行添加、修改和刪除等操作。窗體命名為 frmManagers,保存為 。第一步，設(shè)計系統(tǒng)用戶管理窗體。系統(tǒng)用戶管理窗體設(shè)計如下：圖 54 系統(tǒng)用戶管理窗體圖第二步，實現(xiàn)系統(tǒng)用戶管理窗體。(1) 實現(xiàn)窗體級變量。(2) 實現(xiàn)窗體初始化。(3) 實現(xiàn)記錄導(dǎo)航條功能。(4) 實現(xiàn)添加記錄功能。(5) 實現(xiàn)刪除記錄功能。(6) 實現(xiàn)輸入及檢驗功能。(7) 實現(xiàn)保存功能。(8) 實現(xiàn)關(guān)閉窗體功能。(9) 實現(xiàn)窗體清理功能。 系部信息管理模塊系部信息管理指對系部信息數(shù)據(jù)執(zhí)行添加、修改和刪除等操作。窗體命名為 frmDepartment,保存為 。第一步，設(shè)計系部信息管理窗體。系部信息管理窗體設(shè)計如下：圖 55 系部信息管理窗體圖第二步，實現(xiàn)系部信息管理窗體功能。(1)定義窗體級變量。(2)實現(xiàn)窗體初始化。(3)實現(xiàn)記錄導(dǎo)航條功能。(4)實現(xiàn)添加記錄功能。(5)實現(xiàn)刪除記錄功能。(6)實現(xiàn)輸入及檢驗功能。(7)實現(xiàn)保存功能。(8)實現(xiàn)關(guān)閉功能。(9)實現(xiàn)窗體清理功能。 班級信息管理模塊班級信息管理指對班級信息數(shù)據(jù)執(zhí)行添加、修改和刪除等。窗體命名為 frmGrade,保存為 。第一步，設(shè)計班級信息管理窗體。班級信息管理窗體如下：圖 56 班級信息管理窗體圖第二步，實現(xiàn)班級信息管理功能。(1)定義窗體級變量。(2)實現(xiàn)窗體初始化。(3)錄導(dǎo)航條功能。(4)實現(xiàn)添加記錄功能。(5)實現(xiàn)刪除記錄功能。(6)實現(xiàn)輸入及檢驗功能。(7)實現(xiàn)保存功能。(8)實現(xiàn)關(guān)閉功能。(9)實現(xiàn)窗體清理功能。 教師信息管理模塊教師信息管理指對開課教師信息數(shù)據(jù)執(zhí)行添加、修改和刪除等。窗體命名為 frmgTeacher,保存為 。第一步，設(shè)計教師信息管理窗體。教師信息管理窗體如下：圖 57 教師信息管理窗體第二步，實現(xiàn)教師信息管理窗體。(1)定義窗體級變量。(2)實現(xiàn)窗體初始化。(3)實現(xiàn)記錄導(dǎo)航條功能。(4)實現(xiàn)添加記錄功能。(5)實現(xiàn)刪除記錄功能。(6)實現(xiàn)輸入及檢驗功能。(7)實現(xiàn)保存功能。(8)實現(xiàn)關(guān)閉功能。(9)實現(xiàn)窗體清理功能。 學(xué)生信息管理模塊學(xué)生信息管理指對學(xué)生信息數(shù)據(jù)執(zhí)行添加、修改和刪除等。窗體命名為 frmStudent,保存為 。第一步，設(shè)計學(xué)生信息管理窗體。學(xué)生信息管理窗體如下：圖 58 學(xué)生信息管理窗體第二步，實現(xiàn)學(xué)生信息管理窗體。(1)定義窗體級變量。(2)實現(xiàn)窗體初始化。(3)實現(xiàn)記錄導(dǎo)航條功能。(4)實現(xiàn)添加記錄功能。(5)實現(xiàn)刪除記錄功能。(6)實現(xiàn)輸入及檢驗功能。(7)實現(xiàn)關(guān)閉功能。(8)實現(xiàn)窗體清理功能。 課程信息管理模塊課程信息管理指對課程信息數(shù)據(jù)執(zhí)行添加、修改和刪除等。窗體命名為 frmCourse,保存為 。第一步，設(shè)計課程信息管理窗體。課程信息管理窗體如下：圖 59 課程信息管理窗體第二步，實現(xiàn)課程信息管理窗體。(1)定義窗體級變量。(2)實現(xiàn)窗體初始化。(3)實現(xiàn)記錄導(dǎo)航條功能。(4)實現(xiàn)添加記錄功能。(5)實現(xiàn)刪除記錄功能。(6)實現(xiàn)輸入及檢驗功能。(7)實現(xiàn)保存功能。(8)實現(xiàn)關(guān)閉功能。(9)實現(xiàn)窗體清理功能。 選課信息管理模塊 設(shè)計學(xué)生選課窗體在學(xué)生選課窗體中，學(xué)生根據(jù)課程信息選擇需要修讀的課程，選課記錄保存在選課記錄表中。在查看選擇信息時，可以刪除原有的選課記錄。窗體保存為 。第一步，設(shè)計學(xué)生選課窗體。 學(xué)生選課窗體設(shè)計如下： 圖 510 學(xué)生選課窗體圖第二步，實現(xiàn)選課管理窗體。(1) 定義窗體極變量。(2) 實現(xiàn)窗體初始化。(3) 實現(xiàn)記錄導(dǎo)航條功能。(4) 根據(jù)學(xué)生編號顯示學(xué)生信息。(5) 在“可修改課程”表格選擇課程時，顯示課程記錄提示。(6) 顯示當(dāng)前課程任課教師信息。(7) 實現(xiàn)添加預(yù)選課程功能。(8) 實現(xiàn)刪除預(yù)選課程功能。(9) 實現(xiàn)保存預(yù)選課程功能。(10) 實現(xiàn)刪除已選課程記錄功能。(11)實現(xiàn)顯示已選和預(yù)選課程功能。(12)實現(xiàn)清除功能。(13)實現(xiàn)關(guān)閉窗體功能。(14)實現(xiàn)窗體清理功能。 設(shè)計成績管理窗體成績管理指任課教師為班中的學(xué)生設(shè)計課程成績。窗體文件保存為 .第一步，設(shè)計成績管理窗體。成績管理窗體設(shè)計如下：圖 511 成績管理窗體圖在成績管理窗體中，成績設(shè)定后，可單擊 按鈕打印成績單。第二步，設(shè)計打印預(yù)覽窗體。文件保存為 .第三步，實現(xiàn)成績管理窗體功能。(1) 定義窗體級變量。(2) 實現(xiàn)窗體初始化。(3) 實現(xiàn)教師身份驗證功能。(4) 實現(xiàn)清除功能。(5) 實現(xiàn)打印預(yù)覽功能。(6) 根據(jù)窗體大小調(diào)整數(shù)據(jù)網(wǎng)格。(7) 實現(xiàn)窗體關(guān)閉功能。(8) 實現(xiàn)窗體清除功能。第四步，實現(xiàn)打印窗體功能。 選課數(shù)據(jù)查詢模塊 設(shè)計教學(xué)班學(xué)生信息查詢窗體教學(xué)班學(xué)生信息查詢指根據(jù)課程編號查看教學(xué)班學(xué)生信息。窗體文件保存為 。第一步，設(shè)計教學(xué)班學(xué)生信息查詢窗體。教學(xué)班學(xué)生信息查詢窗體設(shè)計如下：圖 512 教學(xué)班學(xué)生信息查詢窗體圖在教學(xué)班學(xué)生信息查詢窗體窗體中，如果輸入編號正確，可單擊 按鈕，在打印預(yù)覽窗體中查看學(xué)生名單。這里的使用的打印預(yù)覽窗體仍為前面創(chuàng)建的 frmPrint 窗體。第二步，實現(xiàn)教學(xué)班學(xué)生信息查詢窗體功能。(1) 定義窗體級變量。(2) 實現(xiàn)窗體初始化。(3) 實現(xiàn)課程編號驗證功能。(4) 實現(xiàn)查看教師信息功能。(5) 實現(xiàn)清除功能。(6) 實現(xiàn)打印預(yù)覽功能。(7) 根據(jù)窗體大小調(diào)整數(shù)據(jù)網(wǎng)格。(8) 實現(xiàn)窗體關(guān)閉功能。(9) 實現(xiàn)窗體清理功能。 設(shè)計學(xué)生個人成績查詢窗體學(xué)生個人信息查詢指根據(jù)學(xué)生編號查看學(xué)生個人成績。窗體文件保存為 。第一步，設(shè)計學(xué)生個人成績查詢窗體。學(xué)生個人成績查詢窗體設(shè)計如下：圖 513 學(xué)生個人成績查詢圖第二步，實現(xiàn)學(xué)生個人成績查詢窗體功能。(1) 定義窗體級變量。(2) 實現(xiàn)窗體初始化。(3) 實現(xiàn)學(xué)生編號驗證功能。(4) 實現(xiàn)清除功能。(5) 根據(jù)窗體大小調(diào)整數(shù)據(jù)網(wǎng)格。(6) 實現(xiàn)窗體關(guān)閉功能。(7) 實現(xiàn)窗體清理功能。6 結(jié)束語 總結(jié)經(jīng)過幾個月的設(shè)計，學(xué)生學(xué)籍管理系統(tǒng)基本開發(fā)完成，該系統(tǒng)是高校典型的信息管理系統(tǒng)，功能十分強(qiáng)大的管理系統(tǒng)，它集各種功能用于一身，在系統(tǒng)的各個模塊中體現(xiàn)了它的功能，針對高校學(xué)生學(xué)籍工作方面進(jìn)行設(shè)計的，同時該系統(tǒng)也是為了方便于管理員、教師和學(xué)生的一些信息操作，為高校節(jié)省了管理成本，提高學(xué)校的工作效率。該系統(tǒng)的界面簡單大方，非常方便用戶的操作，同時，也為以后系統(tǒng)的擴(kuò)展留出了足夠的空間。在本系統(tǒng)的設(shè)計過程中，首先通過對高校學(xué)籍管理系統(tǒng)功能進(jìn)行詳細(xì)的分析，得到系統(tǒng)功能模塊圖，然后根據(jù)系統(tǒng)功能分析，圍繞它進(jìn)行系統(tǒng)的設(shè)計，介紹開發(fā)環(huán)境和開發(fā)技術(shù)，再可行性分析、功能和性能需求，然后得出系統(tǒng)業(yè)務(wù)流圖、數(shù)據(jù)流圖、ER 圖，并進(jìn)行數(shù)據(jù)庫的設(shè)計和模塊化的實現(xiàn)。由于之前沒學(xué)過 VB,僅利用自己的課余學(xué)習(xí) ,經(jīng)過這次系統(tǒng)設(shè)計過程,，才知道平日里書本上所學(xué)的東西太少，僅是些概念知識，沒運用到實踐中來，知識是無法得到升華的。 展望經(jīng)過系統(tǒng)的設(shè)計所遇到的問題以及學(xué)校所反映的情況，針對系統(tǒng)的不足還有以下幾個方面需要進(jìn)一步的完善和補(bǔ)充：(1)界面有待進(jìn)一步改進(jìn)，使其更加美觀。(2)本系統(tǒng)的打印功能還不夠強(qiáng)(3)應(yīng)使用新版本或者升級版的數(shù)據(jù)庫，如 SQL Server 2022，在有些方面比本系統(tǒng)使用的 SQL Server 2022 要有優(yōu)勢。(4)開發(fā)工具 Visual Basic 應(yīng)該用最新版。(5)檢測系統(tǒng)錯誤需進(jìn)一步完善。(6)系統(tǒng)的維護(hù)功能要更強(qiáng)。(7)數(shù)據(jù)備份和恢復(fù)更完善。致　　謝在本次畢業(yè)設(shè)計中，指導(dǎo)老師認(rèn)真負(fù)責(zé)的工作態(tài)度，嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神和深厚的理論水平都使我受益匪淺。在此衷心地感謝我的導(dǎo)師。本文從選題到完成，從理論上的探討到實際問題的解決，無處不飽含著老師的心血。另外，在系統(tǒng)設(shè)計過程中，還要感謝給予我?guī)椭耐瑢W(xué)們和網(wǎng)上提供相關(guān)資料的朋友們以及參考文獻(xiàn)的作者們。參考文獻(xiàn)文獻(xiàn)、資料名稱 編著者 出版單位Visual Basic 程序設(shè)計軟件工程管理信息系統(tǒng)C 語言程序設(shè)計SQL Server 數(shù)據(jù)庫開發(fā)入門與范例解析網(wǎng)絡(luò)數(shù)據(jù)庫技術(shù)及應(yīng)用SQL Server 2022 實用教程Visual Basic 數(shù)據(jù)庫開發(fā)實例數(shù)據(jù)庫系統(tǒng)概論龔沛曾、楊志強(qiáng)王宜貴陶華亭劉克成夏邦貴金林樵劉衛(wèi)宏劉濤等王珊