不用这么复杂。直接的修改SQL语句应该就可以了,然后判断它的返回记录数。strsql = "select * from 表1 where X-Part='" & Text1.Text & "'" 将SQL语句修改这个,然后判断它记录数是否大于1俺看你的似乎还有第二个条件,这样就可以 and 字段名 =‘’跟上面的一样的。加上去再执行SQL语句。大于1的记录数有重复数,等于1是没有重复,小于0是没有记录。