Login Help

I have converted the Cabana project from C# to VB.net and getting the next error.

LoginManager is required but failed to find one.

Using this method

        Private Sub Login(ByVal pManager As PersistenceManager, ByVal pCredential As ILoginCredential)
            Dim aSessionBundle As SessionBundle = Nothing
            If pManager.IsLoggedIn Then ' Don't do it again.
                Return
            End If
            Try
                aSessionBundle = pManager.Login(pCredential)
                ConfirmConnected(pManager)
                ConfirmAuthenticated(aSessionBundle, pCredential)
            Catch ex As Exception
                LoginErrorHandler(pManager, ex)
            End Try
            ' Only get here if pManager.Login succeeded.
            SetLoggedInUser(aSessionBundle)
        End Sub

If I call this login method the pmanager is there.
Please Help me.