Generic Class and Interface : Interface « Class « VB.Net






Generic Class and Interface

Generic Class and Interface
Imports System.Collections
Imports System.Collections.Generic

Public Class MainClass

   Public Shared Sub Main()
        Dim aCat As New Talker(Of Cat)(New Cat())
        Dim aDog As New Talker(Of Dog)(New Dog())
        aCat.TalkIt()
        aDog.TalkIt()
   End Sub
End Class

Public Interface ITalker
    Sub Talk()
End Interface

Public Class Talker(Of T As ITalker)
    Dim talkerItem As T

    Public Sub New(ByVal shooterItem As T)
        Me.talkerItem = shooterItem
    End Sub

    Public Sub TalkIt()
        Me.talkerItem.Talk()
    End Sub


End Class


Public Class Dog
    Implements ITalker

    Public Sub Talk() Implements ITalker.Talk
        Console.Out.WriteLine("Dog->Talk")
    End Sub
End Class

Public Class Cat
    Implements ITalker

    Public Sub Talk() Implements ITalker.Talk
        Console.Out.WriteLine("Cat->Talk")
    End Sub
End Class

           
       








Related examples in the same category

1.One Class implements two Interfaces which have the same name methodOne Class implements two Interfaces which have the same name method
2.Interface inherits interfaceInterface inherits interface
3.Class implements two interfaces
4.Implements an InterfaceImplements an Interface
5.Implement an InterfaceImplement an Interface
6.Define and use Interface AgeDefine and use Interface Age
7.Interface Inherits another InterfaceInterface Inherits another Interface
8.Define and use InterfaceDefine and use Interface
9.Implements Two InterfacesImplements Two Interfaces