全国vfp改错专项(自己整理的).docVIP

改错： （1）SELECT 零件名称 FROM 零件信息 WHERE 零件号 = ; (SELECT 零件号 FROM 使用零件; GROUP BY 项目号 HAVING COUNT(项目号) = 3) ; ORDER BY 零件名称 ; INTO FILE results 其中，第1行中的=需改为IN；第3行中的GROUP BY 项目号需改为GROUP BY 零件号；第5行中的INTO FILE需改为TO FILE。 （2）************程序提供的************ *下面代码的功能是根据用户对列表框的选择结果构建字段列表，然后进一步构建select语句并据此为表格的相关属性设值。 *修改所有*** FOUND ***下面的一条语句。 *不能修改其他语句。不能增加语句，也不能删除语句。 s= f=.T. *************** FOUND *************** FOR i=1 TO thisform.List1.ColumnCount IF thisform.List1.Selected(i) IF f *************** FOUND *************** s=thisform.List1.value f=.F. ELSE *************** FOUND *************** s=s+ ， thisform.List1.value ENDIF ENDIF ENDFOR st=select s from orders into cursor tmp thisform.Grid1.RecordSource=st ****************************** 错误1：FOR i=1 TO thisform.List1.ColumnCount 修改为：FOR i=1 TO thisform.List1.ListCount 错误2：s=thisform.List1.value 修改为：s=thisform.List1.List(i) 错误3：s=s+thisform.List1.value 修改为：s=s+,+thisform.List1.List(i) （3）步骤1：打开程序文件two.prg。 步骤2：修改程序中的错误命令。 第1处错误改为：from employee p join employee c 第2处错误改为：on p.组别=c.组别where p.职务=组长and c.组别=p.组别 步骤3：保存并运行程序，查看程序的运行结果。 （4）步骤1：打开程序four.prg，修改语句如下： 第一处： WHILE改为WHERE。 第二处： OPEN改为USE。 第三处： WHERE改为FOR。 第四处： 填入num = num ＋1。 （5）OPEN DATABASE 宾馆 SELECT 客户.客户号,身份证,姓名,工作单位; FROM 客户 JOIN 入住; WHERE 入住日期 IN; ( SELECT ; FROM 客户,入住; WHERE 姓名 = 姚小敏); TO TABLE TABC ******************************* 错误1：修改为 FROM 客户 JOIN 入住 ON 客户.客户号 = 入住.客户号; 错误2：修改为 ( SELECT 入住日期; 错误3：修改为 WHERE 客户.客户号 = 入住.客户号 AND 姓名 = 姚小敏); 错误4：修改为INTO TALBE TABC 保存并运行程序。 （6）步骤1：打开考生文件夹下的表单six.scx，登录按钮中的代码如下。 **********登录按钮的Click事件代码********** USE 用户表 GO TOP flag=0 下面语句有错误 WHILE .NOT. EOF() IF Alltrim(用户名)==Alltrim(Thisform.Text1.Value) IF Alltrim(口令)==Alltrim(Thisform.Text2.Value) WAIT 欢迎使用 WINDOW TIMEOUT 2 ELSE WAIT 口令错误 WINDOW TIMEOUT 2 ENDIF flag=1 EXIT ENDIF 下面语句有错误 NEXT ENDDO 下面语句有错误 CASE FL