【正确答案】正确答案:(1)步骤1:在命令窗口执行命令:MODIFY COMMANDmodi1,打开程序文件,文件中的命令代码如下: SET TALK OFF USE student LOCATE FOR 政治面目="群众" "**********error********** DO WHILE.NOT.FOUND() IF性别="男" CONT INUE **********error********** BREAK ENDIF ?姓名,班级 **********error********** SKIP ENDDO USE SET TALK ON 修改程序中的错误行,修改后的程序如下: SET TALK OFF USE student &&打开student表LOCATE FOR 政治面目="群众"&&查找当前记录的“政治面目”为“群众”DO WHILE FOUND() &&循环条件为找到“政治面目”为“群众”的记录时进入循环 IF 性别="男" && 如果性别为“女”,继续执行下面的语句,否则执行ENDIF语句之后的语句 CONTINUE &&返回到循环体起始位置继续重新判断下一条记录“政治面目”值是否为“群众”LOOP &&返回到循环体起始位置,即DO WHILE处重新判断,不再执行后面的语句ENDIF &&当IF处条件不成立时,直接执行该语句后面的命令 ? 姓名,班级 && 当前面的IF条件语句成立时,执行该语句,显示当前记录的“姓名”和“班级”值 CONTINUE &&返回到循环体起始位置继续重新判断下一条记录“政治面目”值是否为“群众”ENDDO &&当DO WHILE处条件不成立时,直接退出循环体,执行该语句后面的命令USE &&关闭当前打开的表SET TALK ON 步骤2:保存文件修改,在命令窗口执行命令:
DO modil.prg
,执行程序文件。 (2)步骤1:在命令窗口执行命令:
MODIFY COMMAND Msprog
,打开程序文件编辑器。 步骤2:在程序文件编辑器中输入如下代码(相关SOL查询语句是通过查询设计器生成): UPDATE student SET 年龄=YEAR(DATE())-YEAR(出生日期) SELECT STUDENT.政治面目,COUNT(STUDENT.学号)AS人数,AVG(STUDENT.年龄) AS 平均年龄; FROM student; GROUP BY student.政治面目; INTO TABLE sqlresults.dbf 步骤3:保存文件修改,在命令窗口执行命令:
DO sprog.prg
,执行程序文件。