Nota
O acesso a esta página requer autorização. Pode tentar iniciar sessão ou alterar os diretórios.
O acesso a esta página requer autorização. Pode tentar alterar os diretórios.
A propriedade ProcBodyLine retorna o número da linha de início do corpo de um procedimento especificado em um módulo padrão ou em um módulo classe. Long somente leitura.
Sintaxe
mais simples. ProcBodyLine (ProcName, ProcKind)
expressão Uma variável que representa um objeto Module .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| ProcName | Obrigatório | String | O nome de um procedimento no módulo. |
| ProcKind | Obrigatório | vbext_ProcKind | O tipo de procedimento. Consulte a seção Comentários para obter as configurações possíveis. |
Comentários
O argumento ProcKind pode ser uma das constantes de vbext_ProcKind a seguir.
| Constante | Descrição |
|---|---|
| vbext_pk_Get | Um procedimento Property Get. |
| vbext_pk_Let | Um procedimento Property Let. |
| vbext_pk_Proc | Um procedimento Sub ou Function. |
| vbext_pk_Set | Um procedimento Property Set. |
O corpo de um procedimento começa com a definição do procedimento, indicada por uma das instruções a seguir:
- Uma instrução Sub
- A Instrução de função
- Uma instrução Property Get
- Uma instrução Property Let
- Uma instrução Property Set
A propriedade ProcBodyLine retorna um número que identifica a linha de início da definição do procedimento. Por outro lado, a propriedade ProcStartLine retorna um número que identifica a linha na qual um procedimento é separado do procedimento anterior em um módulo. Qualquer comentário ou constante de compilação que preceda a definição do procedimento (o corpo de um procedimento) é considerada parte do procedimento, mas a propriedade ProcBodyLine a ignora.
Observação
A propriedade ProcBodyLine trata os procedimentos Sub e Function de modo semelhante, mas distingue cada tipo de procedimento Property.
Exemplo
O exemplo a seguir exibe uma mensagem que indica a linha de início da definição do procedimento.
Dim strForm As String
Dim strProc As String
strForm = "Products"
strProc = "Products_Subform_Enter"
MsgBox "The definition of the " & strProc & " procedure begins on line " & _
Forms(strForm).Module.ProcStartLine(strProc, vbext_pk_Proc) & "."
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.