學生信息管理系統(tǒng)設(shè)計

1、管理系統(tǒng)設(shè)計Document number ： WTWYT-WYWY-BTGTT-YTTYU-2018GT1 .引言學生信息管理系統(tǒng)是一個教育單位不可缺少的部分，它的內(nèi)容對于學校的決 策者和管理者來說都至關(guān)重要,所以學生學生成績管理系統(tǒng)應(yīng)該能夠為用戶提供 充足的信息和快捷的查詢手段。但一直以來人們使用傳統(tǒng)人工的方式管理文件學 生成績，這種管理方式存在著許多缺點,如:效率低、保密性差,另外時間一長，將 產(chǎn)生大量的文件和數(shù)據(jù),這對于查找、更新和維護都帶來了不少的困難也。隨著科學技術(shù)的不斷提高,計算機科學日漸成熟,其強大的功能已為人們深刻 認識,它已進入人類社會的各個領(lǐng)域并發(fā)揮著越來越重要的作用。作

2、為計算機應(yīng)用的一部分,使用計算機對學生學生成績信息進行管理,具有著 手工管理所無法比擬的優(yōu)點.例如:檢索迅速、查找方便、可靠性高、存儲量大、 保密性好、壽命長、成本低等。這些優(yōu)點能夠極大地提高學生學生成績管理的效 率,也是企業(yè)的科學化、正規(guī)化管理，與世界接軌的重要條件。因此，開發(fā)這樣一套管理軟件成為很有必要的事情。結(jié)合上述要求，在基于 SQL2000數(shù)據(jù)庫技術(shù)以及面向?qū)ο蟮木幊碳夹g(shù)的基礎(chǔ)上，研究了這套學生信息管 理系統(tǒng)。該系統(tǒng)可以實現(xiàn)學生基本信息的管理和成績管理,并可實現(xiàn)多用戶登 陸。由于時間緊迫、掌握技術(shù)有限等條件限制，本系統(tǒng)可能還存在著一些不足之 外，敬請老師同學批評指導。2.SQL語言介

3、紹SQL是英文Structured Query Language的縮寫，意思為結(jié)構(gòu)化查詢語言， 是訪問數(shù)據(jù)庫的標準語言。SQL語言的主要功能就是同各種數(shù)據(jù)庫建立聯(lián)系，進行溝通。按照ANSI （美 國國家標準協(xié)會）的規(guī)定，SQL被作為關(guān)系型數(shù)據(jù)庫管理系統(tǒng)的標準語言。SQL 語句可以用來執(zhí)行各種各樣的操作，例如更新數(shù)據(jù)庫中的數(shù)據(jù)，從數(shù)據(jù)庫中提取 數(shù)據(jù)等。目前，絕大多數(shù)流行的關(guān)系型數(shù)據(jù)庫管理系統(tǒng)，如Oracle, Sybase, Microsoft SQL Server, Access等都采用了 SQL語言標準。雖然很多數(shù)據(jù)庫都 對SQL語句進行了再開發(fā)和擴展，但是包括Select, Insert,

4、 Update, Delete, Create,以及Drop在內(nèi)的標準的SQL命令仍然可以被用來完成幾乎所有的數(shù)據(jù) 庫操作巴SQL語言是一種非過程化語言，它一次處理一個記錄集合，對數(shù)據(jù)提供自動 導航。SQL語言允許用戶在高層的數(shù)據(jù)結(jié)構(gòu)上工作，而不對單個記錄進行操作。 SQL語言不要求用戶指定數(shù)據(jù)的存取方法，而是使用查詢優(yōu)化器，由系統(tǒng)決定對 指定數(shù)據(jù)存取的最快速手段。當設(shè)計者在關(guān)系表上定義了索引時.，系統(tǒng)會自動利 用索引進行快速檢索，用戶不需知道表上是否有索引或者有什么類型的索引等細 節(jié)。SQL語言可以完成許多功能，例如：(1)查詢數(shù)據(jù)；(2)在數(shù)據(jù)庫表格中插入、修改和刪除記錄；(3)建立、修改

5、和刪除數(shù)據(jù)對象；(4)控制對數(shù)據(jù)和數(shù)據(jù)對象的存?。?5)確保數(shù)據(jù)庫的一致性和完整性等。值 表 達 式 WHERE 條 件 表 達 式項目開發(fā)目標學生信息管理系統(tǒng)是面向教育部門的學生管理事務(wù)，包括學生基本信息管理，學 生成績管理等工作，是利用計算機進行集中管理而開發(fā)的系統(tǒng)。根據(jù)學生信息管理的需求和特點，該系統(tǒng)實施后，應(yīng)達到以下目標：(1)靈活地運用表格輸入數(shù)據(jù)，使信息傳遞更快捷；(2)系統(tǒng)采用人機對話方式，界面美觀友好、數(shù)據(jù)存儲安全可靠；(3)鍵盤操作，快速響應(yīng)；(4)實現(xiàn)各種信息的添加、刪除、修改、查詢等；(5)系統(tǒng)運行穩(wěn)定、安全可靠。系統(tǒng)的運行環(huán)境此系統(tǒng)，代碼使用VB語言編寫，數(shù)據(jù)庫管理系統(tǒng)

6、采用SQL 2012數(shù)據(jù)庫管理系 統(tǒng)，運行在Windows 2010系統(tǒng)下。系統(tǒng)總體設(shè)計1.系統(tǒng)總體設(shè)計框圖數(shù)據(jù)庫設(shè)計1. ER模型的設(shè)計畢業(yè)生就業(yè)管理系統(tǒng)概念結(jié)構(gòu)設(shè)計是在系統(tǒng)的需求分析、數(shù)據(jù)流程圖和數(shù)據(jù)字典 基礎(chǔ)上的抽象，結(jié)合聯(lián)系ER模型的設(shè)計方法，進行如下概要結(jié)構(gòu)設(shè)計。為了使ER圖 表示得更加清晰，將E-R圖分成實體屬性ER圖及實體聯(lián)系ER圖。(1)用實體及其屬性的部分ER圖表示數(shù)據(jù)庫系統(tǒng)的概念模型。學生信息實體ER圖，如圖所示：班級信息實體|，如圖所;I班級信息實體ER圖.:興4吐甘葉/*1囪6層宗班文用戶實體ER圖，如圖所:2 .數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計邏輯設(shè)計的目的是把概念:興/4-W白葉

7、/*ZT枇品|用戶信息實體用實體及其聯(lián)系L 如圖所示：成績實體之間ER圖,考試莫型。匕為數(shù)據(jù)庫管理系統(tǒng)可匕也即將由ER圖表示的概念解轉(zhuǎn)換為施MS通用的邏輯模型，如關(guān)系母翼，然后對其進行優(yōu)化。以關(guān)系模型為 型，并且包括一組:學生實法茴中結(jié)構(gòu)械計 映射的步課程三射為關(guān)系模選修把ER實體圖中的每個實體變換為一個關(guān)系模型。變換每個關(guān)系：多對多模型需要加一個單獨的關(guān)系模型；而一對一的或者一對多 的聯(lián)系可用在實體中增加屬性(此處為外鍵)來模型化。(3)ER圖中的屬性可轉(zhuǎn)換為關(guān)系的屬性。3 .數(shù)據(jù)庫物理設(shè)計系統(tǒng)中的數(shù)據(jù)表如下所示：(1)系統(tǒng)用戶數(shù)據(jù)表(用戶表)記錄系統(tǒng)所有用戶名和密碼信息，表中的各個字 段以

8、及各個字段的說明如表所示：字段名稱數(shù)據(jù)類型字節(jié)數(shù)說明用戶名文本6主鍵密碼文本6非空(2)學生信息表記錄學生學號、姓名等基本信息，表中的各個字段以及各個字段的說明如表所示：字段名稱數(shù)據(jù)類型字節(jié)數(shù)說明學號文本9主鍵姓名文本10允許空性別文本2允許空年齡數(shù)值4允許空系另IJ文本20允許空(3)學生成績表記錄學生學號、課程號及相關(guān)的成績.表中各個字段以及各個字字段名稱數(shù)據(jù)類型字節(jié)數(shù)說明學號文本6主鍵課程號文本4主鍵成績數(shù)值4允許空段的說明如表所不(4)課程信息表記錄課程號、課程名等相關(guān)信息，表中各個字段以及各個字段的說明如表所示:(5)學生專業(yè)表記錄學號、姓名、專業(yè)等相關(guān)信息.表中各個字段以及各個字段

9、名稱數(shù)據(jù)類型字節(jié)數(shù)說明學號文本6主鍵姓名文本4主鍵專業(yè)文本255允許空字段的說明如表所不:系統(tǒng)詳細設(shè)計1.數(shù)據(jù)庫及表創(chuàng)建啟動SQL2000 Server,右擊“數(shù)據(jù)庫”點擊“新建數(shù)據(jù)庫”，在彈出的“數(shù)據(jù)庫屬性” 對話框中可鍵入數(shù)據(jù)庫名及其它其它信息.如圖所示：司設(shè)計表-Student，位重是學生信息中.列名數(shù)據(jù)類型長度允許空閹char9ch410VSsexchar2VSageint43Sdeptchar20VAI弊序戲刖行防；卜做替父*認祖,)數(shù)據(jù)庫創(chuàng)建完畢后，點擊可打開。右擊“表”選擇“新建表1 可以進行表的創(chuàng)建 以及進行相關(guān)的表屬性設(shè)置，如圖所示：字段名稱數(shù)據(jù)類型字節(jié)數(shù)說明課程號文本4主鍵

10、課程名文本20允許空先行課文本4允許空學分數(shù)值2允許空創(chuàng)建完表后右擊對應(yīng)表名“打開表”“返回所有行二可對表進行添加、修改、插入、刪除等相應(yīng)編輯操作，如圖所示:2.創(chuàng)建工程項目人! - 3DEMkCa.i tdsaoJWF%1九小2 - SUdl*irsntrt.TrxIfr/Ve-i.i CvrF ”0 - Solid Ei 4thtFn.MK-anTr-tV(1)啟動VB ,出現(xiàn)運行界面，如圖所示:點擊“文件”一一“保存工程”保存當前工程文件。二I國區(qū)3.主窗體的建立學生信息宜理系統(tǒng)不茨默生注瑣成靖官理學生管理在VB程序設(shè)計中，主界面負責應(yīng)用程序的主界面，由它調(diào)用其它模塊。因此， 主界面應(yīng)該

11、具有操作性好、界面清晰、使用戶能夠很方便地找到所需功能的特點。系 統(tǒng)的主界面部在相應(yīng)的系統(tǒng)菜單組成，用戶只需點擊相應(yīng)的菜單使可調(diào)出對應(yīng)的系統(tǒng) 模塊。相應(yīng)代碼：Private Sub changecj_Click()End SubPrivate Sub cjshuru_Click()End SubPrivate Sub dispcj_Click()工程主窗體End SubPrivate Sub exit_Click()EndEnd SubPrivate Sub newuser_Click()End SubPrivateSubnewusr_Click()End SubPrivateSubstuca

12、se_Click()End SubPrivateSubxskcgl_Click()End SubPrivateSubxueshendagl_Click()End SubPrivateSubxueshengcx_Click()End Sub用戶登陸模塊本模塊共有三個部分組成：用戶登陸窗體、密碼修改窗體、新用戶注冊窗體。用戶登陸窗體主要由文本框及命令按鈕組成，利用Adodc控件及DataGrid控件 實現(xiàn)程序代碼與SQL數(shù)據(jù)的連接(如圖所示)。用戶鍵入用戶名及密碼后點擊“確 定”按鈕系統(tǒng)會通過上述兩個控件與數(shù)據(jù)庫進行連接并進行數(shù)據(jù)的比較，如果存在該 用戶及密碼正確則會進行系統(tǒng)跳轉(zhuǎn)進行主控制界面，否

13、則會提示用戶出錯，重新輸入 用戶名及密碼，次數(shù)無限制。默認用戶名為：admin,默認密碼為：123456用戶登陸窗口密碼修改窗體及新用戶注冊窗體及登陸窗體的控件組成大致相同，這里不再 詳述。用戶登陸代碼：Dim username As String, userpass As StringPrivate Sub Command1_C1ick()MsgBox 無此用戶，請重新輸入！ Exit SubElseIf Text2 = Trim(abc) ThenMsgBox 歡迎使用本系統(tǒng)，點擊進入！ ，vbOKOnly, 登陸ElseMsgBox 用戶名或密碼不正確.請重新輸入！Textl =Text

14、2 =Exit SubEnd IfEnd IfEnd SubPrivate Sub Command2_Click()EndEnd Sub新生注冊窗體學號：:|姓名：性.二力1年:此新生注冊窗口點擊“新生注冊“學生檔豪司打開本窗體，本窗體專門為新生注冊使用。通過ADODC控件實現(xiàn)本窗體與數(shù)據(jù)庫學生表的連接，文本框默認不可編輯，用戶點擊“添 加記錄”按系統(tǒng)提示可自動完成添加。如圖所示 對應(yīng)代碼：Private Sub Commandl_Click()TextlText2Text3Text4=InputBox(請輸入學生學號”,二InputBox(請輸入學生姓名”,=InputBox(請輸入學生性別

15、”,二InputBox(“請輸入學生年齡”,添加學號)添加姓名)添加性別)添加年齡)If Not IsNumeric(Text4) ThenMsgBox 請輸入數(shù)值End IfText5 = InputBox（請輸入學生系別，添加系別）resu=MsgBox（確認添加到數(shù)據(jù)庫，vbOKCancel,確認添加）If resu = vbOK ThenElseEnd IfEnd SubPrivate Sub Command2_Click（）End Sub成績修改窗體*成績修改分熱:字號0:；課程號J B確認修改記錄上一條下一條末記錄查找苜記錄M 4 Adodcl 成績修改窗體本窗體通過ADODC控件

16、連接數(shù)據(jù)庫的成績表，默認條件下文本都不可編輯，用 戶可以點擊上一條、下一條進行表的瀏覽操作。點擊“確認修改記錄”按鈕，成績文本 框變?yōu)榭删庉嫚顟B(tài)，用戶根據(jù)系統(tǒng)提示可完成記錄修改操作。如果鍵入的成績小0, 則系統(tǒng)提示出錯，并自動將出錯成績重置為60分。 相應(yīng)代碼：Private Sub Adodcl_MoveComplete(ByVai adReason As , ByVai pError As , adStatus As , ByVai pRecordset AsEnd SubPrivate Sub Commandl_Click(Index As Integer)Select Case Ind

17、exCase 0Case 1Case 2Case 3Case 4Dim mno As Stringmno = InputBox(請輸入學號”，查找窗)將輸入值存到變量內(nèi)End SelectEnd SubPrivate Sub Command2_Click()End Sub成績輸入窗體添加成績窗體本窗體通過控件與文本框與數(shù)據(jù)庫成績表實現(xiàn)連接，文本框默認不可編輯，但 可以實現(xiàn)成績的瀏覽功能。用戶點擊“添加成績”按鈕，按照系統(tǒng)提示可完成成績的添 加操作。由于成績表已經(jīng)與學生表以及課程表建立了完整性約束，所以如果用戶鍵入 的學號或者課程號不存在則將會提示用戶出錯，并且重新輸入。學生檔案管理學生巷案管理

18、 0 Then=TrueElse=FalseEnd IfEnd Sub修改記錄代碼：Private Sub Adodcl_MoveComplete(ByVai adReason As , ByVai pError As , adStatus As , ByVai pRecordset As End SubPrivate Sub Commandl_Click(Index As Integer)Select Case IndexCase 0Case 1Case 2Case 3Case 4Dim mno As Stringmno = InputBox(請輸入學號，查找窗)將輸入值存到變量內(nèi) End

19、SelectEnd SubPrivate Sub Command2_Click()End Sub成績添加代碼：Private Sub Commandl_Click()Dim adc As Stringa： Textl = InputBox(輸入學生學號，添加成績”)mm = Len(Textl)For i = 1 To mmabc = Mid(Textl, i, 1)If abc 9 ThenMsgBox 輸入格式不正確請重新輸入GoTo aEnd IfNext ib： Text2 = InputBox (輸入課程號”，添加成績)mm = Len(Text2)For i = 1 To mmabc = Mid(Text2, i, 1)If abc 9 ThenMsgBox 輸入格式不正確請重新輸入GoTo bEnd IfNext iC： Text3 = InputBox (輸入學生成績，添加成績”)mm = Len(Text3)For i = 1 To mmabc = Mid(Text3, i, 1)If abc 9 ThenMsgBox 輸入格式不正確請重新輸入GoTo aEnd IfNext iresu=MsgBox (確認添加數(shù)據(jù)庫“，vbOKOnly,確認添加)If resu = vbOK Th