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

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.