Compartilhar via

Propriedade Module.ProcBodyLine (Access)

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

expressão. 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 seguintes constantes vbext_ProcKind .

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
  • Uma instrução de Função
  • Uma instrução Get de Propriedade
  • Uma instrução Property Let
  • Uma instrução Conjunto de Propriedades

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 devolve um número que identifica a linha na qual um procedimento é separado do procedimento anterior num 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.

  • Last updated on