3.綜合應用題

　　(1)請編寫名稱為change_c的程序并執行。該程序實現下面的功能：將雇員工資表salarys進行備份，備份文件名為baksals.dbf。利用“人事部”向“財務部”提供的雇員工資調整表c_salary1的“工資”，對salarys表的“工資”進行調整(請注意：按“雇員號”相同進行調整，并且只是部分雇員的工資進行了調整，其他雇員的工資不動)。最后將salarys表中的記錄存儲到od_new表中(表結構與salarys表完全相同)。

　　(2)設計一個文件名為form2的表單，其中包含“調整”(名稱Command1)和“退出”(名稱Command2)兩個命令按鈕。

　　單擊“調整”命令按鈕時，調用change_c命令程序實現工資調整。

　　單擊“退出”命令按鈕時，關閉表單。

　　注意：在兩個命令按鈕中均只有一條命令，不可以有多余命令。

　　【參考答案】

　　(1)具體步驟如下：

　�、� 在“命令”窗口輸入命令：MODIFY COMMAND change_c。

　　② 進入程序編輯器，編寫如下程序段：

　　****change_c.prg文件中的程序段****

　　SET TALK OFF

　　SET SAFETY OFF

　　SELECT * FROM salarys INTO TABLE baksals

　　USE c_salary1

　　DO WHILE NOT EOF()

　　UPDATE salarys SET工資=c_salary1.工資;

　　WHERE salarys雇員號=c_salary1.雇員號

　　SKIP

　　ENDDO

　　SELECT * FROM SALARYS INTO TABLE od_new

　　CLOSE ALL

　　SET TALK ON

　　SET SAFETY ON

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

　�、� 保存文件，在“命令”窗口輸入命令：DO change_c，運行該文件。

　　(2)具體步驟如下：

　�、� 在“命令”窗口輸入命令：CREATE FORM form2。

　�、� 進入表單設計器，根據題意，在表單中添加兩個命令按鈕，并在屬性面板中，分別修改兩個命令按鈕的Caption屬性值為“調整”和“退出”，

　　③ 雙擊“調整”(Command1)命令按鈕，進入事件編輯窗口，在CLICK事件中編寫如下代碼：

　　****“調整”命令按鈕的Click事件代碼****

　　DO change_c

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

　�、� 以同樣的方法為“退出”命令按鈕編寫Click事件代碼：

　　****“退出”命令按鈕的Click事件代碼****

　　ThisForm.Release

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

　�、� 保存表單完成設計。

　　【試題解析】

　　本試題(1)小題主要是考查SQL的查詢、定義和更新語句，在更新數據表中的記錄時，可利用DO循環對表中的記錄進行逐條更新;(2)小題為表單的基本設計，在命令按鈕中調用程序的命令，直接通過DO命令來實現。