2010年全國計算機等級考試二級VB模擬試題(17)

　　3.綜合應用題

　　在考生文件夾下有學生成績數(shù)據(jù)庫xuesheng3，包括如下所示3個表文件以及相關的索引文件：

　　(1)xs.dbf(學生文件：學號C8，姓名C8，性別C2，班級C5;另有索引文件XS.IDX，索引鍵：學號)

　　(2)cj.dbf(成績文件：學號C8，課程名C20，成績N5.1;另有索引文件CJ.IDX，索引鍵：學號)

　　(3)cjb.dbf(成績表文件：學號C8，姓名C8，班級C5，課程名C12，成績N5.1)

　　設計一個名為xs3的菜單，菜單中有兩個菜單項“計算”和“退出”。

　　程序運行時，單擊“計算”菜單項應完成下列操作：

　　將所有選修了“計算機基礎”的學生的“計算機基礎”成績，按成績由高到低的順序填到成績表文件cjb.dbf中(首先須將文件中原有數(shù)據(jù)清空)。

　　單擊“退出”菜單項，程序終止運行。

　　注：相關數(shù)據(jù)表文件存在于考生文件夾下。

　　【參考答案】

　　具體步驟如下：

　�、� 在“命令”窗口輸入命令：CREATE MENU xs3。

　�、� 系統(tǒng)彈出一個“新建菜單”對話框，在對話框中單擊“菜單”圖標按鈕。

　�、� 在彈出的菜單設計器中，根據(jù)題目要求，首先輸入兩個主菜單名稱“計算”和“退出”，接著在“計算”菜單行的“結果”下拉列表框中選擇“過程”選項(用于編寫程序)，在“退出”菜單行的“結果”下拉列表框中選擇“命令”選項。

　�、� 單擊“計算”菜單行中的“創(chuàng)建”按鈕，進入程序設計的編輯窗口，輸入如下程序段：

　　**********“計算”菜單命令的程序設計**********

　　SET TALK OFF

　　OPEN DATABASE xuesheng3

　　SELECT cj.學號,xs.班級,xs.姓名,cj.課程名,cj.成績;

　　FROM xuesheng3!xs INNER JOIN xuesheng3!cj;

　　ON xs.學號=cj.學號;

　　WHERE cj.課程名='計算機基礎';

　　ORDER BY cj.成績DESC;

　　INTO ARRAY AFieldsValue

　　DELETE FROM cjb

　　INSERT INTO cjb FROM ARRAY AFieldsValue

　　CLOSE ALL

　　USE cjb

　　PACK

　　USE

　　SET TALK ON

　　**********************************************

　�、� 在“退出”菜單項的“命令”文本框中編寫程序代碼：SET SYSMENU TO DEFAULT。

　�、� 選擇菜單命令“菜單”→“生成”，生成一個菜單文件xs3.mpr。

　　⑦ 關閉設計窗口，在“命令”窗口輸入命令：DO xs3.mpr，可以看到Visual FoxPro的菜單欄被新建的菜單所代替，單擊“退出”菜單命令將恢復系統(tǒng)菜單。

　　【試題解析】

　　本試題考查的主要是通過學生表和成績表的連接，將符合要求的記錄添加到新的數(shù)據(jù)表中。在“計算”菜單命令的設計過程中，“結果”下拉列表框中應該選擇“過程”選項，然后進行查詢程序的編輯。在程序設計過程中，可以使用SQL查詢語句及插入語句來完成設計。