【正文】 A 顯示適配器 軟件環(huán)境 操作系統(tǒng)： Windows 2021/XP 數(shù)據(jù)庫： Microsoft Access 2021 江西科技師范學院 [畢業(yè)論文 ] 6 第三章 總體設計 系統(tǒng)概述 本系統(tǒng)采用 C/S 的運行方式，針對中小型學校的教務管理業(yè)務，同時考慮到開發(fā)成本和安全性的問題，本系統(tǒng)設計成一個相對封閉的單用戶運行系統(tǒng)。系統(tǒng)主模塊層次如圖示： 登錄 系統(tǒng)管理 學生信息管理 課程信息管理 幫助 教師信息管理 江西科技師范學院 [畢業(yè)論文 ] 7 模塊設計 1 歡迎模塊 顯示登錄前系統(tǒng)的歡迎信息 。 4 學生信息模塊 學生信息管理的功能是瀏覽學生信息、記錄學生細細、以及查詢學生信息 5 教師信息模塊 教師信息管理的功能主要包括教師資料的添加、查詢、修改、刪 除等操作。 9 幫助信息模塊 顯示系統(tǒng)幫助信息 。 Data Source= amp。 Int(( / ) * 100) amp。 amp。 amp。 amp。 次機會 , vbOKOnly + vbInformation, 登陸提示 = End If Else If !權限 = 學生 Then qx = 學生 UserName = MsgBox 歡迎學生登陸！ amp。 編碼： [代碼見設計 ] 第六章 系統(tǒng)維護和改進 運行維護 經(jīng)過測試，本系統(tǒng)運行穩(wěn)定，在使用和維護中還應該注意以下幾個問題： (1)定期備份數(shù)據(jù)庫，以免數(shù)據(jù)丟失。 江西科技師范學院 [畢業(yè)論文 ] 15 第七章 美化軟件 為什么要使用界面控件？ 一個軟件只有強大的功能是不夠的，在競爭越來越激勵的軟件市場中，想要讓你的軟件脫穎而出，就得讓它更受用戶喜歡。 2在 Form_load 事件中加入如下代碼 Private Sub Form_Load() (20)‘其中的 20 可以設 為 023 之間的數(shù)字 是窗體的風格 End Sub (美化前 ) (美化后 ) 第七章 結(jié)束語 經(jīng)過幾個月努力，終于圓滿的完成了整個設計過程。同時 ,參與系統(tǒng)的測試 ,很大程度上 ,提高了軟件的可靠性。 此系統(tǒng)經(jīng)過一段的實際使用和測試，雖然出現(xiàn)了一些 bugs,現(xiàn)都已經(jīng)基本排除 ,系統(tǒng)沒有出現(xiàn)明顯的安全問題、性能問題 . 第八章 致謝 在論文即將完成之際，回顧緊張但又充實的學習班和開發(fā)過程，本人在此向所有關心我的及幫助我的老師和同學們致以最真誠的感謝。 參考文獻 本系統(tǒng)開發(fā)過程中，主要的參考文獻有： [1] 孫梅，張壽華 .數(shù)據(jù)庫原理及應用 .北京 :中國鐵道出版社， 2021. [2] 柴欣，武優(yōu)西 .Visual Basic 程序設計基礎 . 北京 :中國鐵道出版社， 2021. [3] 楊世錫，沈煒 .Visual Basic 編程從基礎到實踐 .北京 :電子工業(yè)出版 ,2021. [4] 劉曉華 ,UML 基礎及 Visio 建模 .北京 :電子工業(yè)出版社 ,2021. [備注 :由于項目代碼過多，詳細代碼見設計 ] 。同時，在系統(tǒng)開 發(fā)過程得到了同事畢文波和同組同學的幫助，在此表示忠誠的感謝。更可貴的是能夠 Windows 底層技術熟悉。在實現(xiàn)過程中 ,增強了動手能力 ,積累了豐富的設計經(jīng)驗 ,提高了團隊合作意識 ,對工業(yè)化軟件生產(chǎn)有了更深刻的認識 ,同時 ,能通過自己的所學來創(chuàng)造價值 ,大大增強了自信心。 NiceForm 使用方法 。下一步可以增加其他功能模塊。 vbCrLf amp。 If = True Then intLoginnum = intLoginnum + 1 If intLoginnum = 3 Then MsgBox 您是非法用戶 ,系統(tǒng)即將關閉 , vbCritical + vbOKOnly, 登陸提示 End Else MsgBox 密碼錯誤 ,你還有 amp。 and 密碼 =39。 If = True Then MsgBox 用戶名不正確 ,請您確認后重新輸入 , vbExclamation + vbOKOnly, 登陸提示 = Else = adCmdText = select * from Login where 用戶名 =39。 ] If ( / ) 1 Then Unload Me End If End Sub 登錄模塊 如圖： 江西科技師范學院 [畢業(yè)論文 ] 12 設計 ： 在窗體 Login_frm 中添加一個 Adodc1 控件、兩個 Text 控件、兩個 label控件、兩個 Command 控件 . 編碼： [部分代碼 ] Private Sub Command1_Click() Static intLoginnum As Integer If = And = Then MsgBox 請輸入用戶名和密碼 , vbExclamation + vbOKOnly, 登陸提示 Else = adCmdText = select * from Login where 用 戶 名 =39。 \。系統(tǒng)模塊中包括 opentabl