Simple but robust web based file management system including user authentication

Public Class WebDriveUserInfo
#Region " Private Members "
    Private _Roles() As String
    Private _UserName As String
    Private _Password As String
    Private _MaxFileSize As Integer
    Private _UserID As Integer
#End Region
#Region " Properties "
    Public ReadOnly Property Roles() As String()
        Get
            Return _Roles
        End Get
    End Property
    Public ReadOnly Property UserName() As String
        Get
            Return _UserName
        End Get
    End Property
    Public Property UserID() As Integer
        Get
            Return _UserID
        End Get
        Set(ByVal Value As Integer)
            _UserID = Value
        End Set
    End Property
    Public ReadOnly Property Password() As String
        Get
            Return _Password
        End Get
    End Property
    Public ReadOnly Property MaxFileSize() As Integer
        Get
            Return _MaxFileSize
        End Get
    End Property
#End Region
#Region " Constructors "
    Private Sub New()
        'Hide
    End Sub
    Public Sub New(ByVal userName As String, ByVal userID As Integer, ByVal maxFileSize As Integer, ByVal roles() As String, Optional ByVal Password As String = "")
        _UserName = UserName.ToUpper
        _UserID = UserID
        _Password = Password
        _Roles = Roles
        _MaxFileSize = MaxFileSize
    End Sub
#End Region
End Class