제네릭 컬렉션에 대한 인터페이스에서 가변성 사용(Visual Basic)

공변 인터페이스를 사용하면 해당 메서드가 인터페이스에 지정된 형식보다 더 많은 파생 형식을 반환할 수 있습니다. 반공변 인터페이스를 사용하면 해당 메서드가 인터페이스에 지정된 것보다 덜 파생된 형식의 매개 변수를 수락할 수 있습니다.

.NET Framework 4에서는 여러 기존 인터페이스가 공변성 및 반공변성이 되었습니다. 여기에는 IEnumerable<T>과 IComparable<T>이 포함됩니다. 이렇게 하면 파생 형식의 컬렉션에 대한 기본 형식의 제네릭 컬렉션과 함께 작동하는 메서드를 다시 사용할 수 있습니다.

.NET Framework의 변형 인터페이스 목록은 제네릭 인터페이스의 분산(Visual Basic)을 참조하세요.

제네릭 컬렉션 변환

다음 예제에서는 인터페이스에서 공변성 지원의 이점을 보여 줍니다 IEnumerable<T> . 메서드는 PrintFullName 형식의 IEnumerable(Of Person) 컬렉션을 매개 변수로 허용합니다. 그러나 IEnumerable(Of Person)가 Employee를 상속하기 때문에 Person 형식의 컬렉션에 다시 사용할 수 있습니다.

' Simple hierarchy of classes.
Public Class Person
    Public Property FirstName As String
    Public Property LastName As String
End Class

Public Class Employee
    Inherits Person
End Class

' The method has a parameter of the IEnumerable(Of Person) type.
Public Sub PrintFullName(ByVal persons As IEnumerable(Of Person))
    For Each person As Person In persons
        Console.WriteLine(
            "Name: " & person.FirstName & " " & person.LastName)
    Next
End Sub

Sub Main()
    Dim employees As IEnumerable(Of Employee) = New List(Of Employee)

    ' You can pass IEnumerable(Of Employee),
    ' although the method expects IEnumerable(Of Person).

    PrintFullName(employees)

End Sub

제네릭 컬렉션 비교

다음 예제는 IComparer<T> 인터페이스의 반공변성 지원이 어떻게 이점을 제공하는지를 보여 줍니다. PersonComparer 클래스가 IComparer(Of Person) 인터페이스를 구현합니다. 하지만 Employee이(가) Employee을(를) 상속하므로 이 클래스를 다시 사용하여 Person 형식의 객체 시퀀스를 비교할 수 있습니다.

' Simple hierarchy of classes.
Public Class Person
    Public Property FirstName As String
    Public Property LastName As String
End Class

Public Class Employee
    Inherits Person
End Class
' The custom comparer for the Person type
' with standard implementations of Equals()
' and GetHashCode() methods.
Class PersonComparer
    Implements IEqualityComparer(Of Person)

    Public Function Equals1(
        ByVal x As Person,
        ByVal y As Person) As Boolean _
        Implements IEqualityComparer(Of Person).Equals

        If x Is y Then Return True
        If x Is Nothing OrElse y Is Nothing Then Return False
        Return (x.FirstName = y.FirstName) AndAlso
            (x.LastName = y.LastName)
    End Function
    Public Function GetHashCode1(
        ByVal person As Person) As Integer _
        Implements IEqualityComparer(Of Person).GetHashCode

        If person Is Nothing Then Return 0
        Dim hashFirstName =
            If(person.FirstName Is Nothing,
            0, person.FirstName.GetHashCode())
        Dim hashLastName = person.LastName.GetHashCode()
        Return hashFirstName Xor hashLastName
    End Function
End Class

Sub Main()
    Dim employees = New List(Of Employee) From {
        New Employee With {.FirstName = "Michael", .LastName = "Alexander"},
        New Employee With {.FirstName = "Jeff", .LastName = "Price"}
    }

    ' You can pass PersonComparer,
    ' which implements IEqualityComparer(Of Person),
    ' although the method expects IEqualityComparer(Of Employee)

    Dim noduplicates As IEnumerable(Of Employee) = employees.Distinct(New PersonComparer())

    For Each employee In noduplicates
        Console.WriteLine(employee.FirstName & " " & employee.LastName)
    Next
End Sub

참고하십시오

• 제네릭 인터페이스의 분산(Visual Basic)