【正文】
178。 查詢學(xué)生的獎懲情況,得出畢業(yè)鑒定結(jié)果并打印與之相應(yīng)的協(xié)作圖: 貧困生管理模塊所涉及到的協(xié)作圖和時序圖178。 與之相適應(yīng)的系統(tǒng)管理員備份數(shù)據(jù)的協(xié)作圖系統(tǒng)管理員把用戶信息輸入登錄系統(tǒng),接著提交用戶ID,并對用戶的添加刪除進(jìn)行管理,若執(zhí)行添加刪除操作則返回添加刪除信息。 學(xué)校學(xué)生管理信息系統(tǒng)的后臺數(shù)據(jù)庫主要存儲相關(guān)數(shù)據(jù),負(fù)責(zé)數(shù)據(jù)管理。因此,我們可以利用這些Java代碼對該系統(tǒng)進(jìn)行逆向工程操作,以便在該系統(tǒng)的相關(guān)業(yè)務(wù)類中添加、刪除、修改相關(guān)屬性和操作。 ‘連接數(shù)據(jù)庫If time 2 Then On Error GoTo errname If = Trim((pwd)) Then Load frmmain ‘顯示學(xué)生信息管理系統(tǒng)主窗口 Unload Form1 Exit SubElse MsgBox (您的用戶名或密碼有誤,請重行輸入!, vbExclamation + vbDefaultButton1, 錯誤) time = time + 1 = = Exit Sub End IfElse ms = MsgBox(您不是合法用戶,請與系統(tǒng)管理員聯(lián)系!, vbInformation + vbOKOnly, 抱歉)If ms = vbOK Then End Unload Me End If Else MsgBox 請把用戶名和密碼輸全!, vbInformation + vbOKOnly, 提示 = = Exit Sub End If errname: MsgBox (抱歉您的用戶名不存在!, vbInformation + vbOKOnly, 抱歉) = = Exit SubEnd SubPrivate Sub login_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyUp Then End IfEnd SubPrivate Sub text1_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyReturn Then End If If KeyCode = vbKeyDown Then End IfEnd SubPrivate Sub text2_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyReturn Then End If If KeyCode = vbKeyDown Then End If If KeyCode = vbKeyUp Then End IfEnd SubPrivate Sub cmdcancel_Click() ‘重置 Dim s As String s = MsgBox(確認(rèn)退出系統(tǒng)嗎?, vbYesNo + vbQuestion, 退出) If s = vbYes Then Unload Me Else = = End IfEnd Sub學(xué)生信息管理系統(tǒng)主窗口:代碼:Private Sub Form_Load() If Valname = 系統(tǒng)管理員 Then = True Else = False End IfEnd SubPrivate Sub chegl_Click() 單擊學(xué)生成績管理 Load frmchenggl 加載學(xué)生成績管理窗口 顯示學(xué)生成績管理窗口 Unload frmmain 卸載主窗口End SubPrivate Sub kcgl_Click() 單擊學(xué)生課程管理窗口 Load frmskcgl 加載學(xué)生課程管理窗口 顯示學(xué)生課程管理窗口 Unload frmmainEnd SubPrivate Sub jff_Click() 單擊學(xué)生處罰管理窗口Load frmchufa 加載學(xué)生處罰管理窗口 顯示學(xué)生處罰管理窗口 Unload frmmainEnd SubPrivate Sub jfj_Click() 單擊學(xué)生獎勵管理窗口Load frmaward 加載學(xué)生獎勵管理窗口 顯示學(xué)生獎勵管理窗口 Unload frmmainEnd SubPrivate Sub sushe_Click() 單擊學(xué)生宿舍管理窗口Load frmaward 加載學(xué)生宿舍管理窗口 顯示學(xué)生宿舍管理窗口 Unload frmmainEnd SubPrivate Sub xjgl_Click() 單擊學(xué)生學(xué)籍管理窗口 Load frmXjgl 加載學(xué)生學(xué)籍管理窗口 顯示學(xué)生學(xué)籍管理窗口 Unload frmmainEnd SubPrivate Sub gra_Click() 單擊學(xué)生畢業(yè)管理窗口 Load frmgra 加載學(xué)生畢業(yè)管理窗口 顯示學(xué)生畢業(yè)管理窗口 Unload frmmainEnd SubPrivate Sub sysp_Click() 單擊普通管理員窗口 Load frmputong 加載普通管理員窗口 顯示普通管理員窗口