2013年3月計算機等考二級VB沖刺試題及答案9

　　3.綜合應(yīng)用題

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

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

　　單擊“調(diào)整”命令按鈕時，調(diào)用change_c命令程序?qū)崿F(xiàn)工資調(diào)整。

　　單擊“退出”命令按鈕時，關(guān)閉表單。

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

　　【參考答案】

　　(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。

　　② 進入表單設(shè)計器，根據(jù)題意，在表單中添加兩個命令按鈕，并在屬性面板中，分別修改兩個命令按鈕的Caption屬性值為“調(diào)整”和“退出”，

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

　　****“調(diào)整”命令按鈕的Click事件代碼****

　　DO change_c

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

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

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

　　ThisForm.Release

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

　�、� 保存表單完成設(shè)計。

　　【試題解析】

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