【導讀】中學生學生學籍管理系統(tǒng) I 蝕肇葿薀罿肇腿莃裊膆芁蕿螁膅莄莁蚇膄肅薇蚃膃芆蒀膂莈蚅袈膁蒀蒈螄膁膀蚄蝕芀節(jié)蒆羈艿蒞螞襖羋蕆蒅螀芇膇蝕螆襖荿薃螞袃蒁螈羈袂膁薁袇袁芃螇螃袀蒞薀蠆罿蒈莂羇羈膇薈袃羈莀莁衿羇蒂蚆螅羆膂葿蟻羅芄蚄羀羄莆蕆袆羃葿蚃螂肅膈蒅蚈肂芁蟻薄肁蒃蒄肀膃蝿袈聿芅薂螄肈莇螈蝕肇葿薀罿肇腿莃裊膆芁蕿螁膅莄莁蚇膄肅薇蚃膃芆蒀膂莈蚅袈膁蒀蒈螄膁膀蚄蝕芀節(jié)蒆羈艿蒞螞襖羋蕆蒅螀芇膇蝕螆襖荿薃螞袃蒁螈羈袂膁薁袇袁芃螇螃袀蒞薀蠆罿蒈莂羇羈膇薈袃羈莀莁衿羇蒂蚆螅羆膂葿蟻羅芄蚄羀羄莆蕆袆羃葿蚃螂肅膈蒅蚈肂芁蟻薄肁蒃蒄肀膃蝿袈聿芅薂螄肈莇螈蝕肇葿薀罿肇腿莃裊膆芁蕿螁膅莄莁蚇膄肅薇蚃膃芆蒀膂莈蚅袈膁蒀蒈螄膁膀蚄蝕芀節(jié)蒆羈艿蒞螞襖羋蕆蒅螀芇膇蝕螆襖荿薃螞袃蒁螈羈袂膁薁袇袁芃螇螃袀蒞薀蠆罿蒈莂羇羈膇薈袃羈莀莁衿羇蒂蚆螅羆膂葿蟻羅芄蚄羀羄莆蕆袆羃葿蚃螂肅膈蒅蚈肂芁蟻薄肁蒃蒄肀膃蝿袈聿芅薂螄肈莇螈蝕肇

　　

【正文】 er_Form 用戶表 中學生學生學籍管理系統(tǒng) 12 四 、 詳細設計 本軟件的功能和要求是解決高校對學 生的管理問題，為進一步完善學校對學生檔案學籍，成績等的管理，實現(xiàn)學生信息數(shù)據(jù)包括與學生有關的數(shù)據(jù)的管理與操作處理。具體實現(xiàn)學生信息管理、學籍異動管理、獎懲情況管理、檔案管理、學生注冊管理、分類信息統(tǒng)計和查詢等功能?；緮?shù)據(jù)流動為用戶數(shù)據(jù)的輸入，學生信息、班級信息、助貸信息、交費信息，以及有關用戶提出的對學生信息等等的查詢要求所產生的數(shù)據(jù)輸出。提供靈活的瀏覽和查找功能?？梢圆榭茨硞€系、某個班級所有學生的學生學籍信息；可以對學生信息提供模糊和精確查找。 本軟件采用的數(shù)據(jù)庫系統(tǒng)應該是目前廣泛采用 的系統(tǒng)。同時與教育部學籍管理系統(tǒng)數(shù)據(jù)字段匹配，安全和保密有一定的保障，軟件的整個設計過程必須通過生產能力的提高，人員工作效率的提高等等使軟件開發(fā)成本最小化，實現(xiàn)保證軟件質量的前提下的資金投入最小化。系統(tǒng)操作權限 ,本系統(tǒng)可同時提供給學生管理人員或者學生使 (一 ) 系統(tǒng)管理模塊 該模塊的主要任務是維護系統(tǒng)的正常運行和安全性設置 ,包括添加用戶、修改密碼、刪除用戶等等。 修改： Private Sub Command2_Click() Text1(0) = Text1(1) = Text1(2) = End Sub Set mrc = ExecuteSQL(txtSQL, MsgText) txtSQL = select * from user_Form Set mrc = ExecuteSQL(txtSQL, MsgText) (0) = Trim(Text1(3)) (1) = Trim(Text1(5)) (2) = Now 中學生學生學籍管理系統(tǒng) 13 For i = 3 To 6 Text1(i) = Next MsgBox 用戶信息修改成功 !, vbOKOnly, 提示 End Sub (二 ) 班級管理模塊 該模塊的功能是實現(xiàn)對全校班級的管理工作，包括：班級游覽、班級添加、班級修改等，這三個功能模塊各自獨立，完成學校的全部班級的管理 [5]。 Private Sub Command5_Click() txtSQL = delete from class_Form where class_NO=39。 amp。 Trim(Text1(8)) amp。 39。 Set mrc = ExecuteSQL(txtSQL, MsgText) For i = 8 To 11 Text1(i) = Next MsgBox 班級信息以經刪除 !, vbOKOnly, 警告 ShowData End Sub (三 ) 學生學籍管理模塊 該模塊的主要功能是實現(xiàn)對學生的個人信息的管理工作，包括學籍添加、學籍查 詢、學籍修改等功能，從而方便學校管理部門對學校的基本情況的快速查詢和了解。 (四 ) 課程管理模塊 該模塊對各個班級的課程進行設置，并可在其中設置各門課程的教材選用情況，方便了學校教材管理部門和教務處的教學管理人員的工作。該模塊包括基本課程設置和班級課程設置兩個模塊。 Private Sub Command2_Click() Dim txtSQL As String 中學生學生學籍管理系統(tǒng) 14 If Then txtSQL=delete from course_Form where course_Name=39。 amp。 Trim() amp。 39。 Set mrc = ExecuteSQL(txtSQL, MsgText) MsgBox 課程信息已經刪除 !, vbOKOnly, 提示 List2Text End If End Sub (五 ) 成績管理模塊 學校的成績管理工作是檢驗學生學習情況的一個主要手段，本模塊包括考試類型設置，共有期中考試和期未考試兩種類型，還設置了成績添加、成績查詢、成績?yōu)g覽、成績修改等功能模塊 [6]。 Private Sub Command7_Click() Dim j As Integer Dim txtSQL As String If Text4(0) = Then MsgBox 請選擇要刪除的紀錄 !, vbOKOnly, 提示 Exit Sub End If txtSQL = Delete from score_Form where score_NO=39。 amp。 Trim(Text4(0)) amp。 39。 Set mrc = ExecuteSQL(txtSQL, MsgText) MsgBox 考試信息修改成功 !, vbOKOnly, 提示 j = 0 For i = 1 To 1 If (i, 0) = Text4(0) Then j = i End If 中學生學生學籍管理系統(tǒng) 15 (六 ) 獎懲信息管理模塊 獎懲信 息是用來督促學習學習活動的一種手段，包括獎懲信息的添加和修改。 Private Sub Command1_Click() Dim txtSQL As String txtSQL = select * from prize_Form Set mrc = ExecuteSQL(txtSQL, MsgText) (0) = Trim(Text1(0)) (1) = Trim(Text1(1)) Text1(0) = Text1(1) = MsgBox 獎懲信息添加成功 !, vbOKOnly, 提示 List1Text End Sub (七 ) 退出模塊 此模塊完成程序的退出。 五 、 系統(tǒng)實現(xiàn) (一 ) 系統(tǒng)登陸界面 本界面的主要功能是為了對系統(tǒng)進行安