學(xué)生成績管理系統(tǒng)畢業(yè)設(shè)計(論文)

1、<p><b>　　第一章 前言</b></p><p>　　科技在進(jìn)步，學(xué)生成績管理系統(tǒng)已成為學(xué)校等教育部門不可缺少的部分,它的應(yīng)用內(nèi)容對于學(xué)校領(lǐng)導(dǎo)和用戶來說非常重要,因為學(xué)生成績管理系統(tǒng)能夠為用戶提供充足的信息和快捷的查詢手段。由于一直以來人們使用傳統(tǒng)的人工方式管理文件成績，這種管理方式存在著許多缺點(diǎn),如:效率低、保密性差,另外時間一長,將產(chǎn)生大量的文件和數(shù)據(jù),這對于查找、更

2、新和維護(hù)都帶來了不少的困難。 使用計算機(jī)來管理學(xué)生成績,不但可以節(jié)省時間和人力資源,更能全面、高效地掌握學(xué)生基本情況等信息，并及時獲取最新的準(zhǔn)確資料和信息，使效率大大提高。該設(shè)計是一個管理學(xué)生成績的系統(tǒng)，功能與實現(xiàn)方面有相當(dāng)?shù)尼槍π院蛯嵱眯浴１疚脑敿?xì)地介紹了“學(xué)生成績管理系統(tǒng)”的設(shè)計思想，設(shè)計過程，本軟件是在VISUAL Foxpro平臺上開發(fā)的,采用Access2000做為數(shù)據(jù)庫，嚴(yán)格按照關(guān)系數(shù)據(jù)庫原理、思想的有關(guān)規(guī)定進(jìn)行數(shù)據(jù)

3、庫的設(shè)計，數(shù)據(jù)操作語言采用SQL中的有關(guān)命令，能方便地實現(xiàn)對數(shù)據(jù)庫的操作與管理。本文從問題定義、可行性研究、需求分析、概要設(shè)計、詳細(xì)設(shè)計、編碼，軟件的測試等方面對該軟件進(jìn)行了詳細(xì)的說明,它是軟件的一個非常重要的文檔資料，是畢業(yè)設(shè)計的文字說明</p><p>　　本學(xué)生成績管理系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護(hù)以及前端應(yīng)用程序的開發(fā)兩個方面。對于前者要求建立起數(shù)據(jù)一致性和完整性

4、強(qiáng)、數(shù)據(jù)安全性好的庫。而對于后者則要求應(yīng)用程序功能完備,易使用等特點(diǎn)。</p><p><b>　　第二章 系統(tǒng)分析</b></p><p><b>　　2.1 需求分析</b></p><p>　　在21世紀(jì)的信息科技時代，科學(xué)技術(shù)突飛猛進(jìn)，計算機(jī)已經(jīng)應(yīng)用到廣泛的領(lǐng)域，而且越來越貼近于我們的現(xiàn)實生活。如今，不管是小學(xué)，初

5、中，高中，甚至是很多大學(xué)生的學(xué)生成績管理基本上是靠人工進(jìn)行管理，但隨著時間的變化，學(xué)校規(guī)模的擴(kuò)大，有關(guān)學(xué)生成績管理工作和所涉及到的數(shù)據(jù)量也會越來越多，大多數(shù)學(xué)校不得不靠增加人力，物力，財力來進(jìn)行學(xué)生成績管理。但人工管理成績檔案具有效率低，查找麻煩，可靠性不高，保密性低等因素。因此開發(fā)出一個不僅僅是適用于大中專院校以及其它高校通用的學(xué)生成績管理系統(tǒng)是必要的。</p><p>　　根據(jù)多數(shù)學(xué)校的基本情況，該系統(tǒng)主要是

6、實現(xiàn)數(shù)據(jù)的更新，查詢，統(tǒng)計，并且可以生成相應(yīng)的報表文件。</p><p>　　數(shù)據(jù)更新包括以下幾個方面： </p><p>　?。?）學(xué)生記錄的增加，刪除，修改，可以方便的實現(xiàn)記錄的改動。 </p><p>　?。?）課程資料的添加，刪除，修改。</p><p>　　（3）學(xué)生成績輸入，學(xué)期結(jié)束，要對成績表中的學(xué)生成績進(jìn)行登記。 </p

7、><p>　　數(shù)據(jù)查詢和統(tǒng)計包括以下幾個方面： </p><p>　?。?）學(xué)生成績查詢，包括快捷查詢和組合查詢，前者可以直接輸入學(xué)號或姓名對全部的課程進(jìn)行成績查詢，而后者可以查詢某一課程所有學(xué)生的成績情況，總之可以根據(jù)不同需要查詢到不同的學(xué)生成績名單，適用性更廣。 </p><p>　　（2）學(xué)生成績統(tǒng)計，統(tǒng)計每個學(xué)生的總成績。 </p><p&g

8、t;　?。?）學(xué)生成績排名，可以查看學(xué)生的名次號。 </p><p><b>　　2.2 可行性分析</b></p><p>　　隨著開發(fā)工具的發(fā)展，面向?qū)ο蟮摹⒖梢暬拈_發(fā)工具不斷的涌現(xiàn)，如VC++,VB,JSP,ASP,PHP等，這些工具在第三代語言的基礎(chǔ)上，能幫助軟件開發(fā)者提高軟件的開發(fā)的質(zhì)量和效率，縮短開發(fā)周期。本系統(tǒng)采用VB開發(fā)環(huán)境以及Windows XP的

9、操作系統(tǒng)為工作平臺，同時借助Microsoft Access2000這一強(qiáng)大的數(shù)據(jù)庫管理系統(tǒng)來實現(xiàn)所以開發(fā)此系統(tǒng)從技術(shù)上完全可行</p><p><b>　　第三章 系統(tǒng)設(shè)計</b></p><p><b>　　3.1 設(shè)計目標(biāo)</b></p><p>　　實現(xiàn)學(xué)生資料和課程安排的添加、修改和刪除； 學(xué)生成績的添加、查詢、

10、修改和刪除；使學(xué)校成績管理人員更加便捷的對學(xué)生成績進(jìn)行管理。</p><p><b>　　3.2 功能設(shè)計</b></p><p>　　本系統(tǒng)提供用戶為管理人員、三大模塊（資料、成績、排名）。</p><p><b>　　用戶進(jìn)入系統(tǒng)：</b></p><p>　　查詢、添加、修改和刪除學(xué)生資料&l

11、t;/p><p>　　進(jìn)入成績修改模塊，查詢和修改學(xué)生成績</p><p>　　進(jìn)入排名模塊，查詢學(xué)生成績和排名情況 </p><p><b>　　3.3 模塊流程圖</b></p><p>　　本管理系統(tǒng)使用網(wǎng)絡(luò)文件模塊化設(shè)計方式來實現(xiàn)相應(yīng)的管理功能，以下是本系統(tǒng)的主模塊功能圖。 </p><p>

12、;　　圖3-1 系統(tǒng)模塊示意圖</p><p><b>　　3.4 數(shù)據(jù)庫設(shè)計</b></p><p>　　3.4.1 數(shù)據(jù)庫結(jié)構(gòu)</p><p>　　本系統(tǒng)使用一個數(shù)據(jù)庫StuScore.mdb，其中包括的表結(jié)構(gòu)如下：</p><p>　　表3-1課程資料表（tbllession）</p><p&g

13、t;　　表3-2 學(xué)生成績表（tblscore）</p><p>　　表3-4學(xué)生資料表（tblstudent）</p><p><b>　　第四章 詳細(xì)設(shè)計</b></p><p><b>　　一、詳細(xì)設(shè)計的任務(wù)</b></p><p>　　詳細(xì)設(shè)計的目的是為軟件結(jié)構(gòu)圖（SC圖或HC圖）中的每一

14、個模塊確定使用的算法和塊內(nèi)數(shù)據(jù)結(jié)構(gòu)，并用某種選定的表達(dá)工具給出清晰的描述。</p><p>　　這一階段的主要任務(wù)：</p><p>　　1．為每個模塊確定采用的算法，選擇某種適當(dāng)?shù)墓ぞ弑磉_(dá)算法的過程，寫出模塊的詳細(xì)過程性描述；</p><p>　　2．確定每一模塊使用的數(shù)據(jù)結(jié)構(gòu)；</p><p>　　3．確定模塊接口的細(xì)節(jié)，包括對系統(tǒng)外部的

15、接口和用戶界面，對系統(tǒng)內(nèi)部其它模塊的接口，以及模塊輸入數(shù)據(jù)、輸出數(shù)據(jù)及局部數(shù)據(jù)的全部細(xì)節(jié)。</p><p>　　在詳細(xì)設(shè)計結(jié)束時，應(yīng)該把上述結(jié)果寫入詳細(xì)設(shè)計說明書，并且通過復(fù)審形成正式文檔。交付給下一階段（編碼階段）的工作依據(jù)。</p><p>　　4．要為每一個模塊設(shè)計出一組測試用例，以便在編碼階段對模塊代碼（即程序）進(jìn)行預(yù)定的測試，模塊的測試用例是軟件測試計劃的重要組成部分，通常應(yīng)包括

16、輸入數(shù)據(jù)，期望輸出等內(nèi)容。</p><p><b>　　二、詳細(xì)設(shè)計的原則</b></p><p>　　1．由于詳細(xì)設(shè)計的藍(lán)圖是給人看的，所以模塊的邏輯描述要清晰易讀、正確可靠。</p><p>　　2．采用結(jié)構(gòu)化設(shè)計方法，改善控制結(jié)構(gòu)，降低程序的復(fù)雜程度，從而提高程序的可讀性、可測試性、可維護(hù)性。其基本內(nèi)容歸納為如下幾點(diǎn)。 </p&g

17、t;<p>　　(1) 程序語言中應(yīng)盡量少用GOTO語句，以確保程序結(jié)構(gòu)的獨(dú)立性。</p><p>　　(2) 使用單人口單出口的控制結(jié)構(gòu)，確保程序的靜態(tài)結(jié)構(gòu)與動態(tài)執(zhí)行情況相一致。保證程序易理解。</p><p>　　(3) 程序的控制結(jié)構(gòu)一般采用順序、選擇、循環(huán)三種結(jié)構(gòu)來構(gòu)成，確保結(jié)構(gòu)簡單。</p><p>　　(4) 用自頂向下逐步求精方法完成程序

18、設(shè)計。結(jié)構(gòu)化程序設(shè)計的缺點(diǎn)是存儲容量和運(yùn)行時間增加10％-20％，但易讀易維護(hù)性好。</p><p>　　(5) 經(jīng)典的控制結(jié)構(gòu)為順序，IF THEN ELSE分支，DO-WHILE循環(huán)。擴(kuò)展的還有多分支CASE，DO-UNTIL循環(huán)結(jié)構(gòu)，固定次數(shù)循環(huán)DOWHILE。</p><p>　　3．選擇恰當(dāng)描述工具來描述各模塊算法。</p><p><b>　　

19、三、詳細(xì)設(shè)計的方法</b></p><p><b>　　詳細(xì)設(shè)計的工具：</b></p><p><b>　　圖形工具</b></p><p>　　利用圖形工具可以把過程的細(xì)節(jié)用圖形描述出來。</p><p><b>　　表格工具</b></p>&l

20、t;p>　　可以用一張表來描述過程的細(xì)節(jié)，在這張表中列出了各種可能的操作和相應(yīng)的條件。</p><p><b>　　語言工具</b></p><p>　　用某種高級語言（稱之為偽碼）來描述過程的細(xì)節(jié)。</p><p><b>　　四、程序流程圖</b></p><p>　　程序流程圖又稱之為程

21、序框圖，它是軟件開發(fā)者最熟悉的一種算法表達(dá)工具。它獨(dú)立于任何一種程序設(shè)計語言，比較直觀和清晰地描述過程的控制流程，易于學(xué)習(xí)掌握。因此，至今仍是軟件開發(fā)者最普遍采用的一種工具。</p><p>　　流程圖也存在一些嚴(yán)重的不足。</p><p>　　流程圖中只能使用下述的五種基本控制結(jié)構(gòu)。</p><p><b>　　1、順序型</b></p

22、><p>　　順序型由幾個連續(xù)的處理步驟依次排列構(gòu)成。</p><p>　　順序型 選擇型 while型循環(huán)</p><p><b>　　2、選擇型 </b></p><p>　　選擇型是指由某個邏輯判斷式的取值決定選擇兩個處理中的一個。</p

23、><p>　　3、while型循環(huán)</p><p>　　while型循環(huán)是先判定型循環(huán)，在循環(huán)控制條件成立時，重復(fù)執(zhí)行特定的處理。</p><p>　　4、until型循環(huán)</p><p>　　until型循環(huán)是后判定型循環(huán)，重復(fù)執(zhí)行某些特定的處理，直到控制條件成立為止。</p><p><b>　　5、多情況型

24、選擇</b></p><p>　　多情況型選擇列舉多種處理情況，根據(jù)控制變量的取值，選擇執(zhí)行其一。</p><p>　　until型循環(huán) 多情況型選擇 </p><p><b>　　五、N-S圖</b></p><p>　　盒圖是一種符合結(jié)構(gòu)化程序設(shè)計原則的圖形描述

25、工具，又稱之為N-S圖。在N-S圖中，為了表示五種基本控制結(jié)構(gòu)，規(guī)定了五種圖形構(gòu)件。</p><p><b>　　1、順序型</b></p><p>　　在順序型中，先執(zhí)行A，后執(zhí)行B。</p><p><b>　　順序型結(jié)構(gòu)</b></p><p><b>　　2、選擇型</b&g

26、t;</p><p>　　在選擇型結(jié)構(gòu)中，如果條件P成立，則可執(zhí)行T下面的A的內(nèi)容，當(dāng)條件P不成立時，則執(zhí)行F下的內(nèi)容。</p><p><b>　　選擇型結(jié)構(gòu)</b></p><p>　　3、WHILE重復(fù)型</p><p>　　在WHILE重復(fù)型循環(huán)結(jié)構(gòu)中，先判斷P的值，再執(zhí)行S。其中P是循環(huán)條件，S是循環(huán)體。<

27、;/p><p>　　WHILE重復(fù)型循環(huán)結(jié)構(gòu) </p><p>　　4、UNTIL重復(fù)型</p><p>　　在UNTIL重復(fù)型循環(huán)結(jié)構(gòu)中，先執(zhí)行S，后判斷P的值。</p><p>　　UNTIL重復(fù)型循環(huán)結(jié)構(gòu)</p><p><b>　　5、多分支選擇型</b>&l

28、t;/p><p><b>　　六、PAD圖</b></p><p>　　PAD是用結(jié)構(gòu)化程序設(shè)計思想表現(xiàn)程序邏輯結(jié)構(gòu)的圖形工具。</p><p>　　PAD也設(shè)置了五種基本控制結(jié)構(gòu)的圖示，并允許遞歸使用。</p><p><b>　　1、順序型</b></p><p>　　按順序

29、先執(zhí)行A，再執(zhí)行B。</p><p><b>　　順序型結(jié)構(gòu)</b></p><p><b>　　2、選擇型</b></p><p>　　下圖給出了判斷條件為P的選擇型結(jié)構(gòu)。當(dāng)P為真值時執(zhí)行上面的A框，P取假值時執(zhí)行下面的B 框中的內(nèi)容。如果這種選擇型結(jié)構(gòu)只有A 框，沒有B框，表示該選擇結(jié)構(gòu)中只有THEN后面有可執(zhí)行語句A

30、，沒有ELSE部分。</p><p><b>　　P</b></p><p><b>　　選擇型結(jié)構(gòu)</b></p><p>　　3、WHILE重復(fù)型和UNTIL重復(fù)型</p><p>　　P是循環(huán)判斷條件，S是循環(huán)體。循環(huán)判斷條件框的右端為雙縱線，表示該矩形域是循環(huán)條件，以區(qū)別于一般的矩形功能域。

31、</p><p>　　WHILE重復(fù)型和UNTIL重復(fù)型結(jié)構(gòu)</p><p><b>　　4、多分支選擇型</b></p><p>　　多分支選擇型是CASE型結(jié)構(gòu)。當(dāng)判定條件P等于1時執(zhí)行A1框的內(nèi)容，P等于2時執(zhí)行A2框的內(nèi)容，P等于N時執(zhí)行An框的內(nèi)容。</p><p>　　七、PDL（過程設(shè)計語言）</p&

32、gt;<p>　　PDL是所有非正文形式的過程設(shè)計工具的統(tǒng)稱，到目前為止已出現(xiàn)多種PDL語言。PDL具有“非純粹”的編程語言的特點(diǎn)。</p><p>　　1、PDL語言的特點(diǎn)</p><p>　　關(guān)鍵字采用固定語法并支持結(jié)構(gòu)化構(gòu)件、數(shù)據(jù)說明機(jī)制和模塊化；</p><p>　　處理部分采用自然語言描述；</p><p>　　可以說

33、明簡單和復(fù)雜的數(shù)據(jù)結(jié)構(gòu)；</p><p>　　子程序的定義與調(diào)用規(guī)則不受具體接口方式的影響。</p><p>　　2、PDL描述選擇結(jié)構(gòu)</p><p>　　3、PDL描述循環(huán)結(jié)構(gòu)</p><p><b>　　4、子程序</b></p><p><b>　　5、輸入/輸出</b&g

34、t;</p><p>　　第五章 程序總體結(jié)構(gòu)</p><p>　　1、學(xué)生成績管理系統(tǒng)目錄</p><p><b>　　main</b></p><p><b>　　2、流程圖</b></p><p><b>　　<其他略></b><

35、;/p><p><b>　　<主程序流程圖></b></p><p><b>　　3、功能框圖</b></p><p>　　注：圖框中帶*號者表示表單</p><p><b>　　第六章 實現(xiàn)過程</b></p><p><b>　　

36、1、數(shù)據(jù)表設(shè)計</b></p><p>　　本系統(tǒng)使用的表均為自由表</p><p>　?。?）user表<結(jié)構(gòu)如下></p><p>　　Field Fieldname Type Width Dec Index Nulls</p><p>　　1 usename C 10

37、 NO</p><p>　　2 usepass C 6 NO </p><p>　　3 uselevelL C 10 N0</p><p>　　該表存儲系統(tǒng)用戶信息。</p><p>　?。?）daywrife表<

38、;結(jié)構(gòu)如下></p><p>　　Field Fieldname Type width Dec Index Nulls</p><p>　　1 usename QC 10</p><p>　　2 useDATE D 8</p><p>　　3 usefime D

39、 8</p><p>　?。?）prof表（結(jié)構(gòu)如下）</p><p>　　Field Fieldname Type width Dec Index Nulls</p><p>　　1 專業(yè) C 20</p><p>　?。?）classn表（結(jié)構(gòu)如下）</p><p>　　

40、Field Fieldname Type width Dec Index Nulls</p><p>　　1 課程 C 6 N0</p><p>　　2 專業(yè) C 20 NO</p><p>　　3 課程 C

41、 20 NO</p><p>　　4 性質(zhì) C 6 NO</p><p>　　5 開課學(xué)期 C 1 NO</p><p>　　6 學(xué)分 N 3 NO<

42、;/p><p>　　該表用于每放所有課程信息，（課程按專業(yè)分類）</p><p>　　（5）student表（結(jié)構(gòu)如下）</p><p>　　Field Fieldname Type width Dec Index Nulls</p><p>　　1 學(xué)號 C 8 N

43、0</p><p>　　2 姓名 C 10 NO</p><p>　　3 性別 C 2 NO</p><p>　　4 出生日期 D 8 NO</p><p>

44、;　　5 民族 C 10 NO</p><p>　　6 專業(yè) C 20 NO</p><p>　　7 班號 C 10 NO</p><p>　　8 備注 M

45、 4 NO</p><p>　　9 照片 G 4 NO</p><p>　　該表按專業(yè)分類每班的所有學(xué)生記錄，另有一個臨時表studentl，結(jié)構(gòu)相同與student。</p><p><b>　　（6）score表</b></

46、p><p>　　score表結(jié)構(gòu)如下：</p><p>　　Field Fieldname Type width Dec Index Nulls</p><p>　　1 學(xué)號 C 5 N0</p><p>　　2 姓名 C 7

47、 NO</p><p>　　3 課程 C 20 NO</p><p>　　4 分?jǐn)?shù) N 3 NO</p><p>　　5 班號 C 5 NO<

48、/p><p>　　6 專業(yè) C 20 NO</p><p>　　該表按班號分類存放學(xué)生成績，另有一個臨時表scorel，其結(jié)構(gòu)似同。</p><p><b>　　2、系統(tǒng)程序代碼</b></p><p>　　學(xué)生成績管理系統(tǒng)的程序、表單、代碼如下：（所列出大部分

49、）</p><p>　　主程序main.prg</p><p><b>　　CLEAR</b></p><p>　　SET TALK OFF</p><p>　　SET SYSMENU off</p><p>　　SET SYSMENU to</p><p>　　SET D

50、ELETED OFF</p><p>　　SET STATUS BAR OFF</p><p>　　SET DATE ANSI</p><p>　　SET SAFETY OFF</p><p><b>　　CLEAR ALL</b></p><p><b>　　CLOSE ALL<

51、/b></p><p>　　_Screen.WindowState=2</p><p>　　_Screen.Caption="學(xué)生成績管理系統(tǒng)"</p><p>　　PUBLIC ulevel,rq &&ulevel存放用戶級別,rq存放當(dāng)前使用日期</p><p>　　DO FORM pass to

52、 ret</p><p>　　IF ret=.T.</p><p>　　DO menu.mpr</p><p>　　READ event</p><p><b>　　ENDIF</b></p><p>　　SET SYSMENU TO default</p><p>　　S

53、ET SYSMENU on</p><p>　　SET STATUS BAR ON</p><p><b>　　CLOSE ALL</b></p><p><b>　　CLEAR ALL</b></p><p><b>　　RETURN</b></p><p

54、>　　Pass表單事件過程</p><p>　　PROCED BE END</p><p>　　RET RN fcag</p><p><b>　　ENOROC</b></p><p>　　PROCED RE Fnit</p><p>　　PUBLIC n,fcag</p>&

55、lt;p><b>　　n=1</b></p><p>　　thiform.text3.value=DATE( )</p><p><b>　　ENDPROC</b></p><p>　　PROCED RE command1.click</p><p>　　Rq=tnisform.text3.

56、vaue,ra=thisform,text2.vacve,rb=aisform.text1.vowe</p><p>　　IF (n>2) OR(ra=“”) OR(rb=“”)</p><p>　　=MESSAGEBOXC“口令三次輸入錯誤，不能使用本系統(tǒng)”，48，“信息提示”</p><p><b>　　flag=.F.</b><

57、;/p><p>　　THISFORM.RELEASE</p><p><b>　　ELSE</b></p><p>　　SELEOT SEX</p><p>　　TadATE FOR sename=ALCJRIMCERISFORM.ETST1.VALUE;</p><p>　　AND scpass

58、=ALLTRM isform.text2.valve</p><p>　　IF FounD( )</p><p><b>　　ftay=.T.</b></p><p>　　uleval=uselevel</p><p>　　THISFORM:RELEASE</p><p><b>

59、　　ELSE</b></p><p>　　=MESSAGEBOX(“口令不正確，請重新輸入”，48，“信息提示”)</p><p>　　THISFORM。TEXT1。VALUE=“”</p><p><b>　　n=n+1</b></p><p>　　THISFORM.TEXT1.SETFOCUS</p

60、><p><b>　　ENDIF</b></p><p><b>　　ENDIF</b></p><p><b>　　ENDPROC</b></p><p>　　PROCE RE commard2.click</p><p>　　Fhisform.Rele

61、ase</p><p>　　RECEASE n,flag</p><p><b>　　ENDPROL</b></p><p>　　Menu.mpr程序代碼如下：</p><p>　　SET SYSMENU TO</p><p>　　SET SYSMENU AUTOMATIC</p>

62、<p>　　DEFINE PAD _0vv0ilzcv OF _MSYSMENU PROMPT "基本數(shù)據(jù)管理" COLOR SCHEME 3</p><p>　　DEFINE PAD _0vv0ilzd8 OF _MSYSMENU PROMPT "學(xué)生成績管理" COLOR SCHEME 3</p><p>　　DEFINE PAD _0

63、vv0ilzd9 OF _MSYSMENU PROMPT "系統(tǒng)維護(hù)" COLOR SCHEME 3</p><p>　　DEFINE PAD _0vv0ilzda OF _MSYSMENU PROMPT "退出" COLOR SCHEME 3</p><p>　　ON PAD _0vv0ilzcv OF _MSYSMENU ACTIVATE POP

64、UP 基本數(shù)據(jù)管理</p><p>　　ON PAD _0vv0ilzd8 OF _MSYSMENU ACTIVATE POPUP 學(xué)生成績管理</p><p>　　ON PAD _0vv0ilzd9 OF _MSYSMENU ACTIVATE POPUP 系統(tǒng)維護(hù)</p><p>　　ON SELECTION PAD _0vv0ilzda OF _MSYSMENU

65、 ;</p><p>　　DO _0vv0ilzdb ;</p><p>　　IN LOCFILE("VFP學(xué)生成績管理系統(tǒng)\MENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MENU?")</p><p>　　DEFINE POPUP 基本數(shù)據(jù)管 MARGIN RELATIVE SH

66、ADOW COLOR SCHEME 4</p><p>　　DEFINE BAR 1 OF 基本數(shù)據(jù)管理 PROMPT "設(shè)置專業(yè)"</p><p>　　DEFINE BAR 2 OF 基本數(shù)據(jù)管理 PROMPT "設(shè)置班號"</p><p>　　DEFINE BAR 3 OF 基本數(shù)據(jù)管理 PROMPT "設(shè)置課程

67、"</p><p>　　DEFINE BAR 4 OF 基本數(shù)據(jù)管理 PROMPT "\-"</p><p>　　DEFINE BAR 5 OF 基本數(shù)據(jù)管理 PROMPT "錄入學(xué)生"</p><p>　　DEFINE BAR 6 OF 基本數(shù)據(jù)管理 PROMPT "查詢學(xué)生"</p>

68、;<p>　　ON SELECTION BAR 1 OF 基本數(shù)據(jù)管理 ;</p><p>　　DO _0vv0ilze1 ;</p><p>　　IN LOCFILE("VFP學(xué)生成績管理系統(tǒng)\MENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MENU?")</p><p&

69、gt;　　ON SELECTION BAR 2 OF 基本數(shù)據(jù)管理 ;</p><p>　　DO _0vv0ilze2 ;</p><p>　　IN LOCFILE("VFP學(xué)生成績管理系統(tǒng)\MENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MENU?")</p><p>　　ON S

70、ELECTION BAR 3 OF 基本數(shù)據(jù)管理 ;</p><p>　　DO _0vv0ilze3 ;</p><p>　　IN LOCFILE("VFP學(xué)生成績管理系統(tǒng)\MENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MENU?")</p><p>　　ON SELECTION

71、BAR 5 OF 基本數(shù)據(jù)管理 ;</p><p>　　DO _0vv0ilze4 ;</p><p>　　IN LOCFILE("VFP學(xué)生成績管理系統(tǒng)\MENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MENU?")</p><p>　　ON SELECTION BAR 6 OF

72、基本數(shù)據(jù)管理 do form qustudent</p><p>　　DEFINE POPUP 學(xué)生成績管理 MARGIN RELATIVE SHADOW COLOR SCHEME 4</p><p>　　DEFINE BAR 1 OF 學(xué)生成績管理 PROMPT "學(xué)生成績錄入"</p><p>　　DEFINE BAR 2 OF 學(xué)生成績管理

73、 PROMPT "\-"</p><p>　　DEFINE BAR 3 OF 學(xué)生成績管理 PROMPT "學(xué)生成績查詢"</p><p>　　DEFINE BAR 4 OF 學(xué)生成績管理 PROMPT "\-"</p><p>　　DEFINE BAR 5 OF 學(xué)生成績管理PROMPT "學(xué)生

74、總成績"</p><p>　　ON SELECTION BAR 1 OF 學(xué)生成績管理 ;</p><p>　　DO _0vv0ilze5 ;</p><p>　　IN LOCFILE("VFP學(xué)生成績管理系統(tǒng)\MENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MENU?")

75、</p><p>　　ON SELECTION BAR 3 OF 學(xué)生成績管理 do form quscore</p><p>　　ON SELECTION BAR 5 OF 學(xué)生成績管理 do form printscore</p><p>　　DEFINE POPUP 系統(tǒng)維護(hù) MARGIN RELATIVE SHADOW COLOR SCHEME 4</

76、p><p>　　DEFINE BAR 1 OF 系統(tǒng)維護(hù) PROMPT "用戶管理"</p><p>　　DEFINE BAR 2 OF 系統(tǒng)維護(hù) PROMPT "\-"</p><p>　　DEFINE BAR 3 OF 系統(tǒng)維護(hù) PROMPT "數(shù)據(jù)備份"</p><p>　　DEF

77、INE BAR 4 OF 系統(tǒng)維護(hù) PROMPT "\-"</p><p>　　DEFINE BAR 5 OF 系統(tǒng)維護(hù) PROMPT "系統(tǒng)初始化"</p><p>　　ON SELECTION BAR 1 OF 系統(tǒng)維護(hù) ;</p><p>　　DO _0vv0ilze6 ;</p><p>　　I

78、N LOCFILE("VFP學(xué)生成績管理系統(tǒng)\MENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MENU?")</p><p>　　ON SELECTION BAR 3 OF 系統(tǒng)維護(hù) ;</p><p>　　DO _0vv0ilze7 ;</p><p>　　IN LOCFILE(&

79、quot;VFP學(xué)生成績管理系統(tǒng)\MENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MENU?")</p><p>　　ON SELECTION BAR 5 OF 系統(tǒng)維護(hù) ;</p><p>　　DO _0vv0ilze8 ;</p><p>　　IN LOCFILE("VFP學(xué)生成

80、績管理系統(tǒng)\MENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MENU?")</p><p>　　* *********************************************************</p><p>　　* *

81、 </p><p>　　* * _0VV0ILZDB ON SELECTION PAD </p><p>　　* * </p>

82、<p>　　* * Procedure Origin: </p><p>　　* * </p><p>　　* * From Menu: MENU.MPR

83、, Record: 30 </p><p>　　* * Called By: ON SELECTION PAD </p><p>　　* * Prompt: 退出 </p&g

84、t;<p>　　* * Snippet: 1 </p><p>　　* * </p><p>　　* *******************

85、**************************************</p><p><b>　　*</b></p><p>　　PROCEDURE _0vv0ilzdb</p><p>　　set sysmenu to default</p><p>　　CLEAR EVENTS</p><

86、p>　　* *********************************************************</p><p>　　* * </p><p>　　* * _0VV0ILZE1 ON SELECTION B

87、AR 1 OF POPUP 基本數(shù)據(jù)管理 </p><p>　　* * </p><p>　　* * Procedure Origin: </p><

88、p>　　* * </p><p>　　* * From Menu: MENU.MPR, Record: 5 </p><p>　　* * Called By: ON SELECTION

89、BAR 1 OF POPUP 基本數(shù)據(jù)管理 </p><p>　　* * Prompt: 設(shè)置專業(yè) </p><p>　　* * Snippet: 2 </p><p&g

90、t;　　* * </p><p>　　* *********************************************************</p><p><b>　　*</b></p><p&g

91、t;　　PROCEDURE _0vv0ilze1</p><p>　　IF ulevel="系統(tǒng)管理員"</p><p>　　do form setprof</p><p><b>　　ELSE</b></p><p>　　=MESSAGEBOX("您不是系統(tǒng)管理員,不能使用本項功能&quo

92、t;,16+0,"信息提示")</p><p><b>　　ENDIF</b></p><p>　　* *********************************************************</p><p>　　* *

93、 </p><p>　　* * _0VV0ILZE2 ON SELECTION BAR 2 OF POPUP 基本數(shù)據(jù)管理 </p><p>　　* * </p><p

94、>　　* * Procedure Origin: </p><p>　　* * </p><p>　　* * From Menu: MENU.MPR,

95、 Record: 6 </p><p>　　* * Called By: ON SELECTION BAR 2 OF POPUP 基本數(shù)據(jù)管理 </p><p>　　* * Prompt: 設(shè)置班號 </p><p>

96、;　　* * Snippet: 3 </p><p>　　* * </p><p>　　* *******************************

97、**************************</p><p><b>　　*</b></p><p>　　PROCEDURE _0vv0ilze2</p><p>　　IF ulevel="系統(tǒng)管理員"</p><p>　　do form setclass</p><p&g

98、t;<b>　　ELSE</b></p><p>　　=MESSAGEBOX("您不是系統(tǒng)管理員,不能使用本項功能",16+0,"信息提示")</p><p><b>　　ENDIF</b></p><p>　　* ****************************

99、*****************************</p><p>　　* * </p><p>　　* * _0VV0ILZE3 ON SELECTION BAR 3 OF POPUP 基本數(shù)據(jù)管理 </p><p

100、>　　* * </p><p>　　* * Procedure Origin: </p><p>　　* *

101、 </p><p>　　* * From Menu: MENU.MPR, Record: 7 </p><p>　　* * Called By: ON SELECTION BAR 3 OF POPUP 基本數(shù)據(jù)管理 </p><

102、p>　　* * Prompt: 設(shè)置課程 </p><p>　　* * Snippet: 4 </p><p>　　* *

103、 </p><p>　　* *********************************************************</p><p><b>　　*</b></p><p>　　PROCEDURE _0vv0ilze3</p><p&g

104、t;　　IF ulevel="系統(tǒng)管理員"</p><p>　　do form setcourse</p><p><b>　　ELSE</b></p><p>　　=MESSAGEBOX("您不是系統(tǒng)管理員,不能使用本項功能",16+0,"信息提示")</p><

105、p><b>　　ENDIF</b></p><p>　　* *********************************************************</p><p>　　* * </p>

106、<p>　　* * _0VV0ILZE4 ON SELECTION BAR 5 OF POPUP 基本數(shù)據(jù)管理 </p><p>　　* * </p><p>　　* * Procedure Origin:

107、 </p><p>　　* * </p><p>　　* * From Menu: MENU.MPR, Record: 10 </p>

108、<p>　　* * Called By: ON SELECTION BAR 5 OF POPUP 基本數(shù)據(jù)管理 </p><p>　　* * Prompt: 錄入學(xué)生 </p><p>　　* * Snippet: 5

109、 </p><p>　　* * </p><p>　　* *********************************************************</p><

110、;p><b>　　*</b></p><p>　　PROCEDURE _0vv0ilze4</p><p>　　IF ulevel="系統(tǒng)管理員"</p><p>　　do form setstudent</p><p><b>　　ELSE</b></p>

111、<p>　　=MESSAGEBOX("您不是系統(tǒng)管理員,不能使用本項功能",16+0,"信息提示")</p><p><b>　　ENDIF</b></p><p>　　* *********************************************************</p>

112、<p>　　* * </p><p>　　* * _0VV0ILZE5 ON SELECTION BAR 1 OF POPUP 學(xué)生成績管理 </p><p>　　* *

113、 </p><p>　　* * Procedure Origin: </p><p>　　* * </p>

114、;<p>　　* * From Menu: MENU.MPR, Record: 14 </p><p>　　* * Called By: ON SELECTION BAR 1 OF POPUP 學(xué)生成績管理 </p><p>　　* * Prompt: 學(xué)生成績錄入

115、 </p><p>　　* * Snippet: 6 </p><p>　　* * </p>&l

116、t;p>　　* *********************************************************</p><p>　　PROCEDURE _0vv0ilze5</p><p>　　IF ulevel="系統(tǒng)管理員"</p><p>　　do form setscore</p>&l

117、t;p><b>　　ELSE</b></p><p>　　=MESSAGEBOX("您不是系統(tǒng)管理員,不能使用本項功能",16+0,"信息提示")</p><p><b>　　ENDIF</b></p><p>　　* ***********************

118、**********************************</p><p>　　* * </p><p>　　* * _0VV0ILZE6 ON SELECTION BAR 1 OF POPUP 系統(tǒng)維護(hù) </p>

119、<p>　　* * </p><p>　　* * Procedure Origin: </p><p>　　* *

120、 </p><p>　　* * From Menu: MENU.MPR, Record: 23 </p><p>　　* * Called By: ON SELECTION BAR 1 OF POPUP 系統(tǒng)維護(hù) </p>

121、<p>　　* * Prompt: 用戶管理 </p><p>　　* * Snippet: 7 </p><p>　　* *

122、 </p><p>　　* *********************************************************</p><p><b>　　*</b></p><p>　　PROCEDURE _0vv0ilze6</p>&l

123、t;p>　　IF ulevel="系統(tǒng)管理員"</p><p>　　do form usermain</p><p><b>　　ELSE</b></p><p>　　=MESSAGEBOX("您不是系統(tǒng)管理員,不能使用本項功能",16+0,"信息提示")</p>

124、<p><b>　　ENDIF</b></p><p>　　* *********************************************************</p><p>　　* * </p&g