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

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

　　建立一個表單，表單文件名和表單控件名均為myform_db，表單標(biāo)題為

　　"數(shù)據(jù)瀏覽和維護"，表單樣例如圖所示。其它功能要求如下：

　　1. 用選項按鈕組(Optiongroup1)控件選擇職工表(employee)(Option1)

　　或訂單表(orders)(Option2);(注意：括號使用全角符號)

　　2. 用復(fù)選框(Check1)控件確定顯示的表是否需要存盤;

　　3. 單擊"確定"(Command1)命令按鈕，若"存盤"復(fù)選框被選中，則用SQL語句

　　將選項組指定的表的內(nèi)容存入表temp中，否則用SQL語句顯示該表的內(nèi)容;

　　4. 單擊"退出"(Command2)命令按鈕，關(guān)閉并釋放表單。

　　本題主要考核點

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

　　本題解題思路：

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

　　第二步：點擊工具欄按鈕"表單控件工具欄"，在彈出的"表單控件"對話框中，選中"選項組"控件，在表單設(shè)計器中拖動鼠標(biāo)，這樣在表單上得到一個"選項組"控件optiongroup1，用類似的方法為表單再加入一個復(fù)選框check1和兩個"命令按鈕"控件command1和command2。

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

　　對象 屬性 屬性值

　　myform_db Name myform_db

　　myform_db Caption 數(shù)據(jù)瀏覽和維護

　　Optiongroup1.option1 Caption 職工表(employee)

　　Optiongroup1.option2 Caption 訂單表(orders)

　　Check1 Caption 存盤

　　Command1 Caption 確定

　　Command2 Caption 退出

　　***********命令按鈕command1(確定)的Click事件代碼如下************

　　if thisform.check1.value=1

　　if thisform.optiongroup1.value=1

　　sele * from employee into table temp.dbf

　　else

　　sele * from orders into table temp.dbf

　　endif

　　else

　　if thisform.optiongroup1.value=1

　　sele * from employee

　　else

　　sele * from orders

　　endif

　　endif

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

　　thisform.release