計算機等級考試二級VFP上機試題及解題思路(34)

　　三、綜合應(yīng)用(1小題，計30分)

　　設(shè)計一個文件名和表單名均為form_item的表單，所有控件的屬性必須在表

　　單設(shè)計器的屬性窗口中設(shè)置。表單的標題設(shè)為"使用零件情況統(tǒng)計"。表單中有一

　　個組合框(combo1)、一個文本框(text1)和兩個命令按鈕"統(tǒng)計"(command1)和"退出"(command2)。

　　運行表單時，組合框中有三個條目"s1"、"s2"、"s3"(只有三個，不能輸入新的，RowSourceType的屬性為"數(shù)組"，Style的屬性為"下拉列表框")可供選擇，

　　單擊"統(tǒng)計"命令按鈕以后，則文本框顯示出該項目所用零件的金額(某種零件的金額=單價*數(shù)量)。

　　單擊"退出"按鈕關(guān)閉表單。

　　本題主要考核點

　　控件的屬性的修改、SQL語句運用、表單的退出等知識點

　　本題解題思路：

　　第一步：在Visual FoxPro主窗口中按下組合鍵Ctrl+N，系統(tǒng)彈出"新建"對話框，在文件類型中選擇"表單"，點擊"新建文件"按鈕,系統(tǒng)將打開表單設(shè)計器;或直接在命令窗口中輸入 crea form form_item。

　　第二步：點擊工具欄按鈕"表單控件工具欄"，在彈出的"表單控件"對話框中，選中"組合框"控件，在表單設(shè)計器中拖動鼠標，這樣在表單上得到一個"組合框"控件combo1，用類似的方法為表單再加入一個"文本框"控件text1和兩個"命令按鈕"控件command1和command2;

　　相關(guān)控件的屬性值如下表所示：

　　***************表單form_item的Load事件代碼如下***************

　　public ss(3)

　　ss(1)="s1"

　　ss(2)="s2"

　　ss(3)="s3"

　　*********命令按鈕command1(統(tǒng)計)的Click事件代碼如下***********

　　SELECT SUM(零件信息.單價*使用零件.數(shù)量);

　　FROM 零件信息 INNER JOIN 使用零件;

　　INNER JOIN 項目信息 ;

　　ON 使用零件.項目號 = 項目信息.項目號 ;

　　ON 零件信息.零件號 = 使用零件.零件號;

　　WHERE 使用零件.項目號 =ALLTRIM(THISFORM.combo1.VALUE);

　　GROUP BY 項目信息.項目號;

　　INTO ARRAY TEMP

　　THISFORM.TEXT1.VALUE=TEMP

　　**********命令按鈕command2(退出)的Click事件代碼如下**********

　　thisform.release