Propriedade Module.ProcCountLines (Access)
A propriedade ProcCountLines retorna o número de linhas em um procedimento especificado de um módulo padrão ou de um módulo classe. Long somente leitura.
Sintaxe
expressão. ProcCountLines (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 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 procedimento começa com qualquer comentário e constante de compilação que esteja imediatamente antes da definição do procedimento, indicado por uma das instruções a seguir:
- Uma instrução Sub
- Uma instrução Function
- Uma instrução Obter Propriedade
- Uma instrução Property Let
- Uma instrução Conjunto de Propriedades
A propriedade ProcCountLines retorna o número de linhas em um procedimento, começando com a propriedade ProcStartLine e terminando com a linha que encerra o procedimento. O procedimento pode ser encerrado com End Sub, End Function ou End Property.
Observação
A propriedade ProcCountLines 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 o número de linhas em um procedimento específico.
Dim strForm As String
Dim strProc As String
strForm = "Products"
strProc = "Form_Activate"
MsgBox "There are " & Forms(strForm).Module.ProcCountLines(strProc, vbext_pk_Proc) & _
" lines in the " & strProc & " procedure."
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.