Module.ProcCountLines-Eigenschaft (Access)
Die ProcCountLines-Eigenschaft gibt die Anzahl von Zeilen in einer bestimmten Prozedur in einem Standardmodul oder einem Klassenmodul zurück. Schreibgeschützter langer Wert.
Syntax
Ausdruck. ProcCountLines (ProcName, ProcKind)
Ausdruck Eine Variable, die ein Module-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| ProcName | Erforderlich | String | Der Name einer Prozedur im Modul. |
| ProcKind | Erforderlich | vbext_ProcKind | Die Art der Prozedur. Mögliche Einstellungen finden Sie unter "Hinweise". |
Hinweise
Das ProcKind-Argument kann eine der folgenden vbext_ProcKind Konstanten sein.
| Konstante | Beschreibung |
|---|---|
| vbext_pk_Get | Eine Property Get-Prozedur. |
| vbext_pk_Let | Eine Property Let-Prozedur . |
| vbext_pk_Proc | Eine Sub- oder Function-Prozedur. |
| vbext_pk_Set | Eine Property Set-Prozedur. |
Die Prozedur beginnt mit Kommentaren und Kompilierkonstanten, die der Prozedurdefinition direkt vorangehen, gekennzeichnet durch eine der folgenden Anweisungen:
- Eine Sub-Anweisung
- Eine Function-Anweisung
- Eine Property Get-Anweisung
- Eine Property Let-Anweisung
- Eine Property Set-Anweisung
Die ProcCountLines-Eigenschaft gibt die Anzahl der Zeilen in einer Prozedur zurück, beginnend mit der Zeile, die von der ProcStartLine-Eigenschaft zurückgegeben wird, und endet mit der Zeile, die die Prozedur beendet. Die Prozedur kann mit End Sub, End Function oder End Property beendet werden.
Hinweis
Die ProcCountLines-Eigenschaft behandelt Sub - und Function-Prozeduren auf ähnliche Weise, unterscheidet jedoch zwischen den einzelnen Typen von Property-Prozeduren.
Beispiel
Im folgenden Beispiel wird eine Meldung angezeigt, die die Anzahl von Zeilen in einer bestimmten Prozedur angibt.
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."
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.