怎样确定表中有重复记录?并得出重复记录的行号?
请帮助,不要耻笑.

您的第二段代码。。。。汗
怎么不加个PACK
我的代码是这样的，帮我看看哪儿有问题：
Use CLK_CLMC
zs=Reccount()
For i=1 To zs
GOTO i
XM=ALLTRIM(材料编号)
b=RECNO()
Locate For ALLTRIM(材料编号)=XM WHILE RECNO()<>b
If Found()
Messagebox(材料编号+"重复",0+48,"提示")
Else
Endif
Endfor
Messagebox("执行完毕，没有重复编号",0+48,"提示")