【正文】 “取消”按鈕，將文本框清空。 Private Sub Command3_Click() 單擊“返回”按鈕，當前窗體隱藏， 學生成績查詢界面出現(xiàn)。 amp。 39。 第 6 頁 共 30 頁 系統(tǒng)使用環(huán)境 操作系統(tǒng)： windows xp/2021/me/98 系統(tǒng)支持： visual basic 數(shù)據(jù)庫： access 系統(tǒng)開發(fā)環(huán)境 操作系統(tǒng) ： windows xp/2021/me/98 系統(tǒng)支持： visual basic 三 系統(tǒng)設(shè)計 對上述各項功能進行集中、分塊，按照結(jié)構(gòu)化層序設(shè)計的要求，得到如下 所示的系統(tǒng)功能功能模塊圖。 Access 的優(yōu)點在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息，數(shù)據(jù)表示圖提供了一種類似于 Excel 的電子表格，可以使數(shù)據(jù)庫一目了然。 為滿足為學校服務(wù)這一基本功能，數(shù)字校園應(yīng)定位于信息服務(wù)，對學生的成績的高效而準確的管理系統(tǒng)設(shè)計的出發(fā)點和最終目的，既要能夠滿足學生和老師的一般需求，又要能夠針對用戶的類型、需求特征等確定它的的權(quán)限以便進行管理。 關(guān)鍵詞 ：小型學生成績管理系統(tǒng)， SQL， VB ，數(shù)據(jù)庫，控件，控件與數(shù)據(jù)庫的綁定 第 3 頁 共 30 頁 目 錄 一． 選題的意義 ???????????????????????? 4 1 選擇該題目的原因 ???????????????????? ? 4 2 完成此題目用到的數(shù)據(jù)結(jié)構(gòu)和知識點 ?????????? ??? 4 二 ．系統(tǒng)功能簡介 ???????????????????? ?? ? 5 1 系統(tǒng)概述 ????????????????????????? 5 2 系統(tǒng)的組成及各模塊的功能 ????????????????? 5 3 系統(tǒng)的運行環(huán)境 ?????????????????????? 5 三 ． 系統(tǒng) 設(shè) 計 ????????????????????????? 6 1 總體結(jié)構(gòu)設(shè)計 ?????????????????????? 6 2 數(shù)據(jù)庫設(shè)計 ??????????????????????? 6 四 ． 系統(tǒng)實現(xiàn) ????????????????????????? 7 1 登錄模塊的設(shè)計和實現(xiàn)??????? ????????? ??? 8 2 學生登錄模塊的設(shè)計和實現(xiàn) ????????????? ???? 9 3 教師登錄模塊 的設(shè)計和實現(xiàn) ????????????????? 10 4 學生成績 查詢模塊設(shè)計 和實現(xiàn) ???????????????? 11 5 學生密碼修改模塊 設(shè)計和實現(xiàn) ???????????????? 12 6 主窗體模塊 的設(shè)計與實現(xiàn) ?????????????????? 13 7 添加用戶模塊的設(shè)計與實現(xiàn) ????????????????? 15 8 修改密碼模塊的設(shè)計與實現(xiàn) ????????????????? 16 9 學生信息添加模塊的設(shè)計與實現(xiàn) ??????????????? 18 10 學生信息修改模塊的設(shè)計與實現(xiàn) ?????????????? 19 11 學生信息查詢模塊的設(shè)計與實現(xiàn) ?????????????? 21 12 學生成績錄入模塊的設(shè)計與實現(xiàn) ????????????? 22 13 學生成績 修改 模塊的設(shè)計與實現(xiàn) ????????????? 24 14 學生成績 查詢 模塊的設(shè)計與實現(xiàn) ???????????? 26 15 項目統(tǒng)計模塊的設(shè)計與實現(xiàn) ?????????????? 28 第 4 頁 共 30 頁 五 .總結(jié)……………………………… ………………………… 28 1 遇到及解決的問題??????????????? ??? 28 2 心得體會??????????????????????? 29 3 后記 ????????????????????????? 29 參考文獻………………………………………………………… 29 一 選題的意義 從大的方面來講，現(xiàn)在我國的部分高中及其以下級別的大部分中學，學生成績的管理水平還停留在紙介質(zhì)的基礎(chǔ)上，這樣的機制已經(jīng)不能適應(yīng)時代的發(fā)展，因為它浪費了許多人力和物力，在信息時代這種傳統(tǒng)的管理方 法必然被計算機為基礎(chǔ)的信息管理所取代。如上所述， Access 作為關(guān)系數(shù)據(jù)庫開發(fā)具備了許多優(yōu)點，可以在一個數(shù)據(jù)包中同時擁有桌面數(shù)據(jù)庫的便利和關(guān)系數(shù)據(jù) 庫的強大功能。同時合理的數(shù)據(jù)庫結(jié)構(gòu)也將有利于程序的實現(xiàn)。 amp。 代碼如下： Private Sub Command1_Click() End End Sub 單擊“退出系統(tǒng)”按鈕，結(jié)束程序。 End Sub Private Sub xgmm_Click() 單擊“修改密碼”按鈕，當前窗體隱藏，“教師修改密碼”窗體出現(xiàn)。 Else = select * from 密碼表 where 用戶名 =39。 39。 39。 amp。不斷的調(diào)試，使我認識即時丁點的錯誤也可以導(dǎo)致系統(tǒng)的非正常運行，細節(jié)決定成敗。 主要問題 2： 由于窗體喝控件太多，使得編寫代 碼時，總是出現(xiàn)數(shù)據(jù)庫與控件案不對應(yīng)的情況。 If Then MsgBox 學號不存在，請重新 輸入！ , vbOKOnly + vbExclamation, 警告 = 判斷輸入的學號是否存在 ，若不存在，彈出警告，并請空格文本框。 Else = (0) = (1) = (2) 第 21 頁 共 30 頁 = (3) = (4) = (5) = (6) End If 由此記錄的話，直接顯示在文本框中。 If = False And = False Then MsgBox 輸入的學號已經(jīng)存在，請重新輸入！ , vbOKOnly + vbExclamation, 警告 = = 若不為空，連接數(shù)據(jù)庫，判斷輸入的學號是否已經(jīng)存在，若存在，彈出警告，重新輸入！ Else (0) = (1) = (2) = (3) = (4) = (5) = (6) = 第 19 頁 共 30 頁 MsgBox 添加成功！ 若不為空，且輸入的學號不存在，則連接數(shù)據(jù)庫，將所輸入的信息添加到“基本信息表”中。 Exit Sub Else With Data1 . .(0) = Trim() .(1) = Trim() . End With MsgBox 添加用戶成功！ , vbOKOnly + vbExclamation, 添加用戶 End If End Sub 若上述情況均沒有，則連接數(shù)據(jù)庫，將輸入的用戶信息添加到“教師密碼表”中去。 End Sub Private Sub Command2_Click() = = End Sub 單擊“取消”按鈕，將文本框清空。 amp。 amp。 ● 學生成績信息的統(tǒng)計：實現(xiàn)學生男女生人數(shù)以及不及格人數(shù)的統(tǒng)計。數(shù)據(jù)庫管理系統(tǒng)是架構(gòu)在一個或多個數(shù)據(jù)庫之上，并針對數(shù)據(jù)庫中的數(shù)據(jù)進行管理運用。提供一個電子化的成績管理平臺。我選擇這個題目，希望可以在信息管理方面有所 提高 。 結(jié)構(gòu)化查詢語言 SQL: