主题：请教使用怎么实现使用年限的问题

If e.DataCol.Name = "IP地址" AndAlso Not String .IsNullOrEmpty( e.NewValue) Then
    Dim arrNo() As String  = e.NewValue.Split(".")
    If arrNo.Length = 4 Then  
    For i  As Integer = 0 To arrNo.Length - 1
    arrNo(i) = arrNo(i).PadLeft(3,"0")
    Next
    e.DataRow("IP地址") = Join(arrNo,".")
    End If
End If


如果让IP地址输入不允许重复，怎么写这个代码

 例如第一列王敏， 电话是123456 手机1385214567  门禁号24考勤号85

第二列徐莹，电话56385678 手机 没某手机  考勤号85门禁114  

现在她们电脑更换了就是徐莹用了王敏电脑，王敏用了徐莹电脑，那我还能把考勤号，门禁号，手机号码互换。能否实现。