Orientação a Objeto em Vb.net (Get, Set e Construtor )

'Nome da Classe
Public Class Cliente


   'Nome dos atributos, SHARED é usado para o 
'atributo não perder o valor depois do fechamento
'de   um  formulário.
    Private Shared _nome As String
    Private Shared _email As String

' construtor padrão
    Public Sub New(ByVal nome As String, ByVal email As String)
        Me.Nome = nome
        Me.Email = email
    End Sub


' gets e sets
    Public Property Nome() As String
        Get
            Return _nome
        End Get
        Set(ByVal Valor As String)
            _nome = Valor
        End Set
    End Property

    Public Property Email() As String
        Get
            Return _email
        End Get
        Set(ByVal Valor As String)
            _email = Valor
        End Set
    End Property

End Class