基于vb和sql的學(xué)生信息管理系統(tǒng)設(shè)計(jì)-免費(fèi)閱讀
【正文】 在整個(gè)過程中，都需要周密的計(jì)劃和安排，每一步驟，都需要按照軟件工程標(biāo)準(zhǔn)來完成。 amp。 = True = False = True = = = Else MsgBox (請指定要查找學(xué)生的學(xué)號！), , (提示)End IfEnd SubPrivate Sub DataCombo1_Change() = TrueEnd SubPrivate Sub fanhui_Click()Unload MeEnd SubPrivate Sub Form_Load() = = = = = = End SubPrivate Sub Text1_Change() = TrueEnd SubPrivate Sub queding_Click()Dim res As Integerres = MsgBox( 確認(rèn)修改？ , vbExclamation + vbYesNo + vbDefaultButton2)If res = vbYes Then (usersname) = Trim() (userkey) = Trim() (userleved) = Trim() MsgBox 修改成功！ End IfEnd SubPrivate Sub xiugai_Click()MsgBox 請?jiān)谟疫吙瞻滋庉斎雽?yīng)的新信息！ 39。⑴、用戶添加：當(dāng)要添加用戶時(shí)，就可以通過這個(gè)窗體進(jìn)行用戶的添加，： 實(shí)現(xiàn)此功能的程序代碼如下：Private Sub Form_Load() = = = 請選擇用戶類型End SubPrivate Sub queding_Click()If = Then Dim res As Integer res = MsgBox( 確認(rèn)添加？ , vbExclamation + vbYesNo + vbDefaultButton2) If res = vbYes Then (usersname) = Trim() (userkey) = Trim() (userleved) = Trim() MsgBox 添加成功！ = End IfElse MsgBox 兩次密碼輸入不一致，請重新輸入！ End IfEnd SubPrivate Sub Text2_Change() = TrueEnd Sub⑵、用戶查詢：可以通過下列的窗體進(jìn)行系統(tǒng)內(nèi)所允許進(jìn)入系統(tǒng)的用戶的查詢，： 圖 用戶查詢實(shí)現(xiàn)此功能的程序代碼如下：Private Sub chaxun_Click()If = 請選擇用戶名稱 Then MsgBox (請指定要查找用戶的名稱！), , (提示)Else = adCmdText = select * from users where usersname=39。（7）登錄用戶是學(xué)生或者教師時(shí)可以對自己的登錄密碼進(jìn)行修改，當(dāng)?shù)卿浻脩羰枪芾韱T時(shí)，可以對系統(tǒng)里所有用戶的密碼進(jìn)行修改。E．學(xué)生信息管理模塊：學(xué)生信息管理模塊包含了學(xué)生信息添加、學(xué)生信息查詢、學(xué)生信息修改和學(xué)生信息刪除操作，同時(shí)能夠?qū)崿F(xiàn)按照學(xué)生的學(xué)號進(jìn)行單條件的查詢，并且當(dāng)?shù)卿浻脩羯矸菔菍W(xué)生時(shí)，可以進(jìn)行學(xué)生成績的查詢和隨意修改自己的登錄密碼，當(dāng)?shù)卿浻脩羯矸菔墙處煏r(shí)，只能進(jìn)行學(xué)生信息的查詢。 總之，希望通過本系統(tǒng)的開發(fā)，可以解決學(xué)生基本信息管理、課程信息管理、班級信息管理、專業(yè)信息管理、學(xué)生成績信息管理等功能，還可以進(jìn)行班級信息的管理，同時(shí)能夠?qū)崿F(xiàn)系統(tǒng)管理，主要是針對登錄用戶的添加、刪除、修改和查詢功能，使學(xué)校對學(xué)生的成績管理自動化和規(guī)范化。對于學(xué)校的全體老師而言，他們應(yīng)該能夠?qū)ο到y(tǒng)的不同部分有各自不同的權(quán)限，例如，任課教師可以錄入成績，對于其他教師而言，應(yīng)該具有查詢所有科目及所有學(xué)生的成績的權(quán)限，等等。為各高校教務(wù)工作人員減輕負(fù)，提高工作效率，所以制作了學(xué)生成績管理系統(tǒng)。面對龐大的信息量，需要有考試管理系統(tǒng)來提高學(xué)生考試管理工作的效率。；Students’ Examnation Management System1 引言 選題的意義在現(xiàn)代，高科技的飛躍發(fā)展，計(jì)算機(jī)的大量普及，使得人們生活節(jié)奏越來越快。 2 系統(tǒng)分析：隨著社會信息量的與日俱增，學(xué)校需要有一個(gè)很好的學(xué)生考試管理系統(tǒng)，以方便對學(xué)生考試進(jìn)行有效的管理。系統(tǒng)管理員可添加用戶信息，更改用戶信息和刪除用戶信息，同時(shí)可以針對其他的信息具有所有的權(quán)限；任課教師可以錄入信息和查詢信息，學(xué)生只能對所有的信息具有查詢的功能，不具有修改、刪除和錄入的權(quán)限。在此模塊中，學(xué)生只可以進(jìn)行成績查詢操作，而教師可以進(jìn)行成績的查詢和成績的添加。（4）班級相關(guān)信息錄入、修改、刪除和查詢功能。 Trim() amp。 amp。 = TrueEnd IfEnd SubPrivate Sub DataCombo1_Change() = TrueEnd SubPrivate Sub fanhui_Click()Unload MeEnd SubPrivate Sub Form_Load() = = = End SubPrivate Sub shanchu_Click() Dim res As Integer res = MsgBox( 確實(shí)要刪除此條記錄嗎？ , vbExclamation +
公司管理相關(guān)推薦
鄂ICP備17016276號-1