Propriedades e Métodos de Classe

Uma classe pode conter propriedades e métodos.

Property Let permite que o usuário final atribua um valor a uma variável de classe privada.

Property Get é uma propriedade somente leitura usada para recuperar uma variável de classe privada.

Os métodos permitem que a classe execute a operação desejada pelo usuário. Os Métodos não são nada além de Funções ou Sub-rotinas.

Exemplo:

No exemplo abaixo, usamos Propriedades e Métodos para encapsular variáveis privadas.

Class Comp
    Private modStrType
    Public Property Let ComputerType(strType)
        modStrType = strType
    End Property
    Public Property Get ComputerType
        ComputerType = modStrType
    End Property
    Public Function Funct1
        'Add business logic using class variables
    End Function
    Public Sub Sub1
        'Add business logic using class variables
    End Sub
End Class

Set objComp = new Comp
objComp.ComputerType = "Mac" 'Let Property
str1 = objComp.ComputerType 'Get Property. Here, the value of str1 is Mac
objComp.Funct1
objComp.Sub1