學(xué)生信息管理系統(tǒng)詳細(xì)設(shè)計(jì)說明書

1、學(xué)生信息管理系統(tǒng)詳細(xì)設(shè)計(jì)說明書V1.0(版本號)擬 制 人 審 核 人 批 準(zhǔn) 人 二OO五 年 十 月 十五 日詳細(xì)設(shè)計(jì)說明書引言隨著信息技術(shù)在管理上越來越深入而廣泛的應(yīng)用，管理信息系統(tǒng)的實(shí)施在技術(shù)上已逐步成熟。管理信息系統(tǒng)是一個(gè)不斷發(fā)展的新型學(xué)科，任何一個(gè)單位要生存要發(fā)展，要高效率地把內(nèi)部活動有機(jī)地組織起來，就必須建立與自身特點(diǎn)相適應(yīng)的管理信息系統(tǒng)。編寫目的建成一個(gè)完整統(tǒng)一、技術(shù)先進(jìn)、高效穩(wěn)定、安全可靠的學(xué)生管理信息系統(tǒng)。這是一個(gè)集教務(wù)工作自動化和信息化為一體的先進(jìn)的電腦網(wǎng)絡(luò)系統(tǒng)，在為教務(wù)工作有關(guān)部門提供優(yōu)質(zhì)、高效的業(yè)務(wù)管理和事務(wù)處理的同時(shí)，采用安全可靠的現(xiàn)代化處理和控制技術(shù)，及時(shí)、準(zhǔn)確、

2、可靠地采集和傳輸信息，建立完備、可靠的教學(xué)信息處理系統(tǒng)。對各院（系）教務(wù)辦實(shí)現(xiàn)統(tǒng)一的信息瀏覽、成績管理。與學(xué)生處學(xué)生管理系統(tǒng)、就業(yè)辦公室的學(xué)生就業(yè)管理系統(tǒng)等實(shí)現(xiàn)學(xué)生基本信息的共享。通過校園網(wǎng)為教務(wù)處網(wǎng)站訪問者提供全面及時(shí)的信息和數(shù)據(jù)，如課程設(shè)置、學(xué)生的信息查詢、成績單核實(shí)等。本學(xué)生信息管理系統(tǒng)可以說是一個(gè)綜合性的學(xué)校學(xué)生管理系統(tǒng)，這它集成了學(xué)生學(xué)籍管理系統(tǒng)、學(xué)生成績管理系統(tǒng)、學(xué)生檔案管理系統(tǒng)、學(xué)生個(gè)人管理系統(tǒng)等多種功能，因而具有較強(qiáng)的實(shí)用性和先進(jìn)性。項(xiàng)目背景 主要是以學(xué)校管理處為委托單位，以學(xué)生為管理對象進(jìn)行設(shè)計(jì)的，該系統(tǒng)結(jié)合數(shù)據(jù)庫技術(shù)和VB開發(fā)而成的，該系統(tǒng)是建立在其他一些管理信息系統(tǒng)的基礎(chǔ)

3、上開發(fā)而成的。定義參考資料1劉炳文等，VISUAL BASIC程序設(shè)計(jì)數(shù)據(jù)庫篇，19992 黃淼云.VB6.0辦公自動化編程.國防工業(yè)出版社3 王要武，管理系統(tǒng)，電子工業(yè)出版社，20034李紅等編著，管理信息系統(tǒng)開發(fā)與應(yīng)用，電子工業(yè)出版社，20035 康博工作室，張紅軍，王紅等縞著Visual Basic 6.0中文版高級應(yīng)用與開發(fā)指南，人民郵電出版社，2001年4月第一版6 林立軍，程斌，翁迪恩縞著Visual Basic 6.0數(shù)據(jù)庫開發(fā)指南，西安電子科技大學(xué)出版社，2000年2月第一版7 張宏林，孔艷，王哲等編著。按實(shí)例學(xué)Visual Basic 6.0北京，人民郵電出版社，20008美

4、Jeffrey P.McManus著趙學(xué)鎖，龔波，李志，曹天偉等譯Visual Basic 6.0數(shù)據(jù)庫存訪問技術(shù)總體設(shè)計(jì)需求概述系統(tǒng)需求 由于操作人員的計(jì)算機(jī)知識普遍較差,要求有良好的人機(jī)界面; 由于該系統(tǒng)的使用對象多,要求有較好的權(quán)限管理; 原始數(shù)據(jù)修改簡單方便,支持多條件修改 方便的數(shù)據(jù)查詢，支持多條件查詢; 在相應(yīng)的權(quán)限下，刪除數(shù)據(jù)方便簡單，數(shù)據(jù)穩(wěn)定性好； 數(shù)據(jù)計(jì)算自動完成，盡量減少人工干預(yù);軟件結(jié)構(gòu)本系統(tǒng)在執(zhí)行時(shí)，先根據(jù)不同的操作人員的需要來進(jìn)行相應(yīng)的模塊，然后可以輸入數(shù)據(jù)或者進(jìn)行其它的查詢操作；總體來說，本系統(tǒng)屬于一個(gè)事務(wù)型管理系統(tǒng)。處理流程如圖接受數(shù)據(jù)據(jù)處理中心班級管理檔案管理獎

5、懲管理課程管理成績管理輸出數(shù)據(jù)流程圖學(xué)籍管理部門教師學(xué)生成績管理系統(tǒng)教務(wù)處學(xué)生教師教師學(xué)生情況學(xué)生成績查詢統(tǒng)計(jì)分析學(xué)生成績管理系統(tǒng)0層數(shù)據(jù)流程圖管理部門教務(wù)處教師1.0學(xué)生管理2.0課程管理3.0成績管理4.0統(tǒng)計(jì)分析D1D2D3查詢者管理者學(xué)生成績管理系統(tǒng)1層數(shù)據(jù)流程圖整體框架圖用戶信息管理班級信息管理學(xué)籍信息管理獎懲信息管理課程信息管理成績信息管理個(gè)人信息查詢修改密碼添加用戶刪除用戶添加班級班級信息班級查詢學(xué)籍瀏覽學(xué)籍添加學(xué)籍查詢課程設(shè)置課程列表成績填加績填加加成績信息列表成績查詢成績填加加獎懲填加填加加獎懲查詢成績填加加獎懲列表成績填加加成績列表成績填加加獎懲列表成績填加加學(xué)生信息管理系

6、統(tǒng)登錄程序描述班級信息Private Sub Command1_Click() If Text1(0) = Then MsgBox 班級編號不能為空!, vbOKOnly, 提示 Text1(0).SetFocus Exit Sub End If If Text1(1) = Then MsgBox 班級名稱不能為空!, vbOKOnly, 提示 Text1(1).SetFocus Exit Sub End If If Text1(2) = Then MsgBox 導(dǎo)員姓名不能為空!, vbOKOnly, 提示 Text1(2).SetFocus Exit Sub End If txtSQL =

7、 select * from class_Form where class_NO= & Trim(Text1(0) & Set mrc = ExecuteSQL(txtSQL, MsgText) If mrc.EOF = False Then MsgBox 此班級編號已存在!, vbOKOnly, 警告 Text1(0).SetFocus Exit Sub End If mrc.Close txtSQL = select * from class_Form Set mrc = ExecuteSQL(txtSQL, MsgText) mrc.AddNew mrc.Fields(0) = Trim

8、(Text1(0) mrc.Fields(1) = Trim(Text1(1) mrc.Fields(2) = Trim(Text1(2) mrc.Fields(3) = Trim(Text1(3) mrc.Update mrc.CloseFor i = 0 To 3課程信息管理Private Sub Form_Load() Dim txtSQL As String Me.Caption = 課程信息-設(shè) 置 txtSQL = select * from class_Form Set mrc = ExecuteSQL(txtSQL, MsgText) If mrc.EOF = True The

9、n MsgBox 請先進(jìn)行班級設(shè)置!, vbOKOnly, 提示 Else With Combo1 Do While Not mrc.EOF .AddItem Trim(mrc!class_NO) mrc.MoveNext Loop Combo1.ListIndex = 0 End With End If List2TextEnd Sub獎懲信息管理Private Sub Command1_Click() Dim txtSQL As String If Text1(0) = Then MsgBox 獎懲名稱不能為空!, vbOKOnly, 提示 Text1(0).SetFocus Exit S

10、ub End If txtSQL = select * from prize_Form where prize_Name= & Trim(Text1(0) & Set mrc = ExecuteSQL(txtSQL, MsgText) If mrc.EOF = False Then MsgBox 此獎懲名稱已經(jīng)存在!, vbOKOnly, 警告 Text1(0).SetFocus Exit Sub End If mrc.Close txtSQL = select * from prize_Form Set mrc = ExecuteSQL(txtSQL, MsgText) mrc.AddNew

11、 mrc.Fields(0) = Trim(Text1(0) mrc.Fields(1) = Trim(Text1(1) mrc.Update mrc.Close Text1(0) = Text1(1) = MsgBox 獎懲信息添加成功!, vbOKOnly, 提示 List1TextEnd SubPrivate Sub Command2_Click() If List1.Text Then txtSQL = delete from prize_Form where prize_Name= & Trim(List1.Text) & Set mrc = ExecuteSQL(txtSQL, M

12、sgText) MsgBox 獎懲信息已經(jīng)刪除!, vbOKOnly, 提示 List1Text End IfEnd SubPrivate Sub Form_Load() MSFlexGrid1.Cols = 5 MSFlexGrid1.ColWidth(0) = 300 MSFlexGrid1.ColWidth(1) = 0 MSFlexGrid1.ColWidth(2) = 0 MSFlexGrid1.ColWidth(3) = 1200 MSFlexGrid1.ColWidth(4) = 1200 MSFlexGrid1.TextMatrix(0, 3) = 獎懲日期 MSFlexGri

13、d1.TextMatrix(0, 4) = 獎懲名稱 MSFlexGrid1.Rows = 1 Text3(0) = GetRkno List1TextEnd Sub成績信息管理Private Sub Form_Load() Option1(1).Value = True Picture1(0).Visible = False Picture1(1).Visible = True Picture1(2).Visible = False Picture1(3).Visible = False Picture1(1).Top = Picture1(0).Top Picture1(1).Left =

14、 Picture1(0).Left Picture1(2).Top = Picture1(0).Top Picture1(2).Left = Picture1(0).Left Picture1(3).Top = Picture1(0).Top Picture1(3).Left = Picture1(0).Left With MSFlexGrid1 .Cols = 6 .TextMatrix(0, 1) = 考試期號 .TextMatrix(0, 2) = 學(xué)生班號 .TextMatrix(0, 3) = 學(xué)生編號 .TextMatrix(0, 4) = 考試課程 .TextMatrix(0,

15、5) = 考試分?jǐn)?shù) .ColWidth(0) = 0 .ColWidth(1) = 1550 .ColWidth(2) = 1550 .ColWidth(3) = 1550 .ColWidth(4) = 1550 .ColWidth(5) = 1550 .Rows = 1 End With Text1(0) = GetRknoEnd Sub個(gè)人信息管理 Private Sub Form_Load() With MSFlexGrid1 .Cols = 4 .ColWidth(0) = 0 .ColWidth(1) = 0 .ColWidth(2) = 1700 .ColWidth(3) = 17

16、00 .TextMatrix(0, 2) = 獎懲日期 .TextMatrix(0, 3) = 獎懲名稱 .Rows = 1 End With With MSFlexGrid2 .Cols = 6 .ColWidth(0) = 0 .ColWidth(1) = 1550 .ColWidth(2) = 1550 .ColWidth(3) = 0 .ColWidth(4) = 1550 .ColWidth(5) = 1550 .TextMatrix(0, 1) = 考試期號 .TextMatrix(0, 2) = 學(xué)生班號 .TextMatrix(0, 4) = 考試課程 .TextMatrix(

17、0, 5) = 考試分?jǐn)?shù) .Rows = 1 End With Picture1.Visible = False MSFlexGrid1.Visible = False MSFlexGrid2.Visible = FalseEnd Sub學(xué)籍信息管理Private Sub Form_Load() Me.Caption = 學(xué)籍信息-查 詢 ShowTitle Label1(1).BackColor = &HFFFFFF TextDcolor Text1(4).Visible = True Combo1.Visible = False Command1.Visible = False Comma

18、nd2.Visible = True Command3.Visible = False Command4.Visible = False Text1(2).Enabled = False Text1(3).Enabled = False Text1(7).Enabled = False Text1(8).Enabled = FalseEnd Sub功能本系統(tǒng)主要可以實(shí)現(xiàn)以下的管理功能：用戶信息管理、班級信息管理、學(xué)籍信息管理、課程信息管理、成績信息管理、獎懲信息管理、個(gè)人信息查詢、幫助等等。本模塊是本系統(tǒng)的安全性設(shè)置模塊，根據(jù)學(xué)校不同部門以及不同使用人員對本系統(tǒng)的要求和需要，從而實(shí)行了分級管理

19、，對用戶的權(quán)限和類別進(jìn)行了分類管理。用戶信息管理模塊該模塊的主要任務(wù)是維護(hù)系統(tǒng)的正常運(yùn)行和安全性設(shè)置,包括添加用戶、修改密碼、刪除用戶、用戶列表等等。班級信息管理模塊該模塊的功能是實(shí)現(xiàn)對全校班級的管理工作，包括：班級信息列表、班級的添加、班級修改、班級編號、班級名稱等，這幾個(gè)功能模塊各自獨(dú)立，完成學(xué)校的全部班級的管理。學(xué)籍信息管理模塊該模塊的主要功能是實(shí)現(xiàn)對學(xué)生的個(gè)人信息的管理工作，包括學(xué)籍信息列表、數(shù)據(jù)添加、修改、刪除等功能，從而方便學(xué)校管理部門對學(xué)校的基本情況的快速查詢和了解。課程信息管理模塊該模塊對各個(gè)班級的課程進(jìn)行設(shè)置，并可在其中設(shè)置各門課程的上課情況，方便了學(xué)校管理部門和教務(wù)處的教學(xué)

20、管理人員的工作。該模塊包括課程列表和班級課程設(shè)置兩個(gè)模塊。成績信息管理模塊學(xué)校的成績管理工作是檢驗(yàn)學(xué)生學(xué)習(xí)情況的一個(gè)主要手段，本模塊包括考試類型設(shè)置，成績信息列表、考試期號、學(xué)號和考試課程，還設(shè)置了成績添加、成績游覽、成績查詢等功能模塊。獎懲信息管理模塊對學(xué)生的獎勵和懲罰情況了解有利于對班級乃至學(xué)校的管理，也是評價(jià)學(xué)生的一個(gè)指標(biāo)。這模塊主要有獎懲的日期、名稱和獎懲的信息列表。個(gè)人信息查詢模塊這模塊模塊主要有獎懲列表和成績列表兩個(gè)模塊，這模塊可以快速查詢某個(gè)學(xué)生的情況，可以處理緊急的情況。性能 由于本系統(tǒng)管理的對象單一,都是在校學(xué)生，且每個(gè)數(shù)據(jù)內(nèi)容具有較強(qiáng)的關(guān)聯(lián)性，涉及的計(jì)算過程不是很復(fù)雜。因此，比較適合于采用數(shù)據(jù)庫管理。且學(xué)校用于學(xué)生管理的微機(jī)都是PIII以上的機(jī)器，在存儲量、速度方面都