Sous-programmes ( sous-marins ) fournit aux programmeurs visuels Basic (VB ) avec la possibilité de code de segment dans des fonctions distinctes . Les fonctions sont les différents segments de code de calculs de processus. Par exemple, une fonction peut calculer le prix total de la commande. Cette fonction peut ensuite être ajouté à d'autres pages de code dans votre application, le rendant plus rapide de concevoir votre logiciel . Comprendre les fonctions "sub" , les paramètres et l'exécution de code vous permet de créer ces segments. Instructions
1

créer le nom du sous-programme. Chaque sous a besoin d'un nom. Les sous-programmes ont des noms , mais ils sont également définis comme "privé" ou "public". Sous-programmes privés ne sont accessibles que dans le fichier de classe. Sous-programmes publics sont accessibles à partir de n'importe où dans votre code. Ce qui suit vous montre comment créer un sous-programme :

publique ExponentSub Sub ( ) End Sub
2

ajouter des paramètres à votre routine . Les paramètres sont passés à partir de votre code pour la sous-routine . Ces paramètres sont utilisés pour effectuer les calculs . Dans cet exemple, le sous-programme " ExponentSub " effectue des calculs exponentiels. Il nécessite un nombre de base et le nombre de fois que le nombre de base est multiplié . Le code suivant définit les paramètres de la sous-routine :

Public Sub ExponentSub ( base_number As Integer , raise_number As Integer ) End Sub
3

Ajoutez les déclarations de calcul du sous-programme . Les déclarations contenues dans le sous-programme sont un ensemble d'instructions qui complète vos calculs. Le code ci-dessous vous montre comment élever un nombre et calculer sa valeur exponentielle :

Public Sub ExponentSub ( base_number As Integer , raise_number As Integer ) As totale Integertotal = base_number ^ raise_numberEnd Sous
4

Appelez votre routine . Maintenant que le sous-programme est créé, vous pouvez l'appeler dans votre code. Ce qui suit vous montre comment envoyer exécution de la routine :

Appel ExponentSub (10, 8)