主题：[求助]核实表存在的重复内容

If e.DataCol.Name = "工作站"  Or e.DataCol.Name = "职务"  Then
    If e.DataRow.IsNull("工作站") AndAlso e.DataRow.IsNull("职务") Then Return
    Dim fl As String = IIF(e.DataCol.Name = "工作站","工作站='" & e.NewValue & "' and 职务='" & e.DataRow("职务") & "'","工作站='" & e.DataRow("工作站") & "' and 职务='" & e.NewValue  & "'")
    If e.DataTable.Find(fl) IsNot Nothing  Then
        e.Cancel = True
        MessageBox.Show("工作站 和 职务 不能重复!")
    End If
End If