UnityContainer implemented in Vb.Net

UnityContainer

Imports Unity

Module Module1
    Public Interface IMyFirstInterface
        Sub Test()
    End Interface

    Public Class MyFirstClass
        Implements IMyFirstInterface
        Private ReadOnly secondInterface As IMySecondInterface
        Sub New(ByVal secondInterface As IMySecondInterface)
            Me.secondInterface = secondInterface
        End Sub

        Public Sub Test() Implements IMyFirstInterface.Test
            Console.WriteLine("Here, In Test Method.")
            secondInterface.Test2
        End Sub
    End Class

    Public Interface IMySecondInterface
        Sub Test2()
    End Interface

    Public Class MySecondClass
        Implements IMySecondInterface
        Public Sub Test2() Implements IMySecondInterface.Test2
            Console.WriteLine("Here, In Test2 Method.")
        End Sub
    End Class

    Sub Main()
        Dim container As IUnityContainer
        container = New UnityContainer

        container.RegisterType(Of IMyFirstInterface, MyFirstClass)
        container.RegisterType(Of IMySecondInterface, MySecondClass)

        Dim minhaClasse As IMyFirstInterface
        minhaClasse = container.Resolve(Of IMyFirstInterface)
        minhaClasse.Test

    End Sub
End Module