Comment : créer une procédure (Visual Basic)

Vous placez une procédure entre une instruction de déclaration de début (Sub ou Function) et une instruction de déclaration de fin (End Sub ou End Function). Tout le code de la procédure se trouve entre ces instructions.

Une procédure ne peut pas contenir d’autre procédure, ses instructions de début et de fin doivent être en dehors de toute autre procédure.

Si vous avez du code qui effectue la même tâche à différents emplacements, vous pouvez écrire la tâche une fois en tant que procédure, puis l’appeler à partir de différents emplacements dans votre code.

Pour créer une procédure qui ne retourne pas de valeur

  1. En dehors de toute autre procédure, utilisez une instruction Sub, suivie d’une instruction End Sub.

  2. Dans l’instructionSub, faites suivre le mot clé Sub par le nom de la procédure, puis la liste des paramètres entre parenthèses.

  3. Placez les instructions de code de la procédure entre les instructions Sub et End Sub.

Pour créer une procédure qui retourne une valeur

  1. En dehors de toute autre procédure, utilisez une instruction Function, suivie d’une instruction End Function.

  2. Dans l’instructionFunction, faites suivre le mot clé Function par le nom de la procédure, puis la liste des paramètres entre parenthèses, puis une clause As spécifiant le type de données de la valeur de retour.

  3. Placez les instructions de code de la procédure entre les instructions Function et End Function.

  4. Utilisez une instruction Return pour renvoyer la valeur à l’appel de code.

Pour connecter votre nouvelle procédure aux anciens blocs de code répétitifs

  1. Veillez à définir la nouvelle procédure à un emplacement accessible par l’ancien code.

  2. Dans votre ancien bloc de code répétitif, remplacez les instructions qui effectuent la tâche répétitive par une instruction unique qui appelle la procédure Sub ou Function.

  3. Si votre procédure est un Function qui retourne une valeur, assurez-vous que votre instruction d’appel effectue une action avec la valeur retournée, par exemple en la stockant dans une variable, sinon la valeur sera perdue.

Exemple

La procédure Function suivante calcule le côté le plus long, ou hypotenuse, d’un triangle droit, en fonction des valeurs des deux autres côtés :

Function Hypotenuse(side1 As Double, side2 As Double) As Double
    Return Math.Sqrt((side1 ^ 2) + (side2 ^ 2))
End Function

Voir aussi