求vfp一道题答案!
来源:百度知道 编辑:UC知道 时间:2024/05/12 15:18:03
下面这道题空白处补充完整~~
设有GZZU.DBF数据库,其中包括"姓名"字段并且以它为关键字进行了索引,索引文件为GZXM.IDX。因某种误操作,使该数据库中有一些紧挨着的重复记录。下面是一个能对该数据库文件进行检查,并把重复记录删除的命令文件,其中空白部分,请你填充完善。
SET TALK OFF
USE GZZU INDEX GZXM
XM=姓名
SKIP
DO WHILE ①_______
IF ②_______
DELETE
ELSE
③________
ENDI ?NDIF
④_________
ENDDO
⑤_________
USE
RETURN
设有GZZU.DBF数据库,其中包括"姓名"字段并且以它为关键字进行了索引,索引文件为GZXM.IDX。因某种误操作,使该数据库中有一些紧挨着的重复记录。下面是一个能对该数据库文件进行检查,并把重复记录删除的命令文件,其中空白部分,请你填充完善。
SET TALK OFF
USE GZZU INDEX GZXM
XM=姓名
SKIP
DO WHILE ①_______
IF ②_______
DELETE
ELSE
③________
ENDI ?NDIF
④_________
ENDDO
⑤_________
USE
RETURN
完整程序如下:
SET TALK OFF
USE GZZU INDEX GZXM
XM=姓名
SKIP
DO WHILE .NOT. EOF() -----------------①
IF XM==姓名 ---------------------②
DELETE
ELSE
XM=姓名 ---------------------------③
ENDIF
SKIP ---------------------------④
ENDDO
PACK ----------------⑤
USE
RETURN