Linq 使用Distinct去重复项

    Class DimEqualityComparer
        Inherits EqualityComparer(Of Dimension)

        Public Overrides Function Equals(ByVal d1 As Dimension, ByVal d2 As Dimension) As Boolean
            If d1 Is Nothing AndAlso d2 Is Nothing Then
                Return True
            ElseIf d1 Is Nothing OrElse d2 Is Nothing Then
                Return False
            ElseIf d1.DimensionText = d2.DimensionText Then
                Return True
            Else
                Return False
            End If
        End Function

        Public Overrides Function GetHashCode(ByVal d As Dimension) As Integer
            Return d.DimensionText.GetHashCode()
        End Function

    End Class


Public Class ss_Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

       BiaoZhus = BiaoZhus.Distinct(New DimEqualityComparer)

   End Sub

End Class
原文地址:https://www.cnblogs.com/rf8862/p/12274550.html