本文共 760 字，大约阅读时间需要 2 分钟。

随手练习． 写一个Comparer 类，比较两个字串包含即相等．

Private Sub TestStringCmp_Contain()        Dim list1 = New List(Of String)()        list1.AddRange({
  "ab", "cd", "ef"})        Dim list2 = New List(Of String)()        list1.AddRange({
  "a", "c", "e"})        list1.AsEnumerable().Union(list2.AsEnumerable(), New Comparer()).ToList().ForEach(Sub(o) Console.WriteLine(o))＇结果＇ab＇cd＇ef    End Sub    Public Class Comparer : Inherits System.Collections.Generic.EqualityComparer(Of String)        Public Overloads Overrides Function Equals(ByVal x As String, ByVal y As String) As Boolean            Return x.Contains(y)        End Function        Public Overloads Overrides Function GetHashCode(ByVal obj As String) As Integer            Return 1        End Function    End Class

转载地址：http://eimdi.baihongyu.com/