SELECT A
USE cj2004b541
DO WHILE NOT EOF()
IF cjj = "E" THEN
UPDATE cj2004b541 SET pore = "优秀"
ELSE
IF cjj = "P" THEN
UPDATE cj2004b541 SET pore = "合格"
ENDIF
ENDIF
SKIP
ENDDO
USE
结果是pore字段中的内容都是“合格”
即使cjj的内容为"E"的字段
...全文
605打赏收藏
看看这段程序,帮我找找问题?
SELECT A USE cj2004b541 DO WHILE NOT EOF() IF cjj = "E" THEN UPDATE cj2004b541 SET pore = "优秀" ELSE IF cjj = "P" THEN UPDATE cj2004b541 SET pore = "合格" ENDIF ENDIF SKIP ENDDO USE 结果是pore字段中的内容都是“合格” 即使cjj的内容为"E"的字段
SELECT A
USE cj2004b541
DO WHILE NOT EOF()
IF cjj = "E" THEN
replace pore WITH "优秀"
ELSE
IF cjj = "P" THEN
replace pore WITH "合格"
ENDIF
ENDIF
SKIP
ENDDO
USE