Note
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
La propriété ProcBodyLine renvoie le numéro de ligne auquel commence une procédure spécifique d’un module standard ou d’un module de classe. Long (en lecture seule).
Syntaxe
expression. ProcBodyLine (ProcName, ProcKind)
expression Variable qui représente un objet Module .
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| ProcName | Requis | String | Nom d'une procédure du module. |
| ProcKind | Requis | vbext_ProcKind | Type de procédure. Consultez la section Remarques pour connaître les valeurs possibles pour ce paramètre. |
Remarques
L’argument ProcKind peut être l’une des constantes vbext_ProcKind suivantes.
| Constante | Description |
|---|---|
| vbext_pk_Get | Une procédure Property Get. |
| vbext_pk_Let | Une procédure Property Let. |
| vbext_pk_Proc | Une procédure Sub ou Function. |
| vbext_pk_Set | Une procédure Property Set. |
Le corps d'une procédure commence par la définition de procédure, marquée par un des éléments suivants :
- Une instruction Sub
- Une instruction Function
- Instruction Property Get
- Instruction Property Let
- Instruction Property Set
La propriété ProcBodyLine renvoie un numéro qui identifie la ligne au niveau de laquelle la définition commence. En revanche, la propriété ProcStartLine retourne un nombre qui identifie la ligne à laquelle une procédure est séparée de la procédure précédente dans un module. Tous les commentaires ou constantes de compilation qui précèdent la définition de procédure sont considérés comme faisant partie de la procédure, mais la propriété ProcBodyLine les ignore.
Remarque
La propriété ProcBodyLine traite les procédures Sub et Function de la même manière, mais elle fait la distinction entre chacun de ces types de procédures Property.
Exemple
L'exemple suivant affiche un message qui indique la ligne à laquelle commence la définition de la procédure.
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) & "."
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.