主题：[求助]

想问一有谁知道狐表能否对于重复值给予颜色标识提醒?例如有一列姓名,如果出现重复的人名则所有重复的名字都用红字显示,如果可行,那么要怎么写代码?在此先谢谢答复人了!

 表属性 Drawcell事件，代码

 

e.Table.DataTable.AddUserStyle("红色", Color.Red, Color.Black)
If e.Col.Name = "第一列" Then
    Dim fdr As DataRow = e.Table.DataTable.Find("第一列 = '" & e.Row(e.Col.Name) & "' and _Identify <> " & e.Row("_Identify"))
    If fdr IsNot Nothing Then
        e.Style = "红色"
    End If
End If

经实践可行,太感谢了!