vfp试题??急求高手解答!!

打开D:\SOURCE\VFP03\DHTJ.PRG程序文件,程序要完成的功能是从 “DH.DBF”数据表中查找订货人“邓丽”,如果查到,则显示其订货总数量,否则显示“此人没订货!”。根据要求修改该程序文件,将缺少的命令语句补上。并以原文件名保存在原来位置。
程序DHTJ.PRG内容如下
SET DEFA TO D:\SOURCE\VFP03
CLEAR
USE DH.DBF
ZSL=0
LOCATE ALL FOR订货人="邓丽"
IF FOUND()
DO WHILE (1)
(2)
CONTINUE
ENDDO
? "邓丽订货总数量是:",STR(ZSL)
(3)
?"此人没订货!"
ENDIF
USE

SET DEFA TO D:\SOURCE\VFP03
CLEAR
USE DH.DBF
ZSL=0
LOCATE ALL FOR订货人="邓丽"
IF FOUND()
DO WHILE NOT EOF()
ZSL=ZSL+ 订货数量
CONTINUE
ENDDO
? "邓丽订货总数量是:",STR(ZSL)
ELSE
?"此人没订货!"
ENDIF
USE
温馨提示:答案为网友推荐,仅供参考
第1个回答  2010-08-27
楼上的回答完全正确!
第2个回答  2010-09-02
完全可以用楼上的答案啊