【正文】 1 do [i].Visible := True。 統(tǒng)計 procedure (iType: Integer)。 (39。 + ,MB_OK)。 try gf_ExecSQL(sSQL,aqPublic)。 + QuotedStr((39。 + QuotedStr((39。sno39。,MB_OK + MB_ICONERROR)。 var sSQL: string。 gf_ExecSQL(sSQL,aqPublic)。 and o = 39。delete from score where sno = 39。 if gf_MessageBox(39。沒有數(shù)據(jù)可以刪除！ 39。 end。 + ,MB_OK)。 try gf_ExecSQL(sSQL,aqPublic)。insert into score(sno,sname,o,ame,score,GPA)39。 if gf_MessageBox(39。,MB_OK)。 。 end。插入數(shù)據(jù)時未填寫平均績點！ 39。 Exit。 then begin gf_MessageBox(39。 。39。,MB_OK)。 end else if Trim() = 39。插入數(shù)據(jù)時未填寫姓名！ 39。 Exit。 then begin gf_MessageBox(39。 var 24 sSQL: string。 + QuotedStr(Trim())。 if Trim() 39。全部 39。 and exists(select * from course where o = and tno = 39。 + QuotedStr(Trim())。 if Trim() 39。39。 + QuotedStr()。)39。 case of 0: begin end。 + 39。 + 39。 begin sSQL := 39。 end。 begin if not ChangePwd then begin gf_MessageBox(39。 + QuotedStr()。 sSQL := 39。 Exit。兩次輸入的新密碼不相同 39。 var sSQL: string。 Shift: TShiftState)。 begin if Key = 13 then 。 22 end。 end。登錄身份：學(xué)生 39。 [1].Text := 39。 := False。登錄身份：教師 39。 [1].Text := 39。 := False。登錄身份：管理員 39。 [1].Text := 39。 (TfrmStuSource, frmStuSource)。usertype39。 := 21 (39。 。 + IntToStr(3 iErrorCount) + 39。 。 gf_OpenSQL(sSQL, )。 where = 39。 union all 39。 union all 39。 from [user] a 39。 iErrorCount := iErrorCount + 1。, MB_OK)。 end else if Trim() = 39。請?zhí)顚懹脩裘?39。 var 20 sSQL: string。 ②學(xué)生登錄后可在登錄界面 進(jìn)行成績查詢、個人信息查詢及密碼修改 。 表八 用戶表 user 屬性名 數(shù)據(jù)類型 是否為主鍵 是否為空 說明 缺省值 userno Char(10) yes NOT NULL 用戶名 password Char（ 6） no NOT NULL 密碼 ‘000000’ Create table user( userno char(10) primary key, password char（ 6） not null )。 表四 學(xué)生成績表 score 屬性名 數(shù)據(jù)類型 是否為主鍵 是否為空 說明 缺省值 sno char(10) Yes NOT NULL 學(xué)號 sname char(20) no NOT NULL 姓名 Noname o char(10) Yes NOT NULL 課程號 ame char(20） no NOT NULL 課程名 grade char(10) no NOT NULL 成績 GPA Float no NULL GPA Create table score ( sno char(10) , sname char（ 20） not null, o char（ 10） , ame char(20） not null, Score char(10) not null, GPA float, primary key(sno,o) )。 user（ userno， password） 。 score(sno, sname, o, ame, grade, GPA)。 ②課程安排信息，包括課程編號，課程名稱 ，教師工號 等信息。 ⑤管理員信息，包括管理員編號，管理員姓名，性別等信息。 數(shù)據(jù)流程圖 數(shù)據(jù)流圖 7 數(shù)據(jù)字典 (1).數(shù)據(jù)流 ①學(xué)院信息，包括學(xué)院編號，學(xué)院名稱等信 息。學(xué)生查詢功能：查某學(xué)生所學(xué)課程的排名、最高分、最低分、績點、不及格人數(shù)等 。 教師基本信息管理 ： 管理員對所有教師信息進(jìn)行增刪改查，學(xué)生只能查詢自己的基本信息。 系統(tǒng)登錄模塊 （ 1）用戶人員在登錄界面中輸入用戶名與密碼。 ①學(xué)生要能夠查詢自己所學(xué)課程的成績， 查看自己不 同課程 的成績、 GPA以及排名， 查看個人信息、修改個人登錄密碼等。本功能實現(xiàn)對學(xué)生信息、教師信息情況信息的管理和統(tǒng)計、課程信息和成 績信息查看及維護(hù)。 軟件定義 該 學(xué)生管理 管理信息系統(tǒng)是基于 Inter/Intra 及 C++技術(shù)，建立以以數(shù)據(jù)庫為后臺核心應(yīng)用、以服務(wù)為目的信息平臺，對資源進(jìn)行科學(xué)的加工整序和管理維護(hù)，為教學(xué)和科學(xué)研究提供文獻(xiàn)信息保障和提高管理 學(xué)生成績 的效率而設(shè)計的 4 系統(tǒng)。這些優(yōu)點能夠極大地提高管理者管理的效率 ,也是學(xué)校走向科學(xué)化、正規(guī)化管理 ,與世界接軌的重要條件。并且，可以為在校生隨時查閱自己的成績信息、教師錄入成績、管理員進(jìn)行信息維護(hù)等提供方便，為學(xué)校節(jié)省大量人力資源 本系統(tǒng)就是為了管理好 學(xué)生成績 信息而設(shè)計的。 尤其對于復(fù)雜的信息管理，計算機(jī)能夠充分發(fā)揮它的優(yōu)越性。 34 3 一、概述 項目背景 當(dāng)今時代是飛速發(fā)展的信息時代。 9 四 、系統(tǒng)實施 3 二 、 需求 分析 29 六 、收獲和體會 使用計算機(jī)進(jìn)行信息控制，不僅提高了工作效率，而且大大的提高了其安全性。擁有一款好的學(xué)習(xí)成績管理系統(tǒng)軟件，對于加強(qiáng)對在校生的成績管理起到積極作用。例：檢索迅速、查找方便、可靠性高、存儲量大、保密性好、壽命長、成本低等。最后， 自己動手編程序，能更好的提升對本專業(yè)的愛好，初步了解本專業(yè)的發(fā)展方向，為將來的畢業(yè)與找工作奠定基礎(chǔ)。本次課程設(shè)計題目為《學(xué)生成績管理系統(tǒng)》，涉及成績管理系統(tǒng)的登錄界面、老師對學(xué)生成績的查詢、學(xué)生對學(xué)生成績的查詢、教務(wù)員對學(xué)生成績的增刪改查統(tǒng)計等 內(nèi)容。 具體分析： 按照教師，學(xué)生，管理員三種角色設(shè)計系統(tǒng)功能。 系統(tǒng)業(yè)務(wù)流程分析 學(xué)生管理系統(tǒng) 系統(tǒng)登錄 管理員 教師 學(xué)生 菜 單 信 息 管 理 成 績 管 理 幫 助 個人信息 修改密碼 退出 教師信息 管理員信息 成績查詢 學(xué)生信息 成績管理 顯示制作人和版本 成績統(tǒng)計 成 績 管 理 菜 單 幫 助 菜 單 成 績 管 理 幫 助 個人信息 顯示制作人和版本 個人信息 成績查詢 修改密碼 退出 顯示制作人和版本 成績查詢 退出 修改密碼 登陸次數(shù)必須小于三 6 完成的功能 系統(tǒng)的功能模塊劃分 《學(xué)生成績管理系統(tǒng)》 包括 八 個模塊： 系統(tǒng)登錄、 學(xué)生基本 信息 管理 、教師基本 信息 管理 、 管理員基本信息管理 、學(xué)生成績信息查詢、 學(xué)生成績信息管理， 學(xué)生成績信息統(tǒng)計 ， 系統(tǒng)退出 。 學(xué)生基本信息管理 ： 管理員對所有學(xué)生信息進(jìn)行增刪改查，學(xué)生只能查詢自己的基本信息。 教師查詢功能： 查詢所教課程的最高分、