Definição de propriedades

    Public Property comp() As Single
        Get 
            Return Comprimento
        End Get
        Set(ByVal value As Single)
            Comprimento = value
        End Set
    End Property

Get - uma função que permite obter (get) o valor do campo de dados visado;

Set - um procedimento para definir (set) ou modificar o valor do mesmo campo de dados.

Nota: Ao escrevermos Get e teclarmos Enter, o Visual Basic define todo o resto da estrutura da propriedade, incluindo também a parte Set.

O código da função Get da propriedade Comp() consiste, neste caso, apenas em:
           Return Comprimento
- trata-se, simplesmente, de devolver o valor que estiver no campo Comprimento.

O cabeçalho do procedimento Set:
           Set(ByVal value As Single)
- inclui o parâmetro value que se destina a fazer passar um valor (ByVal) para atribuir ao campo visado (neste caso, comprimento).
Isoo é feito com a instrução: Comprimento=value.