2015計算機二級考試VFP模擬題及答案（三）
一、基本操作題(共四小題，第1和2題是7分、第3和4是8分)
在考生資料夾下有一表單檔案，其中包含一個文字框和一個命令按鈕。開啟該表單檔案，然後在表單設計器環境下完成如下操作：
1.將文字框和命令按鈕兩個控制元件設定為頂邊對齊。
2.將文字框的預設值設定為0。
3.將表單的標題設定"基本操作"，將命令按鈕的標題設定為"確定"。
4.設定文字框的InteractiveChange事件程式碼，使得當文字框輸入負數時，命令按鈕為無效，即不能響應使用者的操作。
本題主要考核點：文字框屬性的設定、表單屬性的設定、命令按鈕屬性的設定、事件程式碼的編寫。
1、開啟表單formone，選中標籤和命令按鈕，選擇"格式"選單下"對齊"選單下的"頂邊對齊"。
2、將文字框的Value屬性值設定為0。
3、將表單的Caption屬性值設定為"基本操作"，命令按鈕的Caption屬性值設定為"確定"。
4、設定文字框的ractiveChange事件程式碼：
if e<0
led=0
endif
二、簡單應用(2小題，每題20分，計40分)
1.擴充套件Visual FoxPro基類Form，建立一個名為MyForm的自定義表單類。自定義表單類儲存在名為myclasslib的類庫中。自定義表單類MyForm需滿足以下要求：
(1)其AutoCenter屬性的預設值為.T.。
(2)其Closable屬性的預設值為.F.。
(3)當基於該自定義表單類建立表單時，自動包含一個命令按鈕。該命令按鈕的標題為"關閉"，當單擊該命令按鈕時，將關閉其所在的表單。
2.利用查詢設計器建立查詢，從orders、orderitems和goods表中查詢2007年簽訂的所有訂單的資訊。查詢結果依次包含訂單號、客戶號、簽訂日期、總金額等四項內容，其中總金額為該訂單所籤所有商品的金額(單價*數量)之和。各記錄按總金額降序排序，總金額相同按訂單號升序排序。查詢去向為表tableone。最後將查詢儲存在檔案中，並執行該查詢。
本題主要考核點：新建自定義表單類、利用查詢設計器建立查詢。
解題思路：
第1題：建立類可以使用"檔案"選單完成，選擇檔案--新建--類--新建檔案，在彈出的"新建類"對話方塊中：在"類名"右邊的文字框中輸入：MyForm，在"派生於"右邊的列表框中選擇Form，在"儲存於"右邊的瀏覽中選擇考生資料夾，再輸入檔名myclasslib，單擊"確定"按鈕，開啟"類設計器"視窗，進入類設計器環境。在屬性視窗中，將表單的AutoCenter屬性設定為.T.，Closable屬性設定為.F.。在窗體上新增一個命令按鈕，Caption屬性為"關閉"，設定"關閉"按鈕的Click事件程式碼：ase。
第2題：建立查詢可以使用"檔案"選單完成，選擇檔案--新建--查詢--新建檔案，將orders、orderitems和goods表新增到查詢中，從欄位選項卡中依次選擇"Orders.訂單號"、"Orders.客戶號"、"Orders.簽訂日期"，在"函式和表示式"中輸入"SUM(Goods.單價*Orderitems.數量)AS 總金額"，並新增到選定欄位中;切換到"篩選"選項卡，在表示式中輸入："year(Orders.簽訂日期)"，"條件"選擇"="，"例項"中輸入：2007;切換到"排序依據"選項卡並在其中選擇欄位"SUM(Goods.單價*Orderitems.數量)AS 總金額"，排序選項為"降序"，再選擇"Orders.訂單號"，排序選項為"升序";切換到"分組依據"選項卡並在其中選擇欄位"Orders.訂單號";單擊查詢選單下的"查詢去向"，選擇表，在"表名"右邊的對話方塊中輸入表名tableone，最後儲存並執行該查詢。
三、綜合應用(1小題，計30分)
在考生資料夾下建立一個下拉式選單，並生成選單程式。執行該選單程式時會在當前vfp系統選單的末尾追加一個"考試"子選單，如下圖所示。
選單命令"統計"和"返回"的功能都通過執行過程完成。
選單命令"統計"的功能是統計2007年有關客戶簽訂的訂單數。統計結果依次包含"客戶名"和"訂單數"兩個欄位，其中客戶名即為客戶的姓名(在customers表中)。各記錄按訂單數降序排序、訂單數相同按客戶名升序排序，統計結果存放在tabletwo表中。
選單命令"返回"的功能是恢復標準的系統選單。
選單程式生成後，執行選單程式並依次執行"統計"和"返回"選單命令。
本題的主要考核點：建立選單。
解題思路：
1、建立選單可以使用"檔案"選單完成，選擇檔案--新建--選單--新建檔案開啟新建選單視窗，選擇"選單"按鈕，開啟選單設計器。開啟"顯示"選單下的"常規選項"對話方塊，在"位置"處選擇追加，則新建立的子選單會在當前vfp系統選單後顯示。
2、在選單名稱中填入"考試"，結果為子選單，單擊建立;在子選單的選單名稱中輸入"統計"，結果為過程。在過程中輸入下列命令：
SELECT Customers.姓名 AS 客戶名,count(Orders.訂單號)as 訂單數;
FROM customers INNER JOIN orders ONCustomers.客戶號=Orders.客戶號;
WHERE year(Orders.簽訂日期)=2007 GROUP BYCustomers.姓名;
