如何从后向前找出重复记录 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

For Each dr0 As DataRow In DataTables("考评人权限").Select("","序号 desc")

If Tables("考评人权限").DataTable.Compute("Count(考评人编号)"," 考评人编号 = '"& dr0("考评人编号") &"'") > 1 Then

dr0 = DataTables("考评人权限").Find(" 考评人编号 = '"& dr0("考评人编号") &"' " ) '找出要查找姓名的人对应的DataRow

Dim po As Integer = Tables("考评人权限").FindRow(dr0) '找出该DataRow在Table中的位置

Tables("考评人权限").Position = po '选定

Return '返回

Exit For

End If

Exit For

请教老师，我想定位到最后一个考评人编号重复的记录，但不知道错在哪里？

[此贴子已经被作者于2021/4/2 10:33:29编辑过]

主题：如何从后向前找出重复记录