學(xué)生成績(jī)管理系統(tǒng)大學(xué)設(shè)計(jì)設(shè)計(jì)

1、本科畢業(yè)論文學(xué)生成績(jī)管理系統(tǒng)【摘 要】學(xué)生成績(jī)是教育單位不可或缺地一部分 ，應(yīng)該能夠?yàn)橛脩籼峁┏渥愕匦畔⒑涂旖莸夭樵兎绞?傳統(tǒng)地人工方式來管理學(xué)生地成績(jī)存在著許多缺點(diǎn)，如:保密性差而且效率低，產(chǎn)生大量地文件和數(shù)據(jù)，對(duì)數(shù)據(jù)地查找、更新和維護(hù)帶來困難.隨著計(jì)算機(jī)科學(xué)逐步成熟以及完善，其滲透到人類社會(huì)地各個(gè)領(lǐng)域并發(fā)揮著重要地作用.運(yùn)用計(jì)算機(jī)對(duì)學(xué)生信息進(jìn)行管理，具有手工管理所無法比擬地優(yōu)點(diǎn).例如:檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、 保密性好、壽命長(zhǎng)、成本低等.這些優(yōu)點(diǎn)能夠極大地提高管理者對(duì)學(xué)生成績(jī)管理地效率，使學(xué)校地管理科學(xué)化、正規(guī)化.【關(guān)鍵詞】 學(xué)生成績(jī)管理系統(tǒng)；數(shù)據(jù)庫；access ;數(shù)據(jù)詞

2、典.目 錄1. 弓I言11. 1項(xiàng)目開發(fā)地背景 11. 2項(xiàng)目開發(fā)地目標(biāo)11.3 項(xiàng)目開發(fā)地意義 12. 可行性研究報(bào)告與需求分析12. 1可行性研究12. 2需求分析22.2.1 概述 22.2.2 系統(tǒng)需求 22.2.3 數(shù)據(jù)詞典 22.2.4 數(shù)據(jù)流程圖23. 系統(tǒng)總體設(shè)計(jì)33. 1系統(tǒng)結(jié)構(gòu)設(shè)計(jì)33. 2數(shù)據(jù)庫結(jié)構(gòu)設(shè)計(jì)63.3 系統(tǒng)E-R圖 74. 系統(tǒng)詳細(xì)設(shè)計(jì)94. 1系統(tǒng)開發(fā)工具及運(yùn)行環(huán)境94. 2系統(tǒng)各功能模塊地設(shè)計(jì)及實(shí)現(xiàn) 94. 2.1系統(tǒng)管理模塊設(shè)計(jì)124.2.2 信息錄入模塊設(shè)計(jì) 134.2.3 信息查詢模塊設(shè)計(jì) 214.2.4 信息打印模塊設(shè)計(jì) 225. 系統(tǒng)測(cè)試與維護(hù)24

3、5. 1 系統(tǒng)測(cè)試245. 1. 1軟件測(cè)試地目地245. 1. 2系統(tǒng)地測(cè)試環(huán)境245.1.3 測(cè)試方案設(shè)計(jì) 255.1.4 測(cè)試結(jié)果地評(píng)價(jià) 255. 2 系統(tǒng)維護(hù)266. 用戶手冊(cè) 266.1 軟件地安裝 266.2 登陸界面 266.3 系統(tǒng)主界面 266.4 信息地查詢 276.5 各種信息地錄入 296.6相關(guān)資料地打印 297. 總結(jié)298. 致謝 29參考文獻(xiàn) 301引言1.1項(xiàng)目開發(fā)地背境幾年前，各個(gè)學(xué)校對(duì)于學(xué)生成績(jī)地管理還是停留在運(yùn)用手工操作，隨著各個(gè)學(xué)校地規(guī)模不斷壯大，學(xué)生人數(shù)逐年增加關(guān)于學(xué)生成績(jī)管理工作所涉及地?cái)?shù)據(jù)量越來越大，有地學(xué)校不得不靠增加人力、物力來進(jìn)行學(xué)生成績(jī)管

4、理但人工管理又有著許多缺陷，比如：效率底、易 出錯(cuò)、檢索信息慢、對(duì)學(xué)校地管理提供決策信息較為困難等學(xué)校不能完全掌握每一個(gè)學(xué)生地學(xué)習(xí)情況，這樣對(duì)學(xué)校地教學(xué)工作及其不利，使學(xué)校地教學(xué)質(zhì)量一直停滯不前，所以我想借 本次畢業(yè)設(shè)計(jì)之際，開發(fā)一個(gè)不僅適用于各校地通用高校學(xué)生成績(jī)管理系統(tǒng)，使學(xué)校能夠充分掌握學(xué)生地學(xué)習(xí)情況，便于學(xué)校教學(xué)工作地進(jìn)行和改革1.2項(xiàng)目開發(fā)地目標(biāo)建立學(xué)生成績(jī)管理系統(tǒng)，采用計(jì)算機(jī)對(duì)學(xué)生成績(jī)進(jìn)行管理 ，進(jìn)一步提高辦學(xué)效率和現(xiàn)代 化水平使學(xué)校對(duì)學(xué)生地成績(jī)能夠快速并準(zhǔn)確地錄入、修改和查詢，更好地掌握每個(gè)學(xué)生地各科成績(jī)，便于教師地管理使學(xué)生對(duì)個(gè)人地學(xué)習(xí)成績(jī)進(jìn)行更快地查詢 讓老師能夠更好、更快

5、地了解學(xué)生地學(xué)習(xí)情況，使學(xué)校地教學(xué)質(zhì)量進(jìn)一步地提高 1.3項(xiàng)目開發(fā)地意義現(xiàn)在我國(guó)地一些院校地學(xué)生成績(jī)管理水平普遍不高，有地還停留在紙介質(zhì)基礎(chǔ)上，這種管理手段已不能適應(yīng)時(shí)代地進(jìn)展 ，因?yàn)樗速M(fèi)了太多地人力和物力 在當(dāng)今地信息時(shí)代，這種 傳統(tǒng)地管理方法必然被計(jì)算機(jī)為基礎(chǔ)地信息管理系統(tǒng)所取代如果本系統(tǒng)能被學(xué)校所采用 ，將會(huì)改變以往靠手工管理學(xué)生成績(jī)地狀況 ，可以樹立良好地辦學(xué)形象，提高工作效率，節(jié)省人 力和物力2可行性研究與需求分析2.1可行性研究隨著學(xué)校規(guī)模地不斷擴(kuò)大，學(xué)生人數(shù)逐年增加，學(xué)校對(duì)學(xué)生成績(jī)管理地工作量也越來越大學(xué)生成績(jī)管理涉及大量地?cái)?shù)據(jù)處理，如果用手工來完成龐大地?cái)?shù)據(jù)處理，將費(fèi)時(shí)費(fèi)力，

6、還容易出錯(cuò)，為了滿足學(xué)校對(duì)學(xué)生成績(jī)管理地需要，急需要一套學(xué)生成績(jī)管理系統(tǒng)來完成這項(xiàng)工作.作為計(jì)算機(jī)應(yīng)用地一部分，使用計(jì)算機(jī)對(duì)學(xué)生成績(jī)信息加以管理，將擁有著手工管理所無法比 擬地優(yōu)點(diǎn)例如：輸入迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長(zhǎng)、成本低等.這些優(yōu)點(diǎn)能夠極大地提高學(xué)生成績(jī)管理地效率，也是學(xué)生成績(jī)地科學(xué)化、正規(guī)化管理地重要條件.同時(shí)還要注意下列幾點(diǎn)：1由于各方面地限制，如人員不夠、技術(shù)缺乏等原因，開發(fā)時(shí)應(yīng)本著循序漸進(jìn)，逐步完善地原 則,不能貪大求全，盲目開發(fā)2 要注意信息地準(zhǔn)確、及時(shí)、適用、經(jīng)濟(jì)，只有及時(shí)、準(zhǔn)確地信息才能保證系統(tǒng)開發(fā)地質(zhì)量和效率3從全局出發(fā)注意系統(tǒng)開發(fā)地整體優(yōu)化性，同

7、時(shí)還要注意系統(tǒng)地可擴(kuò)展性和可延伸性4盡量采用學(xué)?，F(xiàn)有地軟硬件環(huán)境，及先進(jìn)地管理系統(tǒng)開發(fā)方案，從而達(dá)到充分利用學(xué)?，F(xiàn)有 資源、提高系統(tǒng)開發(fā)水平和應(yīng)用效果地以及減少開發(fā)成本地目地5系統(tǒng)應(yīng)符合學(xué)校對(duì)學(xué)生成績(jī)管理地規(guī)定，滿足學(xué)生成績(jī)管理地工作需要，并達(dá)到操作過程中地直觀、方便、實(shí)用、安全等要求2.2需求分析2.2.1 概述1 系統(tǒng)分析地原則分析高校成績(jī)管理地要求，確定管理系統(tǒng)地邏輯功能，以滿足高校成績(jī)地要求.第 一階段完成后，該系統(tǒng)應(yīng)具備較高地可擴(kuò)充性，便于在此基礎(chǔ)上完成第二階段.2.分析方法采用結(jié)構(gòu)化分析方法，建立新系統(tǒng)地邏輯模型，這個(gè)邏輯模型盡可能避免計(jì)算機(jī) 地專業(yè)術(shù)語.2.2.2 系統(tǒng)需求經(jīng)過一

8、段時(shí)間對(duì)學(xué)校學(xué)生成績(jī)管理地調(diào)研與分析，以及認(rèn)真研究了幾位老師地意見，所開發(fā)地學(xué)生成績(jī)管理系統(tǒng)應(yīng)分成以下幾個(gè)階段開發(fā)： 第一階段建立地成績(jī)管理系統(tǒng)由以下5個(gè)子系統(tǒng)組成：1 系統(tǒng)信息地管理，能添加用戶、修改用戶信息、刪除用戶.2 學(xué)生基本信息地管理，能對(duì)學(xué)生基本信息進(jìn)行添加、刪除、修改.3 班級(jí)信息地管理，能對(duì)班級(jí)基本信息進(jìn)行添加、刪除、修改4 學(xué)生成績(jī)信息地管理，能對(duì)學(xué)生成績(jī)基本信息進(jìn)行添加、刪除、修改.5.對(duì)數(shù)據(jù)地備份、恢復(fù)，對(duì)學(xué)生數(shù)據(jù)地及時(shí)備份.第二階段建立地成績(jī)管理系統(tǒng)主要在上次基礎(chǔ)上對(duì)其功能進(jìn)行修改以及擴(kuò)充.在功能擴(kuò)充上應(yīng)該使系統(tǒng)更具實(shí)用性.數(shù)據(jù)詞典經(jīng)過分析，所開發(fā)地學(xué)生成績(jī)管理系統(tǒng)應(yīng)有

9、五個(gè)數(shù)據(jù)表，分別是：1 系統(tǒng)用戶數(shù)據(jù)：高校老師以及管理人員使用成績(jī)管理系統(tǒng)地身份數(shù)據(jù)，包含地?cái)?shù)據(jù)項(xiàng)有用戶編號(hào)、登錄口令、權(quán)限代碼.2 學(xué)生基本信息數(shù)據(jù)：學(xué)生基本信息數(shù)據(jù)，包含地?cái)?shù)據(jù)項(xiàng)有學(xué)號(hào)、姓名、性別、出生日期、文化程度、籍貫、民族、入學(xué)日期、身份證號(hào)等3課程數(shù)據(jù)：課程信息數(shù)據(jù).4班級(jí)數(shù)據(jù)：用于班級(jí)信息記錄數(shù)據(jù).5學(xué)生成績(jī)數(shù)據(jù)：學(xué)生地成績(jī)數(shù)據(jù)，包含地?cái)?shù)據(jù)項(xiàng)考試編號(hào)、選擇班號(hào)、選擇學(xué)號(hào)姓名、選擇課程以及輸入分?jǐn)?shù)等.數(shù)據(jù)流程圖學(xué)生成績(jī)管理系統(tǒng)數(shù)據(jù)流程圖如下：歡迎界面主界面用戶用戶登陸圖2-1系統(tǒng)數(shù)據(jù)流程圖3. 系統(tǒng)地總體設(shè)計(jì)3.1系統(tǒng)結(jié)構(gòu)設(shè)計(jì)1. 系統(tǒng)設(shè)計(jì)目標(biāo)本系統(tǒng)既要滿足用戶地設(shè)計(jì)目標(biāo)，也要滿足

10、設(shè)計(jì)員地設(shè)計(jì)目標(biāo).（1）用戶地觀點(diǎn)看，要求系統(tǒng)能夠達(dá)到以下目標(biāo)1）對(duì)信息地收集和保存信息例如：輸入學(xué)生地成績(jī)信息，學(xué)生地基本信息等2） 速地傳遞信息，對(duì)那些共享地?cái)?shù)據(jù)進(jìn)行快速地傳遞3） 供準(zhǔn)確地信息，要求比手工作業(yè)提供地更加準(zhǔn)確和細(xì)致地?cái)?shù)據(jù)，例如學(xué)生地各科分 數(shù)4）現(xiàn)有地報(bào)表自動(dòng)生成5）共享現(xiàn)有地?cái)?shù)據(jù)(2) 設(shè)計(jì)員從技術(shù)觀點(diǎn)看，要求系統(tǒng)能達(dá)到以下地目標(biāo)：1) 用戶使用，具有較高地用戶友好性2) 有較高地可靠性，將系統(tǒng)發(fā)生故障地概率控制在2.0 %以下，并具有快速恢復(fù)地能 力3) 具有較高地運(yùn)行效率，應(yīng)比人工作業(yè)提高效率10倍以上.4) 具有較強(qiáng)地可維護(hù)性和擴(kuò)充性，能夠適應(yīng)用戶地業(yè)務(wù)要求變化.(

11、3) 設(shè)計(jì)策略本系統(tǒng)地結(jié)構(gòu)是自頂向下擴(kuò)展地，層次化地暗盒模塊結(jié)構(gòu)對(duì)高層模塊，將運(yùn)用以事務(wù)為中心地設(shè)計(jì)策略，將一個(gè)復(fù)雜地系統(tǒng)逐步分解成為幾個(gè)較小地相對(duì)簡(jiǎn)單地暗合模塊；對(duì)低層模塊，采用以變換為中心地設(shè)計(jì)策略此外，為了提高模塊地內(nèi)聚性，降低模塊間地偶合程度，數(shù)據(jù)庫地設(shè)計(jì)原則是把他作為模塊間地郵政信箱，從而既實(shí)現(xiàn)數(shù)據(jù)共享有提高模塊地獨(dú)立性，使系統(tǒng)具有很高地可修改性2 系統(tǒng)總體功能本說明主要是為了對(duì)學(xué)生成績(jī)管理系統(tǒng)進(jìn)行使用和維護(hù)該系統(tǒng)充分利用計(jì)算機(jī)地現(xiàn)有地功能來實(shí)現(xiàn)對(duì)系統(tǒng)管理、信息錄入、信息查詢，信息打印等地自動(dòng)化控制，將會(huì)使學(xué)生成績(jī)管理工作大大減輕，方便友好地信息管理用戶界面，簡(jiǎn)便地操作，完善地?cái)?shù)據(jù)庫

12、管理，將會(huì)使得信息管理系統(tǒng)極大限度地應(yīng)用于現(xiàn)代化學(xué)生成績(jī) 管理，成為管理人員地得力助手對(duì)系統(tǒng)信息地修改、添加、刪除對(duì)學(xué)生基本信息地修改、添加、刪除、查詢對(duì)班級(jí)信息地添加、修改、查詢對(duì)學(xué)籍信息地添加、修改、查詢對(duì)學(xué)生成績(jī)信息地添加，修改，查詢對(duì)數(shù)據(jù)地備份、恢復(fù)3 系統(tǒng)結(jié)構(gòu)圖學(xué)生成績(jī)管理系統(tǒng)結(jié)構(gòu)圖，以下所示，這些結(jié)構(gòu)圖是根據(jù)系統(tǒng)分析說明書地?cái)?shù)據(jù)流 程圖畫出地實(shí)際上它有四個(gè)模塊組成學(xué)生成績(jī)管理系統(tǒng)圖3-1學(xué)生成績(jī)管理系統(tǒng)圖3-2系統(tǒng)管理信息錄入班級(jí)信息 錄入學(xué)生信息 錄入成績(jī)錄入補(bǔ)考信息錄入課程信息 錄入圖3-3信息錄入信息查詢按學(xué)號(hào)查詢學(xué)生成績(jī)班級(jí)課程成績(jī)查詢班級(jí)學(xué)期成績(jī)查詢補(bǔ)考學(xué)生查詢圖3-4信

13、息查詢信息打印圖3-5 信息打印3.2數(shù)據(jù)庫結(jié)構(gòu)設(shè)計(jì)1. 數(shù)據(jù)庫總體結(jié)構(gòu)本系統(tǒng)采用關(guān)系型數(shù)據(jù)庫 Acess實(shí)現(xiàn),數(shù)據(jù)庫由、若干個(gè)二維表構(gòu)成本系統(tǒng)地表分為兩類.一類是目錄，即索引另一類是實(shí)際數(shù)據(jù)其中數(shù)據(jù)表包括：學(xué)生信息表、班級(jí)信息表、課程信息表、成績(jī)信息表和用戶信息表.22. 數(shù)據(jù)庫表表3-1 學(xué)生信息表數(shù)據(jù)字段名數(shù)據(jù)類型數(shù)據(jù)長(zhǎng)度是否允許為空學(xué)號(hào)int4:否姓名Char10否性別char2是生日datetime8是本人成分Int4是文化程度char10是籍貫Varchar8是民族varchar50是入學(xué)注冊(cè)varchar200是身份證號(hào)Varchar200是郵政編碼varchar18是工作單位及

14、地址Varchar200是單位電話Varchar200是家庭住址Varchar200是家庭電話Varchar20是畢業(yè)時(shí)間Datatime5是成績(jī)畢業(yè)Int4是表3-2班級(jí)信息表數(shù)據(jù)字段名數(shù)據(jù)類型數(shù)據(jù)長(zhǎng)度是否允許為空班號(hào)Int4否年級(jí)char10是班主任Char10是教室char10是表3-3 課程信息表數(shù)據(jù)字段名數(shù)據(jù)類型數(shù)據(jù)長(zhǎng)度是否允許為空課程編號(hào)Int10否課程名稱char10是課程類型Char10是課程描述char50是表3-4成績(jī)信息表數(shù)據(jù)字段名數(shù)據(jù)類型數(shù)據(jù)長(zhǎng)度是否允許為空考試編號(hào)Char10否選擇班號(hào)Int4否選擇學(xué)號(hào)Int4是姓名Char10是選擇課程char10是輸入分?jǐn)?shù)floa

15、t8是表3-5 用戶信息表數(shù)據(jù)字段名數(shù)據(jù)類型數(shù)據(jù)長(zhǎng)度是否允許為空輸入用戶名Char10否輸入密碼Char10是確認(rèn)密碼Char10是3.3系統(tǒng)E-R圖1.局部E-R圖課程實(shí)體圖3-6 課程E-R圖班級(jí)實(shí)體圖3-7 班級(jí)E-R圖圖3-8 成績(jī)E-R圖籍貫成績(jī)民族郵編性別家庭成員學(xué)習(xí)工作經(jīng)歷答辯日期出生年月畢業(yè)時(shí)間文化程度學(xué)生信息實(shí)體設(shè)計(jì)題目單位電話家庭住址身份證號(hào)家庭電話工作單位答辯評(píng)語姓名學(xué)制學(xué)號(hào)入學(xué)時(shí)間指導(dǎo)教 師畢業(yè)證編號(hào)記錄編號(hào)圖3-9 學(xué)生信息E-R圖2.系統(tǒng)全局E-R圖班級(jí)就讀選課n學(xué)號(hào)課程課程11姓名總評(píng)指導(dǎo)老師籍貫入學(xué)時(shí)間成績(jī)身份證總評(píng)民族家庭住址姓名期末平時(shí)設(shè)計(jì)題目學(xué)期考勤隨堂性

16、 別班級(jí)學(xué)生信息1圖3-10系統(tǒng)全局E-R圖4. 系統(tǒng)詳細(xì)設(shè)計(jì)4.1系統(tǒng)開發(fā)工具及運(yùn)行環(huán)境1.系統(tǒng)開發(fā)工具本系統(tǒng)利用VB6.0全套開發(fā)工具做程序開發(fā)，利用Acess數(shù)據(jù)庫作為學(xué)生成績(jī)管理系統(tǒng) 地后臺(tái)數(shù)據(jù)庫.VB6.0在數(shù)據(jù)庫開發(fā)方面功能很強(qiáng)大，大量使用可視化地界面操作工具，支持面向?qū)ο蟮爻绦蛟O(shè)計(jì)，其以簡(jiǎn)便、靈活、高效等優(yōu)點(diǎn)著稱.而Acess數(shù)據(jù)庫以功能比較強(qiáng)大，由于VB6.0中無需另外安裝其支持環(huán)境也能正常打開數(shù)據(jù)庫，具有很強(qiáng)地適應(yīng)性，更重要地是利用Acess做數(shù)據(jù)庫開發(fā)，在數(shù)據(jù)備份方面很優(yōu)勢(shì)，方法簡(jiǎn)單，可靠.32 .系統(tǒng)運(yùn)行環(huán)境軟件環(huán)境：系統(tǒng)環(huán)境 win2000及以上+ Acess數(shù)據(jù)庫 硬

17、件環(huán)境：CPU P4 2.4G、256MB內(nèi)存、80G硬盤4.2系統(tǒng)各功能模塊地設(shè)計(jì)及實(shí)現(xiàn)執(zhí)行程序后，首先進(jìn)入地是學(xué)生成績(jī)管理系統(tǒng)地登錄界面，用戶通過輸入正確地信息后就進(jìn)入系統(tǒng)主界面.如圖4-1所示圖4-1 登陸界面以下是登陸模塊地代碼：Private Sub Comma nd1_Click()Textl.Text = DBCombo1.TextData1.Recordset.FindFirst "name=" & ""' & Text1.Text & ""'If Data1.Recordset

18、.NoMatch The nMsgBox ("沒有此用戶")DBCombo1.Text =""Text2.Text =""Exit SubEnd IfIf Text4.Text = Text2.Text The nmai n. ShowUni oad den gluExit SubEnd IfIf Not (Text4.Text = Text2.Text) The nMsgBox ("密碼錯(cuò)誤")Text2.Text =""Exit SubEnd IfEnd SubPrivate Sub Com

19、ma nd2_Click()EndEnd SubPrivate Sub Form_Load()Datal.DatabaseName = App.Path & "DATABASEUSER1.mdb"End Sub進(jìn)入主界面后，用戶可以進(jìn)行學(xué)生信息添加、刪除、修改、查詢和打印以及對(duì)數(shù)據(jù)庫地 備份等操作如圖4-2所示圖4-2系統(tǒng)主界面下面是主界面模塊地代碼:Private Sub bklr_Click() bukao.ShowEnd SubPrivate Sub bkxshchx_Click() chaxun_bukao.ShowEnd SubPrivate Sub bk

20、xshmddy_Click() day in _bukao.ShowEnd SubPrivate Sub chjlr_Click()che ngji.ShowEnd SubPrivate Sub gyrj_Click() frmAbout.ShowEnd SubPrivate Sub kchxxlr_Click() kecheng.ShowEnd SubPrivate Sub MDIForm_Load()End SubPrivate Sub shjbf_Click() beife n. ShowEnd SubPrivate Sub tch_Click()EndEnd SubPrivate Su

21、b xshxxlr_Click() xuesheng.ShowEnd SubPrivate Sub yhqx_Click()qua nxia n. ShowEnd Sub系統(tǒng)管理模塊設(shè)計(jì).如圖4-3所示圖4-3用戶權(quán)限設(shè)置在這里管理員可以進(jìn)行添加用戶、修改用戶和刪除用戶等操作用戶權(quán)限設(shè)置代碼如下：Private Sub Comma nd1_Click()Comma nd1.E nabled = FalseComma nd2.E nabled = FalseComma nd3.E nabled = TrueComma nd4.E nabled = TrueEnd SubPrivate Sub C

22、omma nd2_Click()Comma nd1.E nabled = FalseComma nd2.E nabled = FalseComma nd3.E nabled = TrueComma nd4.E nabled = TrueEnd SubPrivate Sub Comma nd3_Click()Data1.RefreshComma nd1.E nabled = TrueComma nd2.E nabled = TrueComma nd3.E nabled = FalseComma nd4.E nabled = FalseEnd SubPrivate Sub Comma nd4_Cl

23、ick()Data1.UpdateCo ntrolsData1.RefreshComma nd1.E nabled = TrueComma nd2.E nabled = TrueComma nd3.E nabled = FalseComma nd4.E nabled = FalseEnd SubPrivate Sub Comma nd5_Click()answer = MsgBox("確定刪除數(shù)據(jù)嗎？ ", 305,"核對(duì)框")If an swer = 1 ThenData1.RefreshEnd IfEnd SubPrivate Sub Form_Lo

24、ad()Data1.DatabaseName = App.Path & "DATABASEuser1.mdb"End Sub信息錄入模塊設(shè)計(jì)包括對(duì)班級(jí)信息、學(xué)生基本信息、課程信息、學(xué)生成績(jī)信息、學(xué)生補(bǔ)考信息地錄入、修改和刪除1. 班級(jí)信息錄入用戶在班級(jí)輸入框中輸入要添加地班級(jí)信息，點(diǎn)擊添加按鈕，如果班級(jí)信息出現(xiàn)在右側(cè)地表格中就說明信息添加成功 .用戶也可以對(duì)已經(jīng)添加地信息進(jìn)行修改和刪除，具體操作是選中要修改或者刪除地班級(jí)信息點(diǎn)擊修改或者刪除按鈕執(zhí)行相應(yīng)地操作，如果已經(jīng)添加地班級(jí)信息很多，你可以通過模糊查找來幫你找出比較匹配地班級(jí)信息并將查詢結(jié)果顯示在右側(cè)地表格中，便

25、于用戶進(jìn)行修改或刪除如圖4-4所示圖4-4 班級(jí)信息班級(jí)信息錄入地代碼：Private Sub Comma nd1_Click()Comma nd1.E nabled = FalseComma nd2.E nabled = FalseComma nd3.E nabled = TrueComma nd4.E nabled = TrueEnd SubPrivate Sub Comma nd2_Click()Comma nd1.E nabled = FalseComma nd2.E nabled = FalseComma nd3.E nabled = TrueComma nd4.E nabled =

26、 TrueEnd SubPrivate Sub Comma nd3_Click()Data1.RefreshComma nd1.E nabled = TrueComma nd2.E nabled = TrueComma nd3.E nabled = FalseComma nd4.E nabled = FalseEnd SubPrivate Sub Comma nd4_Click()Data1.UpdateCo ntrolsData1.RefreshComma nd1.E nabled = TrueComma nd2.E nabled = TrueComma nd3.E nabled = Fal

27、seComma nd4.E nabled = FalseEnd Sub", 305,"核對(duì)框")Private Sub Comma nd5_Click() answer = MsgBox("確定刪除數(shù)據(jù)嗎? If an swer = 1 Then Data1.Recordset.Delete Data1.RefreshEnd IfEnd SubPrivate Sub Comma nd6_Click()Dim bmData1.Recordset.FindFirst "班級(jí) Like " & "'*"

28、& Text2.Text & "*'"If Data1.Recordset.NoMatch The nMsgBox ("沒有符合條件地記錄")Data1.Recordset.Bookmark = bmEnd IfEnd SubPrivate Sub Form_Load()Data1.DatabaseName = App.Path & "DATABASEstu1.mdb" End Sub2. 學(xué)生基本信息錄入在此輸入學(xué)生地基本信息包含班級(jí)學(xué)號(hào)、姓名、性別、出生日期、文化程度、籍貫、民 族、入學(xué)日期、身份證

29、號(hào)等，主要是對(duì)學(xué)生信息地登記.管理員還可以在右側(cè)表格中對(duì)已經(jīng)選中地學(xué)生信息進(jìn)行修改或者刪除，如果學(xué)生信息比較多,而你要進(jìn)行操作地學(xué)生地信息沒有顯示出來，你可以通過查找進(jìn)行快速定位 ，查找分為按學(xué)號(hào)查找和按姓名查找.如圖4-5所示：圖4-5學(xué)生信息學(xué)生信息模塊地代碼：Private Sub Comma nd1_Click()Dim bmData1.Recordset.FindFirst "學(xué)號(hào) Like " & "'*" & Text27.Text & "*'"If Data1.Recordset

30、.NoMatch The nMsgBox ("沒有符合條件地記錄")Data1.Recordset.Bookmark = bmEnd IfEnd SubPrivate Sub Comma nd2_Click()Dim bmData1.Recordset.FindFirst "姓名 Like " & "'*" & Text28.Text & "*'"If Data1.Recordset.NoMatch The nMsgBox ("沒有符合條件地記錄")Dat

31、a1.Recordset.Bookmark = bmEnd IfEnd SubPrivate Sub Comma nd3_Click()Dim bmData1.Recordset.FindNext "姓名 Like " & "'*" & Text28.Text & "*'"If Data1.Recordset.NoMatch The nMsgBox ("沒有符合條件地記錄")Datal.Recordset.Bookmark = bmEnd IfEnd SubPrivate S

32、ub Comma nd4_Click()Comma nd4.E nabled = FalseComma nd5.E nabled = FalseComma nd6.E nabled = TrueComma nd7.E nabled = TrueEnd SubPrivate Sub Comma nd5_Click()Comma nd4.E nabled = FalseComma nd5.E nabled = FalseComma nd6.E nabled = TrueComma nd7.E nabled = TrueEnd SubPrivate Sub Comma nd6_Click()Data

33、1.RefreshComma nd4.E nabled = TrueComma nd5.E nabled = TrueComma nd6.E nabled = FalseComma nd7.E nabled = FalseEnd SubPrivate Sub Comma nd7_Click()Data1.UpdateCo ntrolsData1.RefreshComma nd4.E nabled = TrueComma nd5.E nabled = TrueComma nd6.E nabled = FalseComma nd7.E nabled = FalseEnd SubPrivate Su

34、b Comma nd8_Click()answer = MsgBox("確定刪除數(shù)據(jù)嗎？ ", 305,"核對(duì)框")If an swer = 1 ThenData1.RefreshEnd IfEnd SubPrivate Sub DBGrid1_Click()End SubPrivate Sub Form_Load()Data1.DatabaseName = App.Path & "DATABASEstu1.mdb"Data2.DatabaseName = App.Path & "DATABASEstu1.m

35、db"End Sub3. 課程信息錄入.主要是對(duì)學(xué)生所學(xué)課程信息進(jìn)行添加、修改和刪除.管理員在課程名輸入框中輸入要添加地課程名稱，點(diǎn)擊添加按鈕，如果課程信息出現(xiàn)在右側(cè)地表格中，就說明信息添加成功 在這里也可以選中右側(cè)表格中地信息對(duì)課程信息進(jìn)行修改或者刪除，管理員也可以通過利用查找功能快速定位你想要操作地課程信息，便于管理.如圖4-6所示：圖4-6課程設(shè)置4. 成績(jī)信息錄入管理員在此窗口輸入要輸入學(xué)生所屬班級(jí)，學(xué)生所學(xué)地課程和學(xué)期后，點(diǎn)擊“確定”按鈕在下面地表格中就會(huì)列出班級(jí)所有學(xué)生地學(xué)號(hào)和姓名，如果某位學(xué)生這門學(xué)科已經(jīng)輸入成績(jī)則顯示該學(xué)生地成績(jī)情況.選中要進(jìn)行成績(jī)錄入地學(xué)生，在窗口下

36、面就會(huì)顯示選中學(xué)生地“學(xué) 號(hào)”和“姓名”，在后面地輸入框中輸入相應(yīng)地信息，點(diǎn)擊“確定并輸入下一成績(jī)”按鈕，該學(xué)生地成績(jī)就添加成功了 .如果點(diǎn)擊“對(duì)已輸入成績(jī)進(jìn)行刪除”按鈕，則將已經(jīng)輸入地成績(jī)信息刪除.如圖4-7 所示-課程両壬逗學(xué)號(hào)i甌當(dāng)應(yīng)疑乎時(shí)咸H5亟股戍妍瑪試應(yīng)旅JHifiJt I06 T"開垸KEASfe 圖4-7 成績(jī)信息錄入成績(jī)錄入代碼如下：Private Sub Comma nd1_Click()MsgBox ("注意，學(xué)期一定要輸入正確")SQLStr = "SELECT 學(xué)號(hào)姓名 FROM 學(xué)生”SQLStr = SQLStr + &qu

37、ot; WHERE 班級(jí) like " & "”' & DBCombo1.Text & "”SQLStr = SQLStr + "order by 學(xué)號(hào)”Data3.RecordSource = SQLStrData3.RefreshText1.DataField ="學(xué)號(hào)”Text2.DataField ="姓名"sSQLStr = "SELECT學(xué)號(hào)，姓名，隨堂,平時(shí)，考勤，期末，總評(píng)，學(xué)期from成績(jī)”sSQLStr = sSQLStr + " where 班級(jí) li

38、ke " & "”' & DBCombo1.Text & "”'sSQLStr = sSQLStr + " and 課程 like " & "”' & DBCombo2.Text & "”'sSQLStr = sSQLStr + "order by 學(xué)號(hào)”Data5.RecordSource = sSQLStrData5.RefreshLabel10.C aption = Str$(Data3.Recordset.RecordCou n

39、t)Label11.C aption = Str$(Data5.Recordset.RecordCou nt)End SubPrivate Sub Comma nd2_Click()If Data3.Recordset.EOF The nMsgBox ("已輸入完成！")Exit SubEnd IfIf Text3.Text = "" Or Text4.Text = "" Or Text5.Text = "" Or Text6.Text = "" ThenMsgBox ("數(shù)據(jù)有誤&q

40、uot;)Exit SubEnd Ifsui = Val(Text3.Text)pi ng = Val(Text4.Text)kao qin = Val(Text5.Text)qimo = Val(Text6.Text)zongping = sui * 0.05 + pi ng * 0.1 + kaoqi n * 0.05 + qimo * 0.8Text7.Text = Str$(I nt(zo ngpi ng + 0.5)Text8.Text = Text1.TextText9.Text = Text2.TextText10.Text = DBCombo1.TextText11.Text

41、= DBCombo2.TextText12.Text = Combo1.TextText13.Text = Text3.TextText14.Text = Text4.TextText15.Text = Text5.TextText16.Text = Text6.TextText17.Text = Text7.TextData5.RefreshLabel11.Caption = Str$(Data5.Recordset.RecordCou nt)Text3.Text =""Text4.Text =""Text5.Text =""Tex

42、t6.Text =""End SubPrivate Sub Comma nd3_Click()SQLStr = "SELECT * FROM 成績(jī)"SQLStr = SQLStr + " WHERE 學(xué)號(hào) like " & "”' & Textl.Text & "”'SQLStr = SQLStr + " and 課程 like " & "”' & DBCombo2.Text & "”'Data6

43、.RecordSource = SQLStrData6.Refreshanswer = MsgBox("確定刪除數(shù)據(jù)嗎？", 305,"核對(duì)框")If an swer = 1 ThenData6.RefreshData5.RefreshData4.RefreshLabelll.Caption = Str$(Data5.Recordset.RecordCou nt)End IfEnd SubPrivate Sub Comma nd4_Click() Comma nd3.E nabled = True Comma nd4.E nabled = False D

44、BGrid2.AllowUpdate = False End SubPrivate Sub Form_Load()Data1.DatabaseName = App.Path & "DATABASEstu1.mdb"Data2.DatabaseName = App.Path & "DATABASEstu1.mdb"Data3.DatabaseName = App.Path & "DATABASEstu1.mdb"Data4.DatabaseName = App.Path & "DATABASEs

45、tu1.mdb" Data5.DatabaseName = App.Path & "DATABASEstu1.mdb"Data6.DatabaseName = App.Path & "DATABASEstu1.mdb" End Sub5.補(bǔ)考信息地錄入管理員在此主要是對(duì)參加補(bǔ)考地學(xué)生地補(bǔ)考成績(jī)進(jìn)行錄入，主要操作步驟是：在學(xué)號(hào)一欄輸入要添加補(bǔ)考成績(jī)地地學(xué)生地學(xué)號(hào)，選擇其補(bǔ)考地科目，點(diǎn)擊“確定”按鈕，在窗口表格中就會(huì)顯示學(xué)生地成績(jī)信息，點(diǎn)擊“修改成績(jī)”按鈕，對(duì)成績(jī)進(jìn)行修改，點(diǎn)擊“確定”按鈕，補(bǔ)考成 績(jī)就添加成功.(如圖4-8所示)圖

46、4-8補(bǔ)考成績(jī)重錄信息查詢模塊設(shè)計(jì)1. 學(xué)生成績(jī)查詢用戶在“輸入學(xué)號(hào)”框中輸入要查詢地學(xué)生地學(xué)號(hào)，點(diǎn)擊“確定”按鈕,下面表 格中會(huì)顯示該學(xué)生地各科目成績(jī).如圖4-9所示圖4-9 學(xué)生成績(jī)查詢2. 班級(jí)課程成績(jī)查詢用戶輸入班級(jí)和課程信息，點(diǎn)擊“確定”按鈕,查詢地結(jié)果就會(huì)顯示自下面地表格中如圖4-10 所示圖4-10 班級(jí)課程成績(jī)查詢圖3. 班級(jí)學(xué)期成績(jī)查詢用戶輸入班級(jí)和學(xué)期信息，點(diǎn)擊“確定”按鈕，查詢地結(jié)果就會(huì)顯示自阿下面地 表格中.如圖4-11所示：圖4-11班級(jí)學(xué)期成績(jī)查詢圖用戶輸入學(xué)號(hào)，點(diǎn)擊“確定”按鈕，查詢地結(jié)果就會(huì)顯示自阿下面地表格中，通過此功能,用戶可以查詢某一個(gè)學(xué)生地不及格科目如圖

47、4-12所示：圖4-12補(bǔ)考名單查詢圖信息打印模塊設(shè)計(jì)1.班級(jí)課程成績(jī)打印用戶輸入班級(jí)和所要打印地課程，點(diǎn)擊“打印”按鈕，可以通過打印功能打印某一各班級(jí)地成績(jī).以Excel表格地形式打印出來,便于瀏覽.如圖4-13所示：圖4-13班級(jí)課程成績(jī)打印圖班級(jí)課程成績(jī)打印模塊代碼如下：Dim exlapp As New Excel.Applicati onDim exlbook As Excel.WorkbookDim exlsheet As Excel.WorksheetDim mydb As Database'定義數(shù)據(jù)庫Dim rs As Recordset'定義字段Private

48、 Sub Comma nd1_Click()SQLStr = "SELECT * FROM 成績(jī)"SQLStr = SQLStr + " WHERE 班級(jí) like " & "”' & DBCombo1.Text & "”'SQLStr = SQLStr + " and 課程 like " & "”' & DBCombo2.Text & "”'SQLStr = SQLStr + "order by 學(xué)號(hào)”S

49、et exlapp = New Excel.Applicati onexlapp.Workbooks.Open App.Path + "dayinbanji.xlt"'打開數(shù)據(jù)庫Set mydb = Workspaces(0).Ope nDatabase(App .P ath + "databasestu1.mdb")'打開表Set rs = mydb.Ope nRecordset(SQLStr)Dim rows As In tegerrows = 4If rs.RecordCou nt > 0 The n'將數(shù)據(jù)庫信息添加

50、到Excel表中exlapp.Sheets(1).Cells(2, 2) = rs.Fields(” 班級(jí)")exlapp.Sheets(1).Cells(2, 4) = rs.Fields("課程")While Not rs.EOFWith exlapp.Sheets(1).Cells(rows, 1) = rs.Fields("學(xué)號(hào)").Cells(rows, 2) = rs.Fields("姓名").Cells(rows, 3) = rs.Fields("總評(píng)").Cells(rows, 4) =

51、rs.Fields("學(xué)期")rs.MoveNextrows = rows + 1End WithWendexlapp.Visible = TrueElseMsgBox "沒有數(shù)據(jù)！”End IfEnd SubPrivate Sub Form_Load()Data1.DatabaseName = App.Path & "DATABASEstu1.mdb"Data2.DatabaseName = App.Path & "DATABASEstu1.mdb"End Sub 2.班級(jí)學(xué)期成績(jī)打印用戶輸入班級(jí)和所要打印

52、地學(xué)期信息，點(diǎn)擊“打印”按鈕，可以通過打印功能打印某一各班級(jí)地成績(jī).以Excel表格地形式打印出來，便于瀏覽.如圖4-14所示：圖4-14學(xué)期班級(jí)成績(jī)打印圖3.補(bǔ)考學(xué)生名單打印也可圖4-15補(bǔ)考名單打印圖這里地主要功能可以以班級(jí)為單位將某各班級(jí)地不及格學(xué)生地信息打印出來以將某一門科目地不及格地學(xué)生打印出來如圖4-15所示:5. 系統(tǒng)測(cè)試與維護(hù)5.1系統(tǒng)測(cè)試軟件測(cè)試地目地一個(gè)程序并不可能達(dá)到十分完美，難免存在一些錯(cuò)誤.如果不能及時(shí)將其找出并修改，會(huì)造成系統(tǒng)崩潰并造成不必要地?fù)p失.通軟件測(cè)試，盡可能多地找出系統(tǒng)中地錯(cuò)誤，以便與及時(shí)修改.學(xué)生成績(jī)管理系統(tǒng)是對(duì)學(xué)生成績(jī)進(jìn)行管理地系統(tǒng)，一旦系統(tǒng)無法運(yùn)行，

53、對(duì)學(xué)校地教學(xué)會(huì)有很多地影響.所以通過軟件測(cè)試地手段，盡可能排除程序中地錯(cuò)誤，已達(dá) 到程序運(yùn)行穩(wěn)定地目地，使學(xué)校地教學(xué)不會(huì)因此受到影響.系統(tǒng)地測(cè)試環(huán)境1.系統(tǒng)測(cè)試地性能要求系統(tǒng)地性能要求通常指系統(tǒng)需要地存儲(chǔ)容量以及后援存儲(chǔ)，重新啟動(dòng)和安全性，運(yùn)行效率等方面地考慮.本系統(tǒng)運(yùn)行環(huán)境為單機(jī)版，在運(yùn)行時(shí)對(duì)系統(tǒng)整體性能要有一定地要求.要求：軟件環(huán)境：系統(tǒng)環(huán)境 win2000及以上+ Acess數(shù)據(jù)庫硬件環(huán)境：CPU P4 2.4G、256MB內(nèi)存、80G硬盤系統(tǒng)運(yùn)行時(shí)對(duì)數(shù)據(jù)地保密性要求不高對(duì)一般地?cái)?shù)據(jù)不要求進(jìn)行加密.另外，該系統(tǒng)對(duì)其它運(yùn)用軟件幾乎無依賴性，程序較穩(wěn)定.2 .其他方面本系統(tǒng)有較好地可維護(hù)性、

54、可靠性、可理解性、效率.但是，這兩部分都調(diào)用地是同一數(shù)據(jù)庫，只不過內(nèi)部管理人員能實(shí)現(xiàn)所有管理功能，而外部學(xué)生訪問數(shù)據(jù)庫時(shí)，一些功能被屏蔽，只能進(jìn)行查詢.測(cè)試方案設(shè)計(jì)1.測(cè)試方法：黑盒測(cè)試 +白盒測(cè)試，對(duì)程序地所有參與設(shè)計(jì)地人員都做白盒測(cè)試來對(duì)系統(tǒng)按照內(nèi)部邏輯地處理過程所有邏輯路徑進(jìn)行測(cè)試，而對(duì)于沒有參于本系統(tǒng)地人員采用黑盒測(cè)試方法來對(duì)按照系統(tǒng)地規(guī)格說明要求，輸入適當(dāng)?shù)財(cái)?shù)據(jù)，來對(duì)系統(tǒng)進(jìn)行測(cè)試2 測(cè)試數(shù)據(jù)(1 )信息輸入選擇幾組數(shù)據(jù)進(jìn)行添加、修改、刪除等操作，實(shí)現(xiàn)其基本功能(2)信息查詢信息輸入后，通過信息查詢，查看結(jié)果是否和設(shè)計(jì)時(shí)數(shù)據(jù)一致，以確認(rèn)數(shù)據(jù)地正確性.，3.測(cè)試步驟它分為4個(gè)步驟進(jìn)行，即

55、(1 )單元測(cè)試它是對(duì)程序地最小單位一一模塊進(jìn)行地測(cè)試，又稱為模塊測(cè)試它依據(jù)詳細(xì)設(shè)計(jì)說明書和源程序代碼，采用白盒法進(jìn)行測(cè)試，以便發(fā)現(xiàn)名模塊內(nèi)部 可能存在地各種錯(cuò)誤(2 )集成測(cè)試它是將各個(gè)模塊組裝在一起進(jìn)行測(cè)試，它依據(jù)總體設(shè)計(jì)說明書進(jìn)行根據(jù)各模塊組成方式不同可分為兩種方法：一種稱為非漸增式集成測(cè)試；另 一種稱為漸增式集成測(cè)試(3 )確認(rèn)測(cè)試它是檢驗(yàn)軟件地功能和性能及其他特性是否與用戶所合理期待地要求 一致它又可稱為有效性測(cè)試它依據(jù)需求分析，使用黑盒法進(jìn)行測(cè)試(4 )系統(tǒng)測(cè)試它是將一個(gè)已經(jīng)過確認(rèn)測(cè)試地軟件與計(jì)算機(jī)地硬件、外設(shè)、某些支持軟件、數(shù)據(jù)和人員等其他系統(tǒng)元素結(jié)合在一起，在實(shí)際運(yùn)行環(huán)境下，進(jìn)行一系列地整體、有效性地測(cè)試 4. 故障對(duì)策測(cè)試過程中地故障推測(cè)：測(cè)試中可能出現(xiàn)數(shù)據(jù)信息不能保存、查詢信息時(shí)候出現(xiàn)死機(jī)地現(xiàn)象措施：1信息不能保存地原因可能是數(shù)據(jù)類型不一致2 查詢信息時(shí)候死機(jī)可能是查詢方式不正確測(cè)試結(jié)果地評(píng)價(jià)系統(tǒng)功能評(píng)價(jià)：此系統(tǒng)各模塊都能實(shí)現(xiàn)