第二小題：打開(kāi)考生文件夾下的"form1.scx"，在表單設(shè)計(jì)器中雙擊"刷新標(biāo)題"控件打開(kāi)代碼編輯器，此處是對(duì)form對(duì)象的caption的屬性進(jìn)行賦值，所以此處應(yīng)改為：thisform.caption="簡(jiǎn)單應(yīng)用"; 在表單設(shè)計(jì)器中雙擊"訂單記錄"控件打開(kāi)代碼編輯器，此處是要在表格控件中顯示表"ORDER_LIST.DBF"，所以要對(duì)grid1控件的RecordSource屬性進(jìn)行賦值，此處應(yīng)改為：

　　thisform.grid1.RecordSource="order_list.dbf";

　　在表單設(shè)計(jì)器中雙擊"關(guān)閉表單"控件打開(kāi)代碼編輯器，此處的功能是關(guān)閉表單，關(guān)閉表單要用到表單的Release方法，所以此處應(yīng)改為：thisform.release退出保存。

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

　　首先為order_detail表增加一個(gè)新字段：新單價(jià)(類型與原來(lái)的單價(jià)字段相同)，然后編寫(xiě)滿足如下要求的程序：根據(jù)order_list 表中的"訂購(gòu)日期"字段的值確定order_detail表的"新單價(jià)"字段的值，原則是：訂購(gòu)日期為2001年的"新單價(jià)"字段的值為原單價(jià)的90%，訂購(gòu)日期為2002年的"新單價(jià)"字段的值為原單價(jià)的110%(注意：在修改操作過(guò)程中不要改變order_detail表記錄的順序)，將order_detail表中的記錄存儲(chǔ)到od_new表中(表結(jié)構(gòu)與order_detail表完全相同);最后將程序保存為prog1.prg，并執(zhí)行該程序。

　　接著再利用 Visual Foxpro的"快速報(bào)表"功能建立一個(gè)的簡(jiǎn)單報(bào)表，該報(bào)表內(nèi)

　　容按順序含有order_detail表的訂單號(hào)、器件號(hào)、器件名、新單價(jià)和數(shù)量字段的值，將報(bào)表文件保存為report1.frx。

　　本題主要考核點(diǎn)：

　　程序的建立方法、程序中循環(huán)結(jié)構(gòu)的使用、SQL查詢語(yǔ)句的使用、記錄的修改方法;報(bào)表的建立方法等知識(shí)點(diǎn)

　　本題解題思路：

　　第一步：在VisualFoxPro主窗口下按組合鍵Ctrl+N，系統(tǒng)彈出"新建"對(duì)話框，在"文件類型"中選擇"程序"，再點(diǎn)擊"新建文件"按鈕，則系統(tǒng)彈出程序編輯窗口;

　　第二步：在彈出的窗中中輸入以下代碼：

　　SET TALK OFF &&在程序運(yùn)行時(shí)關(guān)閉命令結(jié)果的顯示

　　SELECT 訂單號(hào) FROM ORDER_LIST WHERE YEAR(訂購(gòu)日期)=2001;

　　INTO CURSOR CurTable

　　&&從ORDER_LIST中得到訂購(gòu)日期是2001年的所有訂單號(hào)，

　　&&并將結(jié)果集放入臨時(shí)表CurTable中

　　DO WHILE NOT EOF() &&遍歷臨時(shí)表CurTable中的每一個(gè)訂單號(hào)

　　UPDATE ORDER_DETAIL SET 新單價(jià)=單價(jià)*0.9;

　　WHERE 訂單號(hào)=CurTable.訂單號(hào)

　　&&如果ORDER_DETAIL中的訂單號(hào)與臨時(shí)表的記錄號(hào)相同時(shí);

　　&&對(duì)新單價(jià)進(jìn)行更新

　　SKIP

　　ENDDO

　　SELECT 訂單號(hào) FROM ORDER_LIST WHERE YEAR(訂購(gòu)日期)=2002;

　　INTO CURSOR CurTable

　　DO WHILE NOT EOF()

　　UPDATE ORDER_DETAIL SET 新單價(jià)=單價(jià)*0.9;

　　WHERE 訂單號(hào)=CurTable.訂單號(hào)

　　SKIP

　　ENDDO

　　CLOSE ALL

　　SET TALK ON

　　第三步：?jiǎn)螕?保存"工具欄按鈕，以文件名prog1.prg保存程序文件在考生文件夾下，并運(yùn)行程序。

　　第四步：在Visual FoxPro主窗口按下組合鍵Ctrl+N,系統(tǒng)彈出"新建"對(duì)話框，在"文件類型"中選擇"報(bào)表"，再點(diǎn)擊新建文件按鈕，系統(tǒng)彈出報(bào)表設(shè)計(jì)器

　　第五步：?jiǎn)螕糁鞔翱?報(bào)表"菜單下的"快速報(bào)表(Q)"，系統(tǒng)彈出"打開(kāi)"對(duì)話框，選擇考生文件夾下的order_detail.dbf表，單擊"確定"，系統(tǒng)彈出"快速報(bào)表"對(duì)話框，單擊"字段(F)"按鈕，系統(tǒng)彈出"字段選擇器"對(duì)話框，將訂單號(hào)、器件號(hào)、器件名、新單價(jià)、數(shù)量依次放入"選定字段"中，單擊"確定"，返回"快速報(bào)表"對(duì)話框，單擊"確定"按鈕后便生成了一個(gè)報(bào)表，將報(bào)表文件以文件名report1.frx保存在考生文件夾下。