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

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

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

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

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

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

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

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

8、t;　?。?）學生成績排名，可以查看學生的名次號。 </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這一強大的數(shù)據(jù)庫管理系統(tǒng)來實現(xiàn)所以開發(fā)此系統(tǒng)從技術(shù)上完全可行</p><p><b>　　第三章 系統(tǒng)設(shè)計</b></p><p><b>　　3.1 設(shè)計目標</b></p><p>　　實現(xiàn)學生資料和課程安排的添加、修改和刪除； 學生成績的添加、查詢、

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

11、t;/p><p>　　進入成績修改模塊，查詢和修改學生成績</p><p>　　進入排名模塊，查詢學生成績和排名情況 </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 學生成績表（tblscore）</p><p>　　表3-4學生資料表（tblstudent）</p><p><b>　　第四章 詳細設(shè)計</b></p><p><b>　　一、詳細設(shè)計的任務(wù)</b></p><p>　　詳細設(shè)計的目的是為軟件結(jié)構(gòu)圖（SC圖或HC圖）中的每一

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

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

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

17、t;<p>　　(1) 程序語言中應(yīng)盡量少用GOTO語句，以確保程序結(jié)構(gòu)的獨立性。</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è)計的缺點是存儲容量和運行時間增加10％-20％，但易讀易維護性好。</p><p>　　(5) 經(jīng)典的控制結(jié)構(gòu)為順序，IF THEN ELSE分支，DO-WHILE循環(huán)。擴展的還有多分支CASE，DO-UNTIL循環(huán)結(jié)構(gòu)，固定次數(shù)循環(huán)DOWHILE。</p><p>　　3．選擇恰當描述工具來描述各模塊算法。</p><p><b>　　

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

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

21、序框圖，它是軟件開發(fā)者最熟悉的一種算法表達工具。它獨立于任何一種程序設(shè)計語言，比較直觀和清晰地描述過程的控制流程，易于學習掌握。因此，至今仍是軟件開發(fā)者最普遍采用的一種工具。</p><p>　　流程圖也存在一些嚴重的不足。</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)控制條件成立時，重復執(zhí)行特定的處理。</p><p>　　4、until型循環(huán)</p><p>　　until型循環(huán)是后判定型循環(huán)，重復執(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)容，當條件P不成立時，則執(zhí)行F下的內(nèi)容。</p><p><b>　　選擇型結(jié)構(gòu)</b></p><p>　　3、WHILE重復型</p><p>　　在WHILE重復型循環(huán)結(jié)構(gòu)中，先判斷P的值，再執(zhí)行S。其中P是循環(huán)條件，S是循環(huán)體。<

27、;/p><p>　　WHILE重復型循環(huán)結(jié)構(gòu) </p><p>　　4、UNTIL重復型</p><p>　　在UNTIL重復型循環(huán)結(jié)構(gòu)中，先執(zhí)行S，后判斷P的值。</p><p>　　UNTIL重復型循環(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)。當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重復型和UNTIL重復型</p><p>　　P是循環(huán)判斷條件，S是循環(huán)體。循環(huán)判斷條件框的右端為雙縱線，表示該矩形域是循環(huán)條件，以區(qū)別于一般的矩形功能域。

31、</p><p>　　WHILE重復型和UNTIL重復型結(jié)構(gòu)</p><p><b>　　4、多分支選擇型</b></p><p>　　多分支選擇型是CASE型結(jié)構(gòu)。當判定條件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具有“非純粹”的編程語言的特點。</p><p>　　1、PDL語言的特點</p><p>　　關(guān)鍵字采用固定語法并支持結(jié)構(gòu)化構(gòu)件、數(shù)據(jù)說明機制和模塊化；</p><p>　　處理部分采用自然語言描述；</p><p>　　可以說

33、明簡單和復雜的數(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、學生成績管理系統(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 開課學期 C 1 NO</p><p>　　6 學分 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 學號 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è)分類每班的所有學生記錄，另有一個臨時表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 學號 C 5 N0</p><p>　　2 姓名 C 7

47、 NO</p><p>　　3 課程 C 20 NO</p><p>　　4 分數(shù) N 3 NO</p><p>　　5 班號 C 5 NO<

48、/p><p>　　6 專業(yè) C 20 NO</p><p>　　該表按班號分類存放學生成績，另有一個臨時表scorel，其結(jié)構(gòu)似同。</p><p><b>　　2、系統(tǒng)程序代碼</b></p><p>　　學生成績管理系統(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="學生成績管理系統(tǒng)"</p><p>　　PUBLIC ulevel,rq &&ulevel存放用戶級別,rq存放當前使用日期</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 "學生成績管理" COLOR SCHEME 3</p><p>　　DEFINE PAD _0

63、vv0ilzd9 OF _MSYSMENU PROMPT "系統(tǒng)維護" 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 學生成績管理</p><p>　　ON PAD _0vv0ilzd9 OF _MSYSMENU ACTIVATE POPUP 系統(tǒng)維護</p><p>　　ON SELECTION PAD _0vv0ilzda OF _MSYSMENU

65、 ;</p><p>　　DO _0vv0ilzdb ;</p><p>　　IN LOCFILE("VFP學生成績管理系統(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 "錄入學生"</p><p>　　DEFINE BAR 6 OF 基本數(shù)據(jù)管理 PROMPT "查詢學生"</p>

68、;<p>　　ON SELECTION BAR 1 OF 基本數(shù)據(jù)管理 ;</p><p>　　DO _0vv0ilze1 ;</p><p>　　IN LOCFILE("VFP學生成績管理系統(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學生成績管理系統(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學生成績管理系統(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學生成績管理系統(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 學生成績管理 MARGIN RELATIVE SHADOW COLOR SCHEME 4</p><p>　　DEFINE BAR 1 OF 學生成績管理 PROMPT "學生成績錄入"</p><p>　　DEFINE BAR 2 OF 學生成績管理

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

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

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

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

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

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

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

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: 錄入學生 </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 學生成績管理 </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 學生成績管理 </p><p>　　* * Prompt: 學生成績錄入

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)維護 </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)維護 </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