主题：查找重复行

    Case "重复考勤辅助"

        

        If dr.IsNull("重复考勤辅助") = False Then

            Dim dr2 As DataRow

            dr2 = DataTables("考勤表").Find("[重复考勤辅助] = '" & dr("重复考勤辅助")& "'")

            If dr2 IsNot Nothing Then

                dr("重复考勤提示") = "不重复"

            Else

                dr("重复考勤提示") = "重复"

            End If   

        End If

最后两行记录。明明是重复行，重复判断列里在， 提示不重复。怎么回事？