''' <summary>
    ''' Create DotNetNuke User
    ''' </summary>
    ''' <param name="portalId"></param>
    ''' <param name="userName"></param>
    ''' <param name="pwd"></param>
    ''' <param name="email"></param>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Function CreateUser(portalId As Integer, userName As String, pwd As String, email As String) As DotNetNuke.Security.Membership.UserCreateStatus
        Dim objInfo As New UserInfo
        With objInfo
            .PortalID = portalId
            .Username = userName
            .DisplayName = userName
            .Membership.Password = pwd
            .Email = email
        End With
        Return UserController.CreateUser(objInfo)
    End Function