畢業(yè)設(shè)計論文 --vf系統(tǒng)學(xué)生信息管理開發(fā)

1、<p>　　第一章 系統(tǒng)開發(fā)環(huán)境</p><p><b>　　1.1系統(tǒng)開發(fā)環(huán)境</b></p><p>　　微型計算機的應(yīng)用給人們的生活和管理工作帶來了前所未有的快捷。它的使用在辦公方面起到了巨大的作用，使許多過去需要人工操作的工作，都由計算機處理。大大減輕了人們的負擔(dān)。在學(xué)校使用計算機來管理學(xué)生學(xué)籍，教師檔案，院系情況等是當(dāng)前各大院校教務(wù)管理的必然趨勢

2、。另外，當(dāng)前各個大學(xué)針對學(xué)生的愛好興趣設(shè)置課程，使學(xué)生能夠提高自己的學(xué)習(xí)興趣，在網(wǎng)上進行選課為學(xué)生選課提供了方便，同時也為系里減輕了工作負擔(dān)。</p><p>　　應(yīng)內(nèi)蒙古工業(yè)大學(xué)教務(wù)處的要求，我制作了“學(xué)生信息管理系統(tǒng)”。該系統(tǒng)主要完成，學(xué)生信息，教師信息，課程信息，系信息的查詢，修改，添加等操作，同時該系統(tǒng)還包括學(xué)生選課模塊。</p><p><b>　　1.2系統(tǒng)運行環(huán)境&

3、lt;/b></p><p>　　凡能運行WIN98以上的環(huán)境，均能運行本系統(tǒng)。</p><p><b>　　1.3系統(tǒng)安裝方法</b></p><p>　　首先安裝microsoft visual foxpro 6.0。然后把此軟件安裝到E盤。再把“畢業(yè)設(shè)計”文件夾復(fù)制到E盤即可。</p><p>　　第二章

4、學(xué)生信息管理的具體操作方法</p><p>　　2.1學(xué)生信息管理的方法：</p><p>　　首先在網(wǎng)上建立學(xué)生，教師，課程，成績等各項信息的檔案，通過計算機系統(tǒng)維護各項信息即可。</p><p>　　2.2 主要的表結(jié)構(gòu)</p><p><b>　　1．“學(xué)生”表</b></p><p>&l

5、t;b>　　2．“教師”表</b></p><p><b>　　3．“教務(wù)員”表</b></p><p><b>　　4．“班級”表</b></p><p><b>　　5．“課程”表</b></p><p><b>　　6．“系”表</b&g

6、t;</p><p><b>　　7．“學(xué)生登錄”表</b></p><p><b>　　8．“成績”表</b></p><p><b>　　第三章 系統(tǒng)分析</b></p><p>　　根據(jù)用戶的要求本系統(tǒng)共有四部分組成：1. 信息查詢2. 教務(wù)信息維護</p>

7、<p>　　3.學(xué)生選課4. 幫助5. 退出。</p><p><b>　　3.1系統(tǒng)組成</b></p><p>　　3.2“信息查詢”模塊功能及設(shè)計步驟</p><p>　　“信息查詢”模塊由6部分組成：1.學(xué)生信息2.教師信息3.班級信息4.課程信息5.系信息6.學(xué)生成績</p><p>　　“學(xué)生信

8、息”查詢模塊的功能及設(shè)計步驟</p><p>　　a.功能： 完成學(xué)生基本信息的查詢</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　1）先建立一個表單，然后建立九個標簽框，六個文本框，一個組合框，一個表格，兩個按鈕。組合框用來選擇查詢依據(jù)，其中一個文本框用來輸入查詢條件，表格框用來顯示學(xué)生的信息。其他的標簽，文本框也是

9、用來顯示所查學(xué)生的信息。</p><p>　　2）在查詢按鈕中輸入相關(guān)的代碼。在查找過程中，利用條件語句判斷，從學(xué)生表中選擇和查詢依據(jù)文本框中一致的記錄。顯示在表格和對應(yīng)的文本框中。</p><p>　　“教師信息”查詢模塊的功能及設(shè)計步驟</p><p>　　a.功能：完成教師基本信息的查詢</p><p><b>　　b.設(shè)計步

10、驟：</b></p><p>　　1）先建立一個表單，然后建立八個標簽框，五個文本框，一個組合框，一個表格，兩個按鈕。組合框用來選擇查詢依據(jù)，其中一個文本框用來輸入查詢條件，表格框用來顯示教師的信息。其他的標簽，文本框也是用來顯示所查教師的信息。</p><p>　　2）在查詢按鈕中輸入相關(guān)的代碼。在查找過程中，利用條件語句判斷，從教師表中選擇和查詢依據(jù)文本框中一致的記錄。顯示

11、在表格和對應(yīng)的文本框中。</p><p>　　“班級信息”查詢模塊的功能及設(shè)計步驟</p><p>　　a.功能：完成班級基本信息的查詢</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　1）先建立一個表單，然后建立八個標簽框，五個文本框，一個組合框，一個表格，兩個按鈕。組合框用來選擇查詢依據(jù)，其中

12、一個文本框用來輸入查詢條件，表格框用來顯示班級的信息。其他的標簽，文本框也是用來顯示所查班級的信息。 </p><p>　　2）在查詢按鈕中輸入相關(guān)的代碼。在查找過程中，利用條件語句判斷，從班級表中選擇和查詢依據(jù)文本框中一致的記錄。顯示在表格和對應(yīng)的文本框中。</p><p>　　“課程信息”查詢模塊的功能及設(shè)計步驟</p><p>　　a.功能：完成課程基本信息的

13、查詢</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　1）先建立一個表單，然后建立十四個標簽框，十一個文本框，一個組合框，一個表格，兩個按鈕。組合框用來選擇查詢依據(jù)，其中一個文本框用來輸入查詢條件，表格框用來顯示班級的信息。其他的標簽，文本框也是用來顯示所查班級的信息。</p><p>　　2）在查詢按鈕中輸入相關(guān)的代碼

14、。在查找過程中，利用條件語句判斷，從課程表中選擇和查詢依據(jù)文本框中一致的記錄。顯示在表格和對應(yīng)的文本框中。</p><p>　　“系信息”查詢模塊的功能及設(shè)計步驟</p><p>　　a.功能：完成系基本信息的查詢</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　1）先建立一個表單，然后建立七個標

15、簽框，四個文本框，一個組合框，一個表格，兩個按鈕。組合框用來選擇查詢依據(jù)，其中一個文本框用來輸入查詢條件，表格框用來顯示班級的信息。其他的標簽，文本框也是用來顯示所查班級的信息。</p><p>　　2）在查詢按鈕中輸入相關(guān)的代碼。在查找過程中，利用條件語句判斷，從系表中選擇和查詢依據(jù)文本框中一致的記錄。顯示在表格和對應(yīng)的文本框中。</p><p>　　“成績信息”查詢模塊的功能及設(shè)計步驟

16、</p><p>　　a.功能：完成成績信息的查詢</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　1）先建立1個表單，然后建立3個標簽框，2個文本框，1個組合框，1個表格，2個按鈕。組合框用來選擇查詢依據(jù)，其中一個文本框用來輸入查詢條件，表格框用來顯示班級的信息。其他的標簽，文本框也是用來顯示所查班級的信息。</

17、p><p>　　2）在查詢按鈕中輸入相關(guān)的代碼。在查找過程中，利用條件語句判斷，從系表中選擇和查詢依據(jù)文本框中一致的記錄。顯示在表格和對應(yīng)的文本框中。</p><p>　　3.3“教務(wù)信息維護”模塊功能及設(shè)計步驟</p><p>　　“教務(wù)員登錄”模塊的功能及設(shè)計步驟</p><p>　　a.功能： 完成教務(wù)員登錄到教務(wù)信息維護模塊從而進行各項信

18、息的修改。</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　1）先建立一個表單，然后建立2個標簽框，2個文本框，2個按鈕。兩個文本框分別用來輸入教務(wù)員的姓名和口令。兩個按鈕分別是“登錄”和“取消”</p><p>　　2）在“登錄”按鈕中輸入相關(guān)的代碼。點擊“登錄”時，程序運行首先判斷2文本框中的內(nèi)容是否能在教務(wù)員表中找

19、到。如果能夠找到的話，則進入教務(wù)員信息維護表單，否則屬于非法教務(wù)員，不能登錄。</p><p>　　“修改信息”模塊的功能及設(shè)計步驟</p><p>　　a.功能： 顯示需要修改的各項信息。</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　1）先建立一個表單，然后建立1個標簽框，9個按鈕，1個圖片

20、框。9個按鈕分別是用來跳入各項修改信息表單的。圖片框是為了美觀而設(shè)置的。</p><p>　　2）在9個按鈕中分別輸入相關(guān)代碼實現(xiàn)跳入對應(yīng)的信息修改表單。</p><p>　　“修改學(xué)生信息”模塊的功能及設(shè)計步驟</p><p>　　a.功能： 實現(xiàn)學(xué)生信息的修改。</p><p><b>　　b.設(shè)計步驟：</b>&l

21、t;/p><p>　　利用表單設(shè)計器創(chuàng)建該表單，所用到的表為“學(xué)生”表。</p><p>　　“修改教師信息”模塊的功能及設(shè)計步驟</p><p>　　a.功能： 實現(xiàn)教師信息的修改。</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　利用表單設(shè)計器創(chuàng)建該表單，所用到的表為“教師

22、”表。</p><p>　　“修改班級信息”模塊的功能及設(shè)計步驟</p><p>　　a.功能： 實現(xiàn)班級信息的修改。</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　利用表單設(shè)計器創(chuàng)建該表單，所用到的表為“班級”表。</p><p>　　“修改系信息”模塊的功能及設(shè)計步驟

23、</p><p>　　a.功能： 實現(xiàn)系信息的修改。</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　利用表單設(shè)計器創(chuàng)建該表單，所用到的表為“系”表。</p><p>　　“修改課程信息”模塊的功能及設(shè)計步驟</p><p>　　a.功能： 實現(xiàn)課程信息的修改。</p

24、><p><b>　　b.設(shè)計步驟：</b></p><p>　　利用表單設(shè)計器創(chuàng)建該表單，所用到的表為“課程”表。</p><p>　　“修改成績信息”模塊的功能及設(shè)計步驟</p><p>　　a.功能： 實現(xiàn)成績信息的修改。</p><p><b>　　b.設(shè)計步驟：</b>

25、</p><p>　　利用表單設(shè)計器創(chuàng)建該表單，所用到的表為“成績”表。</p><p>　　“修改教務(wù)員信息”模塊的功能及設(shè)計步驟</p><p>　　a.功能： 實現(xiàn)教務(wù)員信息的修改。</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　利用表單設(shè)計器創(chuàng)建該表單，所用到的表

26、為“教務(wù)員”表。</p><p>　　“學(xué)生注冊表管理”模塊的功能及設(shè)計步驟</p><p>　　a.功能： 實現(xiàn)學(xué)生注冊表信息的修改。</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　利用表單設(shè)計器創(chuàng)建該表單，所用到的表為“學(xué)生登錄”表。</p><p>　　3.4 “學(xué)

27、生選課”模塊功能及設(shè)計步驟</p><p>　　“學(xué)生登錄”模塊的功能及設(shè)計步驟</p><p>　　a.功能： 實現(xiàn)學(xué)生登錄到選課模塊，另外實現(xiàn)學(xué)生注冊，沒有注冊的學(xué)生不能實現(xiàn)選課。</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　1）先建立一個表單，然后添加2個標簽框，3個按鈕，2文本框。2個

28、文本框分別是用來輸入學(xué)生的用戶名和密碼。3個按鈕分別是登錄，取消，注冊。</p><p>　　2）在3個按鈕中分別輸入相關(guān)代碼實現(xiàn)跳入對應(yīng)的表單。點擊登錄則進入選課表單，點擊注冊則進入學(xué)生注冊表單。</p><p>　　“學(xué)生注冊表單”模塊的功能及設(shè)計步驟</p><p>　　a.功能： 實現(xiàn)學(xué)生注冊，從而學(xué)生能夠在學(xué)生注冊表中建立自己的用戶名和密碼，這樣學(xué)生就能夠

29、實現(xiàn)選課和退課等操作了。</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　1）先建立一個表單，然后添加4個標簽框，2個按鈕，4文本框。4個文本框分別是用來輸入學(xué)生的學(xué)號，姓名，用戶名，密碼。2個按鈕分別是確定和取消。確定即實現(xiàn)注冊，取消既退出注冊。</p><p>　　2）在“確定”中輸入相關(guān)的代碼，實現(xiàn)在“學(xué)生注冊”表

30、中添加新的記錄。</p><p>　　“學(xué)生選課”模塊的功能及設(shè)計步驟</p><p>　　a.功能： 實現(xiàn)學(xué)生選課，在該模塊中學(xué)生可以查看院系的課程安排，然后選擇自己需要的課。</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　1）先建立一個表單，然后添加4個標簽框，6個按鈕，13文本框。1個列表

31、框。4個標簽框分別是用來顯示一些表單信息及顯示信息。13個文本框主要用來顯示有關(guān)課程的基本信息。列表框用來顯示課程的備注信息。6個按鈕分別實現(xiàn)選課，退課，顯示可選課程，查看課表等。</p><p>　　2）在各個按鈕中輸入相關(guān)的代碼，實現(xiàn)在相關(guān)的功能。</p><p>　　1 “可選課程”模塊的功能及設(shè)計步驟</p><p>　　a.功能： 可以查詢各系的可以選擇的

32、課程。</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　1）先建立一個表單，然后添加2個標簽框，1個組合框，1個文本框。1個表格2個按鈕。組合框用來輸入要查找的條件，是“系編號”或者“課程編號”“課程名稱”等。文本框用來輸入條件。兩個按鈕其中一個用來查看課程信息，另一個用來實現(xiàn)退出。</p><p>　　2）在查看按鈕中

33、輸入相關(guān)的代碼，實現(xiàn)查看課程信息。</p><p>　　2 “學(xué)生課表”模塊的功能及設(shè)計步驟</p><p>　　a.功能： 可以查詢學(xué)生已經(jīng)選過的課程。</p><p><b>　　b.設(shè)計步驟：</b></p><p>　　1）先建立一個表單，然后添加3個標簽框，1個組合框，1個文本框。1個表格和2個按鈕。組合框用來

34、輸入要查找的條件（學(xué)號），文本框用來輸入具體的學(xué)號。兩個按鈕其中一個用來查看學(xué)生課表，另一個用來實現(xiàn)退出。</p><p>　　2）在查看按鈕中輸入相關(guān)的代碼，實現(xiàn)查看學(xué)生課表。</p><p>　　3.5 “系統(tǒng)使用幫助”模塊功能及設(shè)計步驟</p><p>　　a.功能： 介紹該系統(tǒng)的具體使用方法。</p><p><b>　　b

35、.設(shè)計步驟：</b></p><p>　　1）先建立一個表單，然后添加一個頁框。</p><p>　　2）在頁框的各個部分中分別輸入相關(guān)的操作內(nèi)容。</p><p>　　第四章 系統(tǒng)詳細設(shè)計</p><p><b>　　4.1 設(shè)計數(shù)據(jù)庫</b></p><p>　　新建一個項目，名

36、為“學(xué)生信息管理系統(tǒng)”。然后在項目中添加一個數(shù)據(jù)庫，名為“學(xué)生信息”，保存路徑為e:\學(xué)生信息管理系統(tǒng)。</p><p><b>　　“學(xué)生”表</b></p><p>　　在“學(xué)生信息”數(shù)據(jù)庫中創(chuàng)建一個“學(xué)生”表，字段設(shè)置如圖4.1所示。</p><p>　　圖 4.1“學(xué)生”表的字段設(shè)置</p><p>　　切換到i

37、ndexes選項卡，如圖4.2所示設(shè)置索引。</p><p>　　圖 4.2 設(shè)置索引</p><p>　　將表命名為“學(xué)生”，保存路徑為e:\學(xué)生信息管理系統(tǒng)。然后在表中添加一些記錄，如圖4.3所示。</p><p>　　圖 4.3 在“學(xué)生”表中添加記錄</p><p><b>　　“班級”表</b></p

38、><p>　　在“學(xué)生信息”數(shù)據(jù)庫中創(chuàng)建一個“班級”表，字段設(shè)置如圖4.4所示。</p><p>　　圖 4.4 “班級”表的字段設(shè)置</p><p>　　切換到indexes選項卡，如圖4.5所示設(shè)置索引。</p><p>　　圖 4.5 設(shè)置索引</p><p>　　將表命名為“班級”，保存路徑同“學(xué)生”表，然后在

39、表中添加一些記錄，如下圖所示：</p><p>　　圖 4.6 在“班級”表中添加記錄</p><p><b>　　“系”表</b></p><p>　　在“學(xué)生信息”數(shù)據(jù)庫中創(chuàng)建一個“系”表，字段設(shè)置如圖4.6所示。切換到indexes選項卡，如圖4.7所示設(shè)置索引。</p><p>　　將表命名為“系”，保存路徑同“

40、學(xué)生”表。在表中添加一些記錄，如圖4.8所示。</p><p>　　圖 4.6 “系”表的字段設(shè)置</p><p>　　圖 4.7 設(shè)置索引</p><p>　　圖 4.8 在“系”表中添加記錄</p><p><b>　　“教師”表</b></p><p>　　在“學(xué)生信息”數(shù)據(jù)庫中創(chuàng)建

41、一個“教師”表，字段設(shè)置如圖4.9所示。切換到indexes選項卡，如圖4.10所示設(shè)置索引。</p><p>　　將表命名為“教師”，保存路徑同“學(xué)生”表。在表中添加一些記錄，如圖4.11所示。</p><p>　　圖 4.9 “教師”表的字段設(shè)置</p><p>　　圖 4.10 設(shè)置索引</p><p>　　圖 4.11 在“教師

42、”表中添加記錄</p><p><b>　　“課程”表</b></p><p>　　在“學(xué)生信息”數(shù)據(jù)庫中創(chuàng)建一個“課程”表，字段設(shè)置如圖4.12所示。切換到indexes選項卡，如圖4.13所示設(shè)置索引。</p><p>　　將表命名為“課程”，保存路徑同“學(xué)生”表。在表中添加一些記錄，如圖4.14所示。</p><p&g

43、t;　　圖 4.12 “課程”表的字段設(shè)置</p><p>　　圖 4.13 設(shè)置索引</p><p>　　圖 4.14 在“課程”表中添加記錄</p><p><b>　　“成績”表</b></p><p>　　在“學(xué)生信息”數(shù)據(jù)庫中創(chuàng)建一個“成績”表，字段設(shè)置如圖4.15所示。切換到indexes選項卡，

44、如圖4.16所示設(shè)置索引。</p><p>　　將表命名為“成績”，保存路徑同“學(xué)生”表。在表中添加一些記錄，如圖4.17所示。</p><p>　　圖 4.15 “成績”表的字段設(shè)置</p><p>　　圖 4.16 “成績”表的索引設(shè)置</p><p>　　圖 4.17 在“成績”表中添加記錄</p><p

45、><b>　　“學(xué)生登錄”表</b></p><p>　　在“學(xué)生信息”數(shù)據(jù)庫中創(chuàng)建一個“學(xué)生登錄”表，字段設(shè)置如圖4.18所示。切換到indexes選項卡，如圖4.19所示設(shè)置索引。</p><p>　　將表命名為“學(xué)生登錄”，保存路徑同“學(xué)生”表。</p><p>　　圖 4.18 “學(xué)生登錄”表的字段設(shè)置</p>

46、<p>　　圖 4.19 “學(xué)生登錄”表的索引設(shè)置</p><p><b>　　“教務(wù)員”表</b></p><p>　　在“學(xué)生信息”數(shù)據(jù)庫中創(chuàng)建一個“教務(wù)員”表，字段設(shè)置如圖4.21所示。切換到indexes選項卡，如圖4.22所示設(shè)置索引。</p><p>　　將表命名為“教務(wù)員”，保存路徑同“學(xué)生”表。在表中添加一些記錄，

47、如圖4.23所示。</p><p>　　圖 4.21 “教務(wù)員”表字段設(shè)置</p><p>　　圖 4.22 “教務(wù)員”表索引設(shè)置</p><p>　　圖 4.23 在“教務(wù)員”表中添加記錄</p><p>　　4.2 創(chuàng)建表之間的關(guān)系</p><p>　　圖 4.24 表之間的關(guān)系</p>&

48、lt;p>　　在項目管理器中選中數(shù)據(jù)庫“學(xué)生信息”，然后單擊“修改”按鈕，在打開的窗口中設(shè)置各表之間的關(guān)系，如圖4.24所示。</p><p>　　表之間的關(guān)系，說明如下：</p><p>　　1）“學(xué)生”表和“班級”表之間是多對一的關(guān)系，通過索引“班級編號”關(guān)聯(lián)。</p><p>　　2）“學(xué)生”表和“成績”表之間是一對多的關(guān)系，通過索引“學(xué)號”關(guān)聯(lián)。<

49、;/p><p>　　3）“系”表和“班級”表之間是一對多的關(guān)系，通過索引“系編號”關(guān)聯(lián)。</p><p>　　4）“系”表和“課程”表之間是一對多的關(guān)系，通過索引“系編號”關(guān)聯(lián)。 </p><p>　　5）“系”表和“教師”表之間是一對多的關(guān)系，通過索引“系編號”關(guān)聯(lián)。</p><p>　　6）“教師”表和“課程”表之間是一對多的關(guān)系，通過索引“

50、教師編號”關(guān)聯(lián)。</p><p>　　7）“課程”表和“成績”表之間是一對多的關(guān)系，通過索引“課程編號”關(guān)聯(lián)。</p><p><b>　　4.3 設(shè)計菜單</b></p><p>　　在項目中添加一個菜單，名為“主菜單”，設(shè)置如圖4.25所示</p><p>　　圖 4.25 項目菜單</p><

51、p><b>　　“信息查詢”菜單</b></p><p>　　在主菜單中選中“信息查詢”菜單項，單擊該行的“編輯”按鈕。然后設(shè)置子菜單項，如圖4.26所示。</p><p>　　圖 4.26 “信息查詢”菜單的各個子菜單</p><p>　　設(shè)置各子菜單后，為其輸入命令。</p><p>　　“學(xué)生信息”子菜單執(zhí)

52、行的命令為：</p><p>　　do form "e:\學(xué)生信息管理系統(tǒng)\個人信息.scx"</p><p>　　“教師信息”子菜單執(zhí)行的命令為：</p><p>　　do form "e:\學(xué)生信息管理系統(tǒng)\教師信息.scx"</p><p>　　“班級信息”子菜單的執(zhí)行命令為：</p>

53、<p>　　do form "e:\學(xué)生信息管理系統(tǒng)\班級信息.scx"</p><p>　　“課程信息”子菜單執(zhí)行的命令為：</p><p>　　do form "e:\學(xué)生信息管理系統(tǒng)\課程信息.scx"</p><p>　　“系信息”子菜單執(zhí)行的命令為：</p><p>　　do f

54、orm "e:\學(xué)生信息管理系統(tǒng)\系信息.scx"</p><p>　　“學(xué)生成績”子菜單執(zhí)行的命令為：</p><p>　　do form "e:\學(xué)生信息管理系統(tǒng)\學(xué)生成績.scx" </p><p>　　“教務(wù)信息維護”菜單</p><p>　　“教務(wù)信息維護”菜單執(zhí)行的命令為： <

55、/p><p>　　do form "e:\學(xué)生信息管理系統(tǒng)\教務(wù)員登錄.scx"</p><p><b>　　“學(xué)生選課”菜單</b></p><p>　　“學(xué)生選課”菜單執(zhí)行的過程命令為：</p><p>　　do form "e:\學(xué)生信息管理系統(tǒng)\學(xué)生登錄表單.scx"</

56、p><p><b>　　“退出”菜單</b></p><p>　　“退出”菜單執(zhí)行的過程命令為：</p><p>　　do form "e:\學(xué)生信息管理系統(tǒng)\退出.scx"</p><p><b>　　“幫助”菜單</b></p><p>　　“幫助”菜單執(zhí)

57、行的命令為：</p><p>　　do form "e:\學(xué)生信息管理系統(tǒng)\系統(tǒng)使用幫助.scx"</p><p>　　4．3．6 設(shè)置初始化代碼過程</p><p>　　在設(shè)計主菜單的過程中執(zhí)行“顯示”“常規(guī)選項”命令，打開“常規(guī)選項”對話框，如圖4.27所示</p><p>　　圖 4.27 常規(guī)選項</p&

58、gt;<p>　　在“設(shè)置”復(fù)選框中，單擊“確定”按忸，然后在代碼編輯窗口中輸入如下代碼：</p><p>　　set talk off</p><p>　　set debug off</p><p>　　if !file("e:\學(xué)生信息管理系統(tǒng)\學(xué)生信息.dbc")</p><p>　　messagebo

59、x("打開數(shù)據(jù)庫失?。。。?quot;)</p><p><b>　　else</b></p><p>　　open database"e:\學(xué)生信息管理系統(tǒng)\學(xué)生信息.dbc"</p><p><b>　　endif </b></p><p>　　至此，學(xué)生信息

60、管理系統(tǒng)的菜單設(shè)計完畢，點擊“預(yù)覽”便可以看該菜單。</p><p>　　4.4 “信息查詢”模塊</p><p>　　在本節(jié)將創(chuàng)建“信息查詢”主菜單項中運行的各表單。</p><p><b>　　“個人信息”表單</b></p><p>　　在項目中新建一個表單，在表單設(shè)計窗口中右擊，在快捷菜單中執(zhí)行“數(shù)據(jù)環(huán)境”命令，

61、添加“學(xué)生”表。</p><p>　　在表單設(shè)計區(qū)域添加控件，設(shè)計完成“個人信息”表單如圖4.28</p><p>　　圖 4.28 設(shè)計“個人信息”表單</p><p>　　表單及表單上控件的屬性設(shè)置見表 4.1</p><p><b>　　表 4.1</b></p><p><b>

62、;　　添加響應(yīng)代碼：</b></p><p>　　1）表單的初始化（INIT）代碼：</p><p>　　thisform.combo1查詢依據(jù).additem("學(xué)號")</p><p>　　thisform.combo1查詢依據(jù).additem("姓名")</p><p>　　thisf

63、orm.combo1查詢依據(jù).additem("班級編號")</p><p>　　thisform.combo1查詢依據(jù).value=1</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p>　　2）“查詢”按鈕的單擊事件：</p><p>　　if empty(thisform.co

64、mbo1查詢依據(jù).value)</p><p>　　set filter to</p><p><b>　　else</b></p><p>　　if thisform.combo1查詢依據(jù).text="學(xué)號"</p><p>　　locate for 學(xué)生.學(xué)號=alltrim(thisform.t

65、ext1查詢依據(jù).value)</p><p><b>　　if eof()</b></p><p>　　messagebox("沒有找到，請確定后重新輸入！",4+48+0,"查詢出錯")</p><p><b>　　else </b></p><p>

66、　　thisform.refresh</p><p>　　thisform.grid1.setfocus</p><p>　　thisform.txt學(xué)號.setfocus</p><p>　　thisform.txt姓名.setfocus</p><p>　　thisform.txt性別.setfocus</p><p&

67、gt;　　thisform.txt班級編號.setfocus</p><p>　　thisform.txt籍貫.setfocus</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p><b>　　go top</b></p><p><b>　　endif </b

68、></p><p><b>　　else</b></p><p>　　if thisform.combo1查詢依據(jù).text="姓名"</p><p>　　locate for 學(xué)生.姓名=alltrim(thisform.text1查詢依據(jù).value)</p><p><b>　　

69、if eof()</b></p><p>　　messagebox("沒有找到，請確定后重新輸入！",4+48+0,"查詢出錯")</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p><b>　　else </b></p><p&

70、gt;　　thisform.refresh</p><p>　　thisform.grid1.setfocus</p><p>　　thisform.txt學(xué)號.setfocus</p><p>　　thisform.txt姓名.setfocus</p><p>　　thisform.txt性別.setfocus</p><

71、;p>　　thisform.txt班級編號.setfocus</p><p>　　thisform.txt籍貫.setfocus</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p><b>　　go top</b></p><p><b>　　endif <

72、;/b></p><p><b>　　else</b></p><p>　　if thisform.combo1查詢依據(jù).text="班級編號"</p><p>　　set filter to 學(xué)生.班級編號=alltrim(thisform.text1查詢依據(jù).value)</p><p>　

73、　thisform.refresh</p><p>　　thisform.grid1.setfocus</p><p>　　thisform.txt學(xué)號.setfocus</p><p>　　thisform.txt姓名.setfocus</p><p>　　thisform.txt性別.setfocus</p><p&g

74、t;　　thisform.txt班級編號.setfocus</p><p>　　thisform.txt籍貫.setfocus</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p>　　set filter to</p><p>　　else </p><p>

75、　　set filter to</p><p>　　endif </p><p><b>　　endif</b></p><p><b>　　endif</b></p><p>　　endif </p><p>　　3）“退出”按

76、鈕的代碼：</p><p>　　thisform.release</p><p>　　4）表單運行情況： 如圖4.29所示</p><p>　　圖 4.29 “學(xué)生表單”運行結(jié)果</p><p><b>　　“教師信息”表單</b></p><p>　　在項目中新建一個表單，在表單設(shè)計器中右

77、擊，在快捷菜單中執(zhí)行“數(shù)據(jù)環(huán)境”命令，添加“教師”表。</p><p>　　在表單設(shè)計區(qū)域添加控件，設(shè)置屬性，表單如圖4.30</p><p>　　圖 4.30 “教師信息”表單</p><p>　　表單及表單上控件的屬性設(shè)置見表 4.2</p><p><b>　　表 4.2</b></p><

78、;p><b>　　添加響應(yīng)代碼：</b></p><p>　　1）表單的初始化（INIT）代碼：</p><p>　　thisform.combo1查詢依據(jù).additem("教師編號")</p><p>　　thisform.combo1查詢依據(jù).additem("姓名")</p>

79、<p>　　thisform.combo1查詢依據(jù).additem("系編號")</p><p>　　thisform.combo1查詢依據(jù).value=1</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p>　　2）“查詢”按鈕的單擊事件：</p><p>　　if em

80、pty(thisform.combo1查詢依據(jù).value)</p><p>　　set filter to</p><p><b>　　else</b></p><p>　　if thisform.combo1查詢依據(jù).text="教師編號"</p><p>　　locate for 教師.教師編號

81、=alltrim(thisform.text1查詢依據(jù).value)</p><p>　　if .not.eof() </p><p>　　thisform.refresh</p><p>　　thisform.grid1.setfocus</p><p>　　thisform.txt教師編號.setfocus</p>

82、<p>　　thisform.txt姓名.setfocus</p><p>　　thisform.txt性別.setfocus</p><p>　　thisform.txt系編號.setfocus</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p><b>　　go top</

83、b></p><p><b>　　else </b></p><p>　　messagebox("沒有找到，請確定后重新輸入！",4+48+0,"查詢出錯")</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p>　　endif

84、</p><p><b>　　else</b></p><p>　　if thisform.combo1查詢依據(jù).text="姓名"</p><p>　　locate for 教師.姓名=alltrim(thisform.text1查詢依據(jù).value)</p><p>　　if .not.eof()

85、 </p><p>　　thisform.refresh</p><p>　　thisform.grid1.setfocus</p><p>　　thisform.txt教師編號.setfocus</p><p>　　thisform.txt姓名.setfocus</p><p>　　thisform.txt性

86、別.setfocus</p><p>　　thisform.txt系編號.setfocus</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p><b>　　go top</b></p><p><b>　　else </b></p><p&

87、gt;　　messagebox("沒有找到，請確定后重新輸入！",4+48+0,"查詢出錯")</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p>　　endif </p><p><b>　　else</b></p><p>　　i

88、f thisform.combo1查詢依據(jù).text="系編號"</p><p>　　set filter to 教師.系編號=alltrim(thisform.text1查詢依據(jù).value)</p><p>　　thisform.refresh</p><p>　　thisform.grid1.setfocus</p><

89、p>　　thisform.txt教師編號.setfocus</p><p>　　thisform.txt姓名.setfocus</p><p>　　thisform.txt性別.setfocus</p><p>　　thisform.txt系編號.setfocus</p><p>　　thisform.text1查詢依據(jù).setfocu

90、s</p><p><b>　　go top</b></p><p>　　set filter to</p><p><b>　　else </b></p><p>　　set filter to</p><p><b>　　endif</b>&l

91、t;/p><p><b>　　endif</b></p><p><b>　　endif</b></p><p>　　endif </p><p>　　3）“退出”按鈕的代碼：</p><p>　　thisform.release</p

92、><p>　　4）表單運行情況：如圖4.31所示</p><p>　　圖 4.31 “教師信息”表單運行結(jié)果</p><p><b>　　“課程信息”表單</b></p><p>　　在項目中新建一個表單，在表單設(shè)計器中右擊，在快捷菜單中執(zhí)行“數(shù)據(jù)環(huán)境”命令，添加“課程”表。</p><p>　　在

93、表單設(shè)計區(qū)域添加控件，設(shè)置屬性，表單如圖4.32</p><p>　　圖 4.32 “課程信息”表單</p><p>　　表單及表單上控件的屬性設(shè)置見表 4.3</p><p>　　表 4.3 “課程信息”表單屬性設(shè)置</p><p><b>　　添加響應(yīng)代碼：</b></p><p>　　1

94、）表單的初始化（INIT）代碼：</p><p>　　thisform.combo1查詢依據(jù).additem("課程編號")</p><p>　　thisform.combo1查詢依據(jù).additem("課程名稱")</p><p>　　thisform.combo1查詢依據(jù).additem("系編號")&

95、lt;/p><p>　　thisform.combo1查詢依據(jù).value=1</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p>　　2）“查詢”按鈕的單擊事件：</p><p>　　if empty(thisform.combo1查詢依據(jù).value)</p><p>　　set

96、 filter to</p><p><b>　　else</b></p><p>　　if thisform.combo1查詢依據(jù).text="課程編號"</p><p>　　locate for 課程.課程編號=alltrim(thisform.text1查詢依據(jù).value)</p><p>　

97、　if .not.eof()</p><p>　　thisform.refresh</p><p>　　thisform.grid1.setfocus</p><p>　　thisform.txt課程編號.setfocus</p><p>　　thisform.txt課程名稱.setfocus</p><p>　　th

98、isform.txt系編號.setfocus</p><p>　　thisform.txt教師編號.setfocus</p><p>　　thisform.txt課時.setfocus</p><p>　　thisform.txt上課地點.setfocus</p><p>　　thisform.txt學(xué)分.setfocus</p>

99、<p>　　thisform.txt學(xué)年.setfocus</p><p>　　thisform.txt學(xué)期.setfocus</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p><b>　　else </b></p><p>　　messagebox("沒

100、有找到，請確定后重新輸入！",4+48+0,"查詢出錯") </p><p>　　thisform.text1查詢依據(jù).setfocus </p><p><b>　　endif</b></p><p><b>　　else</b></p><p>　　if thi

101、sform.combo1查詢依據(jù).text="課程名稱"</p><p>　　locate for 課程.課程名稱=alltrim(thisform.text1查詢依據(jù).value)</p><p>　　if .not.eof()</p><p>　　thisform.refresh</p><p>　　thisform.

102、grid1.setfocus</p><p>　　thisform.txt課程編號.setfocus</p><p>　　thisform.txt課程名稱.setfocus</p><p>　　thisform.txt系編號.setfocus</p><p>　　thisform.txt教師編號.setfocus</p><

103、;p>　　thisform.txt課時.setfocus</p><p>　　thisform.txt上課地點.setfocus</p><p>　　thisform.txt學(xué)分.setfocus</p><p>　　thisform.txt學(xué)年.setfocus</p><p>　　thisform.txt學(xué)期.setfocus<

104、;/p><p>　　thisform.text1查詢依據(jù).setfocus</p><p><b>　　else </b></p><p>　　messagebox("沒有找到，請確定后重新輸入！",4+48+0,"查詢出錯") </p><p>　　thisform.tex

105、t1查詢依據(jù).setfocus </p><p><b>　　endif</b></p><p><b>　　else</b></p><p>　　if thisform.combo1查詢依據(jù).text="系編號"</p><p>　　set filter to 課程.系編號=a

106、lltrim(thisform.text1查詢依據(jù).value)</p><p>　　thisform.refresh</p><p>　　thisform.grid1.setfocus</p><p>　　thisform.txt課程編號.setfocus</p><p>　　thisform.txt課程名稱.setfocus</p&

107、gt;<p>　　thisform.txt系編號.setfocus</p><p>　　thisform.txt教師編號.setfocus</p><p>　　thisform.txt課時.setfocus</p><p>　　thisform.txt上課地點.setfocus</p><p>　　thisform.txt學(xué)分.

108、setfocus</p><p>　　thisform.txt學(xué)年.setfocus</p><p>　　thisform.txt學(xué)期.setfocus</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p>　　set filter to </p><p><b>　　e

109、lse</b></p><p>　　set filter to</p><p><b>　　endif </b></p><p><b>　　endif</b></p><p><b>　　endif</b></p><p>　　end

110、if </p><p>　　3）“退出”按鈕的代碼：</p><p>　　thisform.release</p><p><b>　　4）表單運行情況：</b></p><p><b>　　如圖4.33所示</b></p><p>　　

111、圖 4.33 “課程表單”運行結(jié)果</p><p>　　“班級信息”表單，“系信息”表單，“學(xué)生成績”表單的制作</p><p>　　制作這3個表單的方法同上面“課程信息”表單的制作過程：</p><p>　　圖 4.34 “班級信息”表單</p><p>　　圖 4.35 “系信息”表單</p><p>　　

112、圖 4.36 “學(xué)生成績”表單</p><p>　　“班級信息”按鈕代碼：</p><p>　?。?）表單初始化代碼（INIT事件）</p><p>　　thisform.combo1查詢依據(jù).additem("班級編號")</p><p>　　thisform.combo1查詢依據(jù).additem("班級名稱

113、")</p><p>　　thisform.combo1查詢依據(jù).additem("系編號")</p><p>　　thisform.combo1查詢依據(jù).value=1</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p>　　（2）“查詢”按鈕代碼如下：</p>

114、;<p>　　if empty(thisform.combo1查詢依據(jù).value)</p><p>　　set filter to</p><p><b>　　else</b></p><p>　　if thisform.combo1查詢依據(jù).text="班級編號"</p><p>　

115、　locate for 班級.班級編號=alltrim(thisform.text1查詢依據(jù).value)</p><p><b>　　if eof()</b></p><p>　　messagebox("沒有找到，請確定后重新輸入！",4+48+0,"查詢出錯")</p><p><b>　　

116、else </b></p><p>　　thisform.refresh</p><p>　　thisform.grid1.setfocus</p><p>　　thisform.txt班級編號.setfocus</p><p>　　thisform.txt班級名稱.setfocus</p><p>　

117、　thisform.txt系編號.setfocus</p><p>　　thisform.txt輔導(dǎo)員.setfocus</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p><b>　　go top</b></p><p><b>　　endif </b>

118、</p><p><b>　　else</b></p><p>　　if thisform.combo1查詢依據(jù).text="班級名稱"</p><p>　　locate for 班級.班級名稱=alltrim(thisform.text1查詢依據(jù).value)</p><p><b>　　

119、if eof()</b></p><p>　　messagebox("沒有找到，請確定后重新輸入！",4+48+0,"查詢出錯")</p><p><b>　　else </b></p><p>　　thisform.refresh</p><p>　　thisfo

120、rm.grid1.setfocus</p><p>　　thisform.txt班級編號.setfocus</p><p>　　thisform.txt班級名稱.setfocus</p><p>　　thisform.txt系編號.setfocus</p><p>　　thisform.txt輔導(dǎo)員.setfocus</p>&

121、lt;p>　　thisform.text1查詢依據(jù).setfocus</p><p><b>　　go top</b></p><p><b>　　endif </b></p><p><b>　　else</b></p><p>　　if thisform.comb

122、o1查詢依據(jù).text="系編號"</p><p>　　set filter to 班級.系編號=alltrim(thisform.text1查詢依據(jù).value)</p><p>　　thisform.refresh</p><p>　　thisform.grid1.setfocus</p><p>　　thisform

123、.txt班級編號.setfocus</p><p>　　thisform.txt班級名稱.setfocus</p><p>　　thisform.txt系編號.setfocus</p><p>　　thisform.txt輔導(dǎo)員.setfocus</p><p>　　thisform.text1查詢依據(jù).setfocus</p>

124、<p>　　set filter to</p><p><b>　　go top</b></p><p><b>　　else </b></p><p>　　set filter to</p><p><b>　　endif </b></p>

125、<p><b>　　endif</b></p><p><b>　　endif</b></p><p>　　endif </p><p>　?。?）“退出”按鈕代碼如下：</p><p>　　thisform.release</p>&

126、lt;p>　　“系信息”按鈕代碼：</p><p>　?。?）表單初始化代碼（INIT事件）</p><p>　　thisform.combo1查詢依據(jù).additem("系編號")</p><p>　　thisform.combo1查詢依據(jù).additem("系主任")</p><p>　　th

127、isform.combo1查詢依據(jù).value=1</p><p>　　thisform.text1查詢依據(jù).setfocus</p><p>　　（2）“查詢”按鈕代碼如下：</p><p>　　if empty(thisform.combo1查詢依據(jù).value)</p><p>　　set filter to</p>&l

128、t;p><b>　　else</b></p><p>　　if thisform.combo1查詢依據(jù).text="系編號"</p><p>　　locate for 系.系編號=alltrim(thisform.text1查詢依據(jù).value)</p><p><b>　　if eof()</b>

129、;</p><p>　　messagebox("沒有找到，請確定后重新輸入！",4+48+0,"查詢出錯")</p><p><b>　　else</b></p><p>　　thisform.refresh</p><p>　　thisform.grid1.setfocus<

130、;/p><p>　　thisform.txt系編號.setfocus</p><p>　　thisform.txt系主任.setfocus</p><p>　　thisform.txt系名稱.setfocus</p><p><b>　　endif </b></p><p><b>　　

131、else</b></p><p>　　if thisform.combo1查詢依據(jù).text="系主任"</p><p>　　locate for 系.系主任=alltrim(thisform.text1查詢依據(jù).value)</p><p><b>　　if eof()</b></p><p

132、>　　messagebox("沒有找到，請確定后重新輸入！",4+48+0,"查詢出錯")</p><p><b>　　else</b></p><p>　　thisform.refresh</p><p>　　thisform.grid1.setfocus</p><p>

133、　　thisform.txt系編號.setfocus</p><p>　　thisform.txt系主任.setfocus</p><p>　　thisform.txt系名稱.setfocus</p><p><b>　　endif </b></p><p><b>　　else</b><