Propiedad Module.ProcCountLines (Access)

  • Artículo

La propiedad ProcCountLines devuelve el número de líneas de un procedimiento especificado de un módulo estándar o un módulo de clase. Long de sólo lectura.

Sintaxis

expresión. ProcCountLines (ProcName, ProcKind)

Expresión Variable que representa un objeto Module .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
ProcName Obligatorio String El nombre de un procedimiento del módulo.
ProcKind Obligatorio vbext_ProcKind El tipo de procedimiento. Vea la sección Comentarios para los valores posibles.

Comentarios

El argumento ProcKind puede ser una de las siguientes constantes de vbext_ProcKind .

Constante Descripción
vbext_pk_Get Un procedimiento Property Get.
vbext_pk_Let Un procedimiento Property Let.
vbext_pk_Proc Un procedimiento Sub o Function.
vbext_pk_Set Un procedimiento Property Set.

El procedimiento comienza por los comentarios y las constantes de compilación que preceden inmediatamente a la definición de procedimiento, indicada por una de las siguientes instrucciones:

  • Una instrucción Sub
  • Una instrucción Function
  • Una instrucción Get de propiedad
  • Una instrucción Let de propiedad
  • Una instrucción Property Set

La propiedad ProcCountLines devuelve el número de líneas de un procedimiento, comenzando por la línea devuelta por la propiedad ProcStartLine y terminando por la línea que termina el procedimiento. El procedimiento puede terminar con End Sub, End Function o End Property.

Nota:

La propiedad ProcCountLines trata los procedimientos Sub y Function de forma similar, pero distingue entre cada tipo de procedimiento Property.

Ejemplo:

En el ejemplo siguiente se muestra un mensaje que indica el número de líneas de un procedimiento determinado.

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."

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.