As operações de propriedade são muito parecidas com variáveis públicas, mas as propriedades têm mais controle.
As propriedades comumente usadas geralmente incluem "Get" e "Let". Essas duas operações podem especificar um atributo principal, como o seguinte trecho de código:
O código acima funciona de forma muito parecida com a variável Age. Ao operar variáveis como a instrução a seguir,
É como executar a propriedade Let e atribuir 4 a vNewValue. Ao operar variáveis como a instrução a seguir,
É para obter a propriedade, assim como executar Get property, e o valor correspondente é retornado por intAge. Portanto, podemos pensar desta forma:
O chamado atributo Get significa obter um determinado valor após a execução;
O chamado atributo Let significa tornar um determinado atributo igual a um determinado valor após a execução;
Mas até agora apenas mostramos que as propriedades funcionam de forma muito semelhante às variáveis padrão e ainda não tivemos tempo de obter mais controle sobre as propriedades. Então, vamos discutir isso abaixo.
Abra o projeto da seção anterior e faça as seguintes modificações na classe CDog:
Remova a variável Age da classe CDog;
Adicione o seguinte código:
Comparado com o código anterior, aqui está apenas uma ligeira modificação no código do atributo Let. Vamos fazer um pequeno teste, supondo que o usuário esteja tentando fazer:
Ou seja, execute a propriedade Let para que vNewValue seja igual a 30. No código, também detecta se vNewValue é menor ou igual a 50. Obviamente, 30 atende ao requisito, então o valor intAge na instância é igual a 30. Mas se ultrapassar 50, nada acontece e a propriedade sai sem que nenhum valor seja atribuído. Claro, também podemos fornecer um código de erro correspondente ou exibir uma caixa de diálogo de prompt.
Mude para a janela de código atrás do Form1;
Clique com o mouse na primeira linha do código onde a propriedade Age está definida e pressione F9;
Meu Cachorro.Idade=4
Clique com o mouse na primeira linha dos enunciados onde é obtido o código do atributo Idade e pressione F9;
MsgBoxMyDog.Name&"is"&MyDog.Age&"anos"
Agora vamos testar:
Pressione F5 para executar o programa;
Clique no botão Comando;
O código deve quebrar na linha de código onde o ponto de interrupção foi adicionado pressionando F9.
Quando o código for interrompido, pressione F8 para passo único e observe os resultados;
Agora entenda como eles funcionam? Observe como funcionam o "get" e o "let" da propriedade Age?
Na próxima seção discutiremos não apenas maneiras de usar mais propriedades, mas também como criá-las à vontade.
->