Palavra-chave amigo

Modifica a definição de um procedimento em um módulo de formulário ou módulo de classe para tornar o procedimento callable de módulos que estão fora da classe, mas parte do projeto no qual a classe é definida. Os procedimentos amigos não podem ser usados em módulos padrão.

Sintaxe

[ Privado | Amigo | Público ] [Estático] [ Sub | Função | Propriedade ] nome do procedimento

O nome do procedimento necessário é o nome do procedimento a ser tornado visível em todo o projeto, mas não visível para os controladores da classe.

Comentários

Procedimentos públicos em uma classe podem ser chamados de qualquer lugar, até mesmo por controladores de instâncias da classe. Declarar um procedimento Privado impede que os controladores do objeto chamem o procedimento, mas também impede que o procedimento seja chamado de dentro do projeto no qual a classe em si é definida.

O amigo torna o procedimento visível em todo o projeto, mas não para um controlador de uma instância do objeto. O amigo só pode aparecer em módulos de formulário e módulos de classe e só pode modificar nomes de procedimento, não variáveis ou tipos. Os procedimentos em uma classe podem acessar os procedimentos friend de todas as outras classes em um projeto. Os procedimentos amigos não aparecem na biblioteca de tipos de sua classe. Um procedimento amigo não pode ser associado tarde.

Exemplo

Quando colocado em um módulo de classe, o código a seguir torna a variável membro dblBalance acessível a todos os usuários da classe dentro do projeto. Qualquer usuário da classe pode obter o valor; somente o código dentro do projeto pode atribuir um valor a essa variável.

Private dblBalance As Double 
 
Public Property Get Balance() As Double 
 Balance = dblBalance 
End Property 
 
Friend Property Let Balance(dblNewBalance As Double) 
 dblBalance = dblNewBalance 
End Property 

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.