问题 问答题

(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 雇员号=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属性值为“调整”,和“退出”,如图3-72所示。

双击“调整”(Command1)命令按钮,进入事件编辑窗口,在Click事件中编写如下代码:

****命令按钮Command1(调整)的Click事件代码****

DO change_ c

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

以同样的方法为“退出”命令按钮编写Click事件代码:

****命令按钮Command2(退出)的Click事件代码****

Thisform.Release

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

保存表单完成设计。

解析:

本大题1小题主要是考查SQL的查询、定义和更新语句,在更新数据表中的记录时,可利用 DO循环对表中的记录进行逐条更新;2小题为表单的基本设计,在命令按钮中调用程序的命令,直接通过 DO命令来实现。

选择题
选择题