Visual Basic 6
Procédures de fonction
Recherche…
Introduction
Function est une série d'instructions entourées par des instructions "Function" et "End Function".
La fonction effectue une activité et renvoie le contrôle à l'appelant. Lorsqu'il renvoie le contrôle, il renvoie également une valeur au code d'appel.
Vous pouvez définir une fonction dans une classe, une structure et un module. Par défaut, c'est public. Cela signifie que vous pouvez l'appeler de n'importe où dans votre application qui a accès à la classe, à la structure ou au module dans lequel vous l'avez définie.
Syntaxe
- [Modificateurs] Fonction Name_Of_The_Function [(Arg_List)] As Return_Type
- [Déclarations]
- Fonction de fin
Remarques
- Les deux modificateurs de fonctions utilisés dans cet exemple sont Public & Private. Ces modificateurs définissent la portée de la fonction.
- Les fonctions avec une portée privée ne peuvent être appelées qu'à partir du fichier source à partir duquel elles ont été définies. Dans notre cas, il peut être appelé avec dans le module. Et ne peut pas être appelé en dehors du module.
- Les fonctions avec portée publique peuvent être appelées à la fois à l'extérieur et à l'intérieur du module. Nous pouvons simplement dire que "nous pouvons l'appeler n'importe où dans le programme".
- Le modificateur par défaut de la fonction est Public.
- Par défaut, les arguments de la fonction sont passés par référence (dans un sujet séparé, cela sera expliqué en détail).
Créer et appeler une fonction
Cet exemple utilisant un projet EXE standard avec ajout d'un fichier de module.
- Créer un nouveau projet "EXE standard". Donc, ici, un formulaire sera ajouté au projet par défaut.
- Ajouter un fichier de module au projet
- Placez un bouton de commande sur le formulaire
- Créer un bouton de commande Cliquez sur un événement.
Code du module
Création de deux fonctions dans le module. L'une est une fonction publique (FnAdd). Il prend deux arguments Integer val_1 & val_2. Il retourne un entier. Cette fonction ajoute les deux arguments et renvoie la valeur à l'appelant. Avant l'addition, les deux arguments subissent un processus dans une autre fonction. Qui est une fonction privée. Caractéristiques / règles de la fonction publique et privée expliquées dans la section Remarques.
Public Function FnAdd(val_1 As Integer, val_2 As Integer) As Integer
'Calling private function
val_1 = FnMultiplyBy5(val_1)
'Calling private function
val_2 = FnMultiplyBy5(val_2)
'Function return statement
FnAdd = val_1 + val_2
End Function
Vous trouverez ci-dessous la fonction privée du module. Il faut un nombre entier d'arguments val. Il retourne un entier. Cette fonction multiplie la valeur 5 par l'argument et renvoie le résultat à l'appelant.
Private Function FnMultiplyBy5(Val As Integer) As Integer
'Function return statement
FnMultiplyBy5 = Val * 5
End Function
Code de forme
Dans le bouton de commande, cliquez sur Evénement. Nous appelons ici la fonction publique du module "FnAdd"
Private Sub Command1_Click()
Debug.Print FnAdd(3, 7)
End Sub
Résultat dans la fenêtre immédiate
50