Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Modifica a definição de um procedimento num módulo de formulário ou módulo de classe para tornar o procedimento callable a partir de módulos que estão fora da classe, mas parte do projeto no qual a classe está definida. Os procedimentos amigáveis não podem ser utilizados em módulos padrão.
Sintaxe
[ Privado | Amigo | Público ] [ Estático ] [ Sub | Função | Propriedade ] procedurename
O nome do procedimento necessário é o nome do procedimento a tornar visível em todo o projeto, mas não é visível para os controladores da classe.
Comentários
Os procedimentos públicos numa classe podem ser chamados a partir de qualquer lugar, 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 a partir do projeto no qual a classe em si é definida.
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 procedimentos, não variáveis ou tipos. Os procedimentos numa turma podem aceder aos procedimentos de Amigo de todas as outras classes num projeto. Os procedimentos de amigos não aparecem na biblioteca de tipos da turma. Um procedimento de Amigo não pode chegar atrasado.
Exemplo
Quando colocado num módulo de classe, o código seguinte torna a variável de membro dblBalance acessível a todos os utilizadores da classe no projeto. Qualquer utilizador da classe pode obter o valor; apenas 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.