Table des Matières
Publicité
Manuel d'utilisation
9-4
Exit Do
Cela n'est utilisé qu'à l'intérieur des structures de contrôle de
type « Do ...Loop », afin de fournir une façon alternative de
sortie du « Do ...Loop ».On peut placer autant de Exit Do
qu'on veut et à différents endroits dans une structure « Do
...Loop ». Souvent utilisée avec des évaluations de conditions
(par exemple If ...Then), Exit Do transfert le contrôle au code
qui est écrit juste à la suite dans la Loop. Lorsque les « Do
...Loop » sont imbriqués, le transfert est alors contrôlé par le
« Do ...Loop » qui est au niveau d'imbrication au dessus de
celui où est écrit la balise Exit Do.
Loop
Cette balise termine le « Do ...Loop »
Exemple de fonctionnement de « Do ...Loop »
L'exemple crée une boucle infinie, dont on ne peut sortir que si la valeur de
Volt(1) est comprise dans une certaine étendue de mesure.
Dim Reply
Do
Reply = Volt(1)
If Reply > 1 And Reply < 9 Then
Exit Do
End If
Loop
La même chose peut être faite d'une autre manière en incorporant l'étendue
de mesure de test à l'intérieur d'une boucle « Do ...Loop » de la façon
suivante :
Dim Reply
Do
Reply = Volt(1)
Loop Until Reply > 1 And Reply < 9
L'exemple suivant montre l'utilisation de Wend.
While X>Y
...
Wend
Do While X > Y
...
Loop
'Déclare la variable
'Vérifie l'étendue de mesure
'Sort de la boucle « Do ...Loop »
'Déclare la variable
'Ancienne façon de faire des boucles
'Façon plus intéressante de programmer
Publicité
Table des Matières
