vfp課程設(shè)計報告---學(xué)生成績管理系統(tǒng)

1、<p><b>　　一、設(shè)計題目。</b></p><p><b>　　學(xué)生成績管理系統(tǒng)</b></p><p><b>　　二、目的</b></p><p>　　《關(guān)系數(shù)據(jù)庫管理系統(tǒng)》課程的學(xué)習(xí)，不僅需要理論上的深入探討，而且需要通過實踐上機，自己開發(fā)一個數(shù)據(jù)庫管理信息系統(tǒng)，才能真正理解書

2、本知識，牢固掌握課堂教學(xué)內(nèi)容。因此，本上機操作的目的就是要通過一個實際的管理信息系統(tǒng)的開發(fā)，提高學(xué)生應(yīng)用所學(xué)知識分析問題，解決問題和實際動手的能力。</p><p>　　通過本課程的上機操作，使學(xué)生進一步掌握關(guān)系數(shù)據(jù)庫管理系統(tǒng)這門課程的內(nèi)容，熟悉用VFP開發(fā)一個簡單系統(tǒng)的基本步驟。 </p><p><b>　　三、設(shè)計思路。</b></p>&

3、lt;p><b>　　菜單功能：</b></p><p><b>　　1)數(shù)據(jù)管理</b></p><p>　　主要是對學(xué)生基本信息、課程基本信息、學(xué)生成績信息、教師基本信息的錄入、刪除、保存、定位等操作。</p><p><b>　　2)查詢設(shè)計</b></p><p>

4、;　　●學(xué)生選修課程信息：創(chuàng)建一個一對多表單，當(dāng)在一個組合框中選擇學(xué)生后，在下面的GRID中反映該學(xué)生選修的課程名，課時數(shù)，任課教師及該門課程的成績。</p><p>　　●教師任課情況：以一對多的形式，在表格一中選擇教師后，表格二中顯示該教師的</p><p><b>　　任課情況。</b></p><p><b>　　3)統(tǒng)計處理

5、</b></p><p>　　●學(xué)生成績統(tǒng)計：創(chuàng)建一個視圖，該視圖用來反映每個學(xué)考選修了幾門課，總成績是多少，并將該視圖加到表單的數(shù)據(jù)環(huán)境中，創(chuàng)建一個學(xué)生總成績查詢表單。用頁框來實現(xiàn)，第一頁反映學(xué)生的總成績，第二頁反映學(xué)生的明細成績。</p><p>　　●各教師的任課時數(shù)：創(chuàng)建一個視圖，該視圖用來反映每個教師上了幾門課，總學(xué)時是多少，并將該視圖加到表單的數(shù)據(jù)環(huán)境中，創(chuàng)建一個教

6、師情況查詢表單。</p><p><b>　　4)打印輸出</b></p><p>　　●在報表設(shè)計器中設(shè)計一個學(xué)生總成績報表，然后在學(xué)生總成績查詢表單上添加一個打印按鈕，當(dāng)按下該按鈕時，調(diào)用上述創(chuàng)建的報表。 </p><p>　　●在報表設(shè)計器中設(shè)計一個教師任課信息報表，在菜單中調(diào)用該報表</p><p><b&

7、gt;　　四、各模塊展示</b></p><p><b>　　菜單運行結(jié)果：</b></p><p><b>　　用戶管理</b></p><p><b>　　//new</b></p><p>　　APPEN BLAN</p><p>　　

8、thisform.refresh</p><p>　　thisform.txtbh.setfocus</p><p><b>　　//delete</b></p><p><b>　　delete</b></p><p><b>　　pack</b></p>&l

9、t;p>　　thisform.refresh</p><p><b>　　//reset</b></p><p>　　thisform.txtbh.value=''</p><p>　　thisform.txtmc.value=''</p><p>　　thisform.txtmm.

10、value=''</p><p><b>　　//exit</b></p><p>　　thisform.release</p><p><b>　　//first</b></p><p>　　if !bof() then</p><p><b>　

11、　goto top</b></p><p>　　thisform.refresh</p><p>　　this.enabled = .f.</p><p>　　thisform.command6.enabled =.F.</p><p>　　thisform.command7.enabled =.T.</p><

12、;p>　　thisform.command8.enabled =.T.</p><p><b>　　endif</b></p><p><b>　　//prior</b></p><p>　　if !Bof() </p><p><b>　　skip -1</b><

13、/p><p>　　thisform.refresh</p><p><b>　　else</b></p><p>　　this.enabled = .f. </p><p>　　thisform.command5.enabled =.F.</p><p>　　thisform.command6.e

14、nabled =.t.</p><p>　　thisform.command7.enabled =.t.</p><p>　　thisform.command8.enabled =.t.</p><p><b>　　endif</b></p><p><b>　　//next</b></p&g

15、t;<p><b>　　skip</b></p><p><b>　　//last</b></p><p><b>　　goto BOTT</b></p><p><b>　　//主要程序：</b></p><p>　　if alltrim(

16、thisform.text1.value)==p_mm </p><p>　　if thisform.text2.value==thisform.text3.value </p><p>　　temp=alltrim(thisform.text3.value)</p><p>　　UPDATE dl SET mm= temp WHERE dl.mc = p_mc &

17、lt;/p><p>　　MessageBox('密碼修改成功',48+0+0)</p><p><b>　　else </b></p><p>　　MessageBox('兩次密碼輸入不相等',48+0+0)</p><p><b>　　endif </b></p&

18、gt;<p><b>　　else </b></p><p>　　MessageBox('原密碼不正確,請再次輸入',48+0+0)</p><p><b>　　endif </b></p><p><b>　　修改密碼</b></p><p>&

19、lt;b>　　//主要程序：</b></p><p>　　if alltrim(thisform.text1.value)==p_mm </p><p>　　if thisform.text2.value==thisform.text3.value </p><p>　　temp=alltrim(thisform.text3.value)</

20、p><p>　　UPDATE dl SET mm= temp WHERE dl.mc = p_mc </p><p>　　MessageBox('密碼修改成功',48+0+0)</p><p><b>　　else </b></p><p>　　MessageBox('兩次密碼輸入不相等',4

21、8+0+0)</p><p><b>　　endif </b></p><p>　　//主要程序：USE dl.DBF</p><p>　　TEMP1=ALLTRIM(THISFORM.text1.VALUE)</p><p>　　TEMP2=ALLTRIM(THISFORM.text2.VALUE)</p>

22、;<p>　　LOCATE FOR ALLTRIM(mc)==TEMP1.AND.ALLTRIM(mm)==TEMP2</p><p>　　IF FOUND() </p><p>　　do form dlcg.scx //該表單自己建</p><p>　　public p_mc,p_mm</p><p>　　p_mc=TEMP

23、1</p><p>　　p_mm=TEMP2</p><p>　　THISFORM.RELEASE</p><p><b>　　ELSE</b></p><p>　　MESSAGEBOX("密碼或用戶名輸入錯誤，重新輸入！")</p><p>　　THISFORM.TEXT1.

24、VALUE=''</p><p>　　THISFORM.TEXT2.VALUE=''</p><p>　　THISFORM.text1.SETFOCUS</p><p><b>　　ENDIF</b></p><p><b>　　四、收獲及心得體</b></p&

25、gt;<p>　　看著即將完成的課程設(shè)計，心情分外激動，也有不少的心得體會，感慨頗深，特總結(jié)如下：</p><p>　　通過這次VFP課程設(shè)計，我深深地體會到了實踐對于學(xué)習(xí)的重要性，只有通過親手去實踐，才能更好的掌握一門技術(shù)。</p><p>　　這個成績管理系統(tǒng)是我自己在不斷摸索的過程中慢慢完善起來的，在制作過程中遇到了大大小小的問題，在自己的專研下，又一一攻破，只有自己肯