Observação: Desejamos fornecer o conteúdo da Ajuda mais recente no seu idioma da forma mais rápida possível. Esta página foi traduzida de forma automatizada e pode conter imprecisões ou erros gramaticais. Nosso objetivo é que este conteúdo seja útil para você. As informações foram úteis? Dê sua opinião no final desta página. Aqui está o artigo em inglês para facilitar a referência.
Executa um método de um objeto, ou define ou retorna uma propriedade de um objeto.
Sintaxe
CallByName ( objeto , procname, calltype [, ( argumentos)])
A sintaxe da função CallByName possui os seguintes argumentos:
Argumento | Descrição |
|---|---|
|
objeto |
Necessário. Variant (Objeto). O nome do objeto no qual a função será executada. |
|
procname |
Necessário. Variant (Cadeia). Uma expressão de cadeia de caracteres contendo o nome de uma propriedade ou método do objeto. |
|
CallType |
Necessário. Constante. Uma constante de tipo vbCallType representando o tipo de procedimento sendo chamado. |
|
argumentos () |
Opcional. Variant (Matriz). |
Comentários
A função CallByName é usada para obter ou definir uma propriedade ou chamar um método em tempo de execução usando um nome de cadeia de caracteres.
No exemplo a seguir, a primeira linha usa CallByName para definir a propriedade MousePointer de uma caixa de texto, a segunda linha obtém o valor da propriedade MousePointer e a terceira linha chama o método Mover para mover a caixa de texto :
CallByName Text1, "MousePointer", vbLet, vbCrosshair
Result = CallByName (Text1, "MousePointer", vbGet)
CallByName Text1, "Move", vbMethod, 100, 100
Exemplo
Observação: Exemplos a seguir demonstram o uso dessa função em um Visual Basic para módulo Applications (VBA). Para obter mais informações sobre como trabalhar com o VBA, selecione a Referência do desenvolvedor na lista suspensa ao lado de pesquisa e insira um ou mais termos na caixa de pesquisa.
Este exemplo usa a função CallByName para chamar o método Mover de um botão de comando.
O exemplo também usa um formulário (Form1) com um botão (Command1) e um rótulo (Label1). Quando o formulário é carregado, a propriedade legenda do rótulo é definida para o nome do método para invocar, nesse caso, "Mover". Quando você clica no botão, a função CallByName chama o método para alterar o local do botão.
Option Explicit
Private Sub Form_Load()
Label1.Caption = "Move"' Name of Move method.
End Sub
Private Sub Command1_Click()
If Command1.Left <> 0 Then
CallByName Command1, Label1.Caption, vbMethod, 0, 0
Else
CallByName Command1, Label1.Caption, vbMethod, 500, 500
End If
