我有一表共有16个字段，若同一条记录中的16个字段中一出现有重复记录就想删除这条记录，用了很笨的方法，请问如何简化代码，谢谢（代码下附）
USE 原表
记录数=RECCOUNT()
For I= 1 To 记录数
   IF 列1=列2 or 列1=列3 or 列1=列4 or 列1=列5 or 列1=列6 or 列1=列7 or 列1=列8  or 列2=列3  or 列2=列4 or 列2=列5 or 列2=列6 or 列2=列7 or 列2=列8 or 列3=列4  or 列3=列5 or 列3=列6 or 列3=列7 or 列3=列8 or  列4=列5 or 列4=列6  or 列4=列7  or 列4=列8  or 列5=列6  or 列5=列7 or 列5=列8 or 列6=列7 or 列6=列8 or  列7=列8     &&后面好长好长
    DELETE
   PACK
    ELSE   
   ENDIF
ENDFOR
MESSAGEBOX('本 次 运 行 结 束 ！！',64,'信息提示')

是整数数值型
这几行代码只是删除8个字段的，若16个字段甚至字段更多那这个or行的代码太麻烦并且很容易出错，谢谢

哦，像以下的第一行要删除，第三行要删除
列1    列2    列3    列4    列5    列6    列7    列8
-6    -24    2    -8    -24    -2    -16    -8
-6    -24    2    -10    -22    -2    -14    -10
-6    -24   -2    -12    -20    -2    -12    -12
-6    -24    2    -17    -19    -2    -11    -13


[ 本帖最后由 fdxxhjc 于 2015-3-24 09:02 编辑 ]

是的
同一记录中不能出现一种或一种以上的相等数值

先生不好意思，我看不懂

记录中有负数的

哦，像以下的第一行要删除，第三行要删除
列1    列2    列3    列4    列5    列6    列7    列8
-6    -24    2    -8    -24    -2    -16    -8
-6    -24    2    -10    -22    -2    -14    -10
-6    -24   -2    -12    -20    -2    -12    -12
-6    -24    2    -17    -19    -2    -11    -13

先生您好，就以8列为例，我运用您给的代码，可运行下来“原表”中没有删除一条记录中有相同数值的这一行，谢谢先生指点（原表及代码在附件中），谢谢