學(xué)生成績管理系統(tǒng)-數(shù)據(jù)庫原理課設(shè)

1、精選優(yōu)質(zhì)文檔-傾情為你奉上精選優(yōu)質(zhì)文檔-傾情為你奉上專心-專注-專業(yè)專心-專注-專業(yè)精選優(yōu)質(zhì)文檔-傾情為你奉上專心-專注-專業(yè)摘 要隨著科技的發(fā)展，基本上所有的具有一定數(shù)量數(shù)據(jù)的機(jī)構(gòu)都開始使用計(jì)算機(jī)數(shù)據(jù)庫來做管理。幾乎所有學(xué)校也都已經(jīng)在使用計(jì)算機(jī)管理數(shù)據(jù)的機(jī)制，大大減少了學(xué)校學(xué)生成績管理的工作量。該課程設(shè)計(jì)要求設(shè)計(jì)一個(gè)學(xué)生成績的數(shù)據(jù)庫管理系統(tǒng)，數(shù)據(jù)庫中要求包含學(xué)生的基本信息，課程基本信息，以及學(xué)生所學(xué)課程的考試成績。要方便學(xué)生進(jìn)行成績查詢，通過該課程設(shè)計(jì)，應(yīng)該達(dá)到把數(shù)據(jù)庫理論知識(shí)更加的鞏固加深，加強(qiáng)動(dòng)手能力與實(shí)踐能力，學(xué)以致用，與現(xiàn)實(shí)生活中的應(yīng)用充分的結(jié)合起來。學(xué)生成績管理系統(tǒng)是基于SQL S

2、erver 2008數(shù)據(jù)庫開發(fā)工具和VB開發(fā)工具來進(jìn)行設(shè)計(jì)。 關(guān)鍵詞：數(shù)據(jù)庫原理；SQL Server 2008；VB6.0；學(xué)生成績管理系統(tǒng)。目 錄 TOC o 1-3 h z u 參考文獻(xiàn)181 系統(tǒng)功能概述 學(xué)生成績管理系統(tǒng)能有效的解決學(xué)生成績記錄的數(shù)量眾多，管理造成的混亂。從而對(duì)學(xué)生成績的信息進(jìn)行準(zhǔn)確的管理。本系統(tǒng)的開發(fā)目的是有效的管理學(xué)生信息，實(shí)現(xiàn)學(xué)生信息的數(shù)據(jù)規(guī)范化，自動(dòng)化，系統(tǒng)化管理。適用于某個(gè)班級(jí)內(nèi)部使用的成績管理軟件，有班長負(fù)責(zé)使用。1輸入每個(gè)學(xué)期開設(shè)的課程及其信息，并可以修改和刪除。2實(shí)現(xiàn)每個(gè)同學(xué)各學(xué)期各門課程的成績的輸入、修改。3能夠快速的查詢統(tǒng)計(jì)學(xué)生的信息和課程信息。2

3、 數(shù)據(jù)庫設(shè)計(jì)2.1需求分析隨著學(xué)校向全國及至世界范圍的持續(xù)擴(kuò)張，學(xué)生人數(shù)的增加，對(duì)于學(xué)生的信息管理也越來越復(fù)雜，要求也越來越高，因此需要一個(gè)全面、詳細(xì)的信息管理系統(tǒng)，以便完成對(duì)學(xué)生信息的管理。無紙化的環(huán)境是技術(shù)時(shí)代的一個(gè)夢(mèng)想，也是許多學(xué)校和公司越來越意識(shí)到的一個(gè)真實(shí)世界。以前是由學(xué)生檔案和公告欄來提供各種信息及通告新的變化，而現(xiàn)在這個(gè)繁雜的工作已被網(wǎng)站和內(nèi)部計(jì)算機(jī)網(wǎng)絡(luò)所取代。使得學(xué)生信息的管理更方便、安全。根據(jù)調(diào)查得知，現(xiàn)在廣大學(xué)生進(jìn)行信息提交的主要方式是基于文件、表格等紙介質(zhì)的手工處理，學(xué)生信息管理部門信息處理工作量大，容易出錯(cuò)，且管理方面因人而異。然而學(xué)校網(wǎng)上學(xué)生信息管理系統(tǒng)應(yīng)該覆蓋各個(gè)所

4、需功能，使各級(jí)管理人員和廣大教職工在信息系統(tǒng)的輔助下進(jìn)行工作，提高管理的整體水平。使得學(xué)生信息管理更方便。學(xué)生信息管理系統(tǒng)，可以用集中的數(shù)據(jù)庫將與人力資源管理相關(guān)的信息全面、有機(jī)地聯(lián)系起來，有效地減少了信息更新和查找中的重復(fù)勞動(dòng)，保證了信息的相容性，從而大大地提高了工作效率，還能使原來不可能提供的分析報(bào)告成了可能。在采用和實(shí)施學(xué)生信息管理系統(tǒng)之后，就會(huì)將依賴于人的過程改為依賴于計(jì)算機(jī)系統(tǒng)的過程。學(xué)校管理人員只要獲取了相應(yīng)的權(quán)限，就可以隨時(shí)進(jìn)入系統(tǒng)，直接查閱相應(yīng)的信息。采用和實(shí)施學(xué)生信息管理系統(tǒng)不僅僅是為了提高工作效率。為了除掉手工記錄的低效率工作方式，運(yùn)用信息化管理，提高工作效率，開發(fā)本系統(tǒng)。

5、應(yīng)該看到，在實(shí)施學(xué)生信息管理系統(tǒng)后，經(jīng)過整合的、較為全面、準(zhǔn)確、一致和相容的信息不僅可以讓學(xué)校領(lǐng)導(dǎo)對(duì)本學(xué)校學(xué)生資源的現(xiàn)狀有一個(gè)比較全面和準(zhǔn)確的認(rèn)識(shí)，同也可以生成綜合的分析報(bào)表供學(xué)校領(lǐng)導(dǎo)人在決策時(shí)參考。2.2 E-R模型該管理系統(tǒng)中主要包含4個(gè)實(shí)體：密碼表、學(xué)生信息、學(xué)生成績信息和課程信息 ，所以在這里給出了單個(gè)實(shí)體及屬性圖，和部分完整的實(shí)體聯(lián)系圖。實(shí)體及其屬性圖如下：學(xué)號(hào)查詢成績姓名成績類型成績課號(hào)密碼表用戶名密碼學(xué)號(hào)查詢成績姓名成績類型成績課號(hào)密碼表用戶名密碼圖2.1：密碼表及其屬性圖 學(xué)號(hào)姓名年齡學(xué)號(hào)姓名年齡類別學(xué)生性別查詢課程課名學(xué)分密碼查詢課程課名學(xué)分密碼課程課號(hào)2.3 表結(jié)構(gòu)設(shè)計(jì)啟動(dòng)

6、SQL Server 2008建立數(shù)據(jù)庫課程設(shè)計(jì)，在該數(shù)據(jù)庫中，用可視化的方法進(jìn)行建表，要建的表有密碼表，學(xué)生表，課程信息表，成績表四個(gè)表，所建各表的表信息如下：密碼表：圖2.2：密碼表學(xué)生表：圖2.3：學(xué)生表課程信息表：圖2.4：課程信息表 圖4：成績表：圖2.5：成績表3 系統(tǒng)各功能模塊的詳細(xì)設(shè)計(jì)3.1 歡迎界面的設(shè)計(jì)點(diǎn)擊歡迎界面上的歡迎詞“進(jìn)入系統(tǒng)” 時(shí)即可跳轉(zhuǎn)到登錄主界面，歡迎詞用Label控件進(jìn)行添加，程序運(yùn)行時(shí)歡迎界面最大化。控件屬性值表：控件名屬性名屬性值Label1Caption進(jìn)入系統(tǒng)Font宋體、二號(hào)ForeColor黑色歡迎界面如圖3.1所示：圖3.1 歡迎界面對(duì)應(yīng)代碼如

7、下：Private Sub Command1_Click() 登陸.Show 歡迎界面.HideEnd Sub3.2 登錄界面用Label控件添加“用戶名”和“密碼”顯示在界面上，并在后面用TextBox控件添加練個(gè)輸入?yún)^(qū)，三個(gè)按鈕則由Command Button控件進(jìn)行添加，最后由Adodc控件與數(shù)據(jù)庫相連?？丶傩灾当恚?控件名屬性名屬性值控件名屬性名屬性值Label1Caption用戶名Command2Caption取消Font楷體、小四Font楷體、小四Label2Caption密碼Command3Caption注冊(cè)Font楷體、小四Font楷體、小四Command1Caption登錄

8、Font楷體、小四登錄界面如下：圖3.2：登陸對(duì)應(yīng)的代碼如下：Dim miCount As IntegerPrivate Sub Command1_Click()Dim SQLStr As StringSQLStr = Select * From 密碼表 Where Sno= & Text1 & Adodc1.RecordSource = SQLStrAdodc1.RefreshIf Adodc1.Recordset.BOF Then MsgBox 用戶名錯(cuò)誤，重新輸入, vbExclamation, 警告 Text1.Text = Text1.SetFocusElse If Adodc1.R

9、ecordset.Fields(密碼) = Text2 ThenMDIForm1.Show Unload Me Else MsgBox 密碼錯(cuò)誤，重新輸入 , vbExclamation, 警告Text2.Text = Text2.SetFocus End IfEnd IfmiCount = miCount + 1If miCount = 3 Then Unload MeEnd Sub3.3 主控界面主控界面是MDI窗體，含有的主菜單包含：文件、圖書管理、音像管理和系統(tǒng)。在未登錄之前只有文件和系統(tǒng)兩菜單可用，成功登錄之后圖書管理和音像管理兩個(gè)主菜單變?yōu)榭捎玫?。主控界面的詳?xì)情況如下：文件 包含

10、以下子菜單和功能：登錄菜單：打開登錄界面退出返回界面登錄數(shù)據(jù)管理菜單包含以下子菜單和功能：各科信息瀏覽菜單：顯示各科信息的瀏覽窗體修改信息菜單：顯示修改信息的更改窗體 綜合成績查詢菜單包含以下子菜單和功能：混合查詢菜單：顯示混合查詢的瀏覽窗體 打印報(bào)表菜單包含以下子菜單和功能：學(xué)生成績表 菜單：學(xué)生成績打印 課程號(hào)菜單：課程號(hào)打印學(xué)生信息表：學(xué)生信息表打印主控界面的設(shè)計(jì)如下圖所示： 圖3.3：菜單編輯器圖3.4：主控界面對(duì)應(yīng)代碼如下：Private Sub chengji_Click()DataReport1.ShowMDIForm1.HideEnd SubPrivate Sub Denglu

11、_Click()登陸.ShowMDIForm1.HideEnd SubPrivate Sub Exit_Click()歡迎界面.ShowMDIForm1.HideEnd SubPrivate Sub Geke_Click()信息瀏覽.ShowMDIForm1.HideEnd SubPrivate Sub Hunhe_Click()查詢.ShowMDIForm1.HideEnd SubPrivate Sub kecheng_Click()DataReport2.ShowMDIForm1.HideEnd SubPrivate Sub MDIForm_Load()End SubPrivate Sub

12、 Xiugai_Click()修改信息.ShowMDIForm1.HideEnd SubPrivate Sub xuesheng_Click()DataReport3.ShowMDIForm1.HideEnd Sub3.4 信息瀏覽界面（1）信息瀏覽界面該窗體具有新增記錄、刪除記錄、修改記錄、取消修改等功能。當(dāng)新增記錄或修改記錄時(shí)，只要沒有單擊確定按鈕，單擊取消按鈕，可以取消上述操作。成績按鈕則會(huì)調(diào)到成績界面。取消則會(huì)返回上一界面。控件名 屬性名 屬性值 控件名 屬性名 屬性值 Text1 DataSource Adodc1 Text3 DataSource Adodc1 DataField

13、學(xué)號(hào) DataField 性別 Locked True Locked True Text2 DataSource Adodc1 Text4 DataSource Adodc1 DataField 姓名 DataField 生日 Locked True Locked True Text5 DataSource Adodc1 Text5 Locked True DataField 專業(yè) 信息瀏覽界面如下：圖3.5：信息瀏覽對(duì)應(yīng)的代碼如下：Private Sub Command8_Click()x = MsgBox(確實(shí)要?jiǎng)h除當(dāng)前記錄嗎？, vbYesNo + vbQuestion, 確認(rèn))If x

14、 = vbYes Then Adodc1.Recordset.Delete Adodc1.Recordset.MoveNext If Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveLast End IfElse Adodc1.RefreshEnd IfEnd SubPrivate Sub Command9_Click()Adodc1.RefreshCommand6.Enabled = TrueCommand8.Enabled = TrueCommand7.Enabled = FalseCommand9.Enabled = FalseEnd Sub

15、Private Sub Form_Load()Command1.Enabled = FalseCommand2.Enabled = FalseCommand3.Enabled = TrueCommand4.Enabled = TrueCommand6.Enabled = TrueCommand8.Enabled = TrueCommand7.Enabled = FalseCommand9.Enabled = FalseLabel6.Caption = 記錄： & Adodc1.Recordset.AbsolutePosition & / & Adodc1.Recordset.RecordCou

16、ntCombo1.AddItem 男Combo1.AddItem 女End Sub3.5各科信息瀏覽界面在表中，顯示學(xué)生成績信息表格和學(xué)生課程表格；當(dāng)選中某行記錄并單擊修改數(shù)據(jù)按鈕時(shí)，將打開修改信息界面，顯示該行記錄的信息，并可以修改數(shù)據(jù)。點(diǎn)擊返回鍵返回信息信息瀏覽界面。各科信息瀏覽界面如下：圖3.6：各科信息瀏覽對(duì)應(yīng)代碼如下：Private Sub Command1_Click()If Adodc1.Recordset.EOF Or Adodc1.Recordset.BOF Then MsgBox 請(qǐng)選擇要修改的行 Exit SubEnd If修改信息.Show各科信息瀏覽.HideEnd

17、SubPrivate Sub 返回_Click()信息瀏覽.Show Unload MeEnd Sub3.6修改信息瀏覽界面當(dāng)選中上面某個(gè)人的信息是點(diǎn)擊修改成績將會(huì)彈出此界面對(duì)應(yīng)學(xué)生的信息進(jìn)行修改點(diǎn)擊更新按鈕將對(duì)學(xué)生信息進(jìn)行修改。點(diǎn)擊返回按鈕將彈出各科信息瀏覽界面。修改信息瀏覽界面如下：圖3.7：修改信息代碼如下：Private Sub Command1_Click()各科信息瀏覽.Adodc1.Recordset.Fields(學(xué)號(hào)) = Text1.Text各科信息瀏覽.Adodc1.Recordset.Fields(課號(hào)) = Text2.Text各科信息瀏覽.Adodc1.Record

18、set.Fields(類型) = Text3.Text各科信息瀏覽.Adodc1.Recordset.Fields(成績) = Text4.Text各科信息瀏覽.Adodc1.Recordset.Fields(姓名) = Text5.Text各科信息瀏覽.Adodc1.Recordset.Update各科信息瀏覽.Adodc1.RefreshEnd SubPrivate Sub Command2_Click()Unload 修改信息各科信息瀏覽.ShowEnd SubPrivate Sub Form_Load()Text1.Text = 各科信息瀏覽.Adodc1.Recordset.Fiel

19、ds(學(xué)號(hào))Text2.Text = 各科信息瀏覽.Adodc1.Recordset.Fields(課號(hào))Text3.Text = 各科信息瀏覽.Adodc1.Recordset.Fields(類型)Text4.Text = 各科信息瀏覽.Adodc1.Recordset.Fields(成績)Text5.Text = 各科信息瀏覽.Adodc1.Recordset.Fields(姓名)End Sub3.7混合信息查詢界面可以選擇按學(xué)號(hào)、課程號(hào)、課程類別，查詢相關(guān)信息。查詢結(jié)果中包含：按學(xué)號(hào)、課程號(hào)、課程類別進(jìn)行學(xué)生成績信息統(tǒng)計(jì)。點(diǎn)擊返回按鈕則進(jìn)入MDIForm1界面?；旌闲畔⒉樵兘缑嫒缦拢簣D3.8：查詢學(xué)號(hào)圖3.9：查詢課號(hào)圖3.10：查詢類型代碼如下:Private Sub Command1_Click()Dim str As Stringstr = Select SC.* From SC str = str & Where SC. & Combo1.Text & Like & Text1 & % Adodc1.RecordSource = str Adodc1.RefreshEnd SubPrivate Sub Comman