L'instruction While...Wend répète des instructions tant que la condition spécifiée est vraie (True).
While Condition ' Instructions... Wend
Cette boucle signifie tant que (while) la condition est vraie, les instructions avant la fin de la boucle (Wend) sont exécutées.
Exemple : [voir]<html> <body> <% Dim phrase(9), i phrase(0) = "Ce" phrase(1) = "texte" phrase(2) = "contient" phrase(3) = "un" phrase(4) = "mot" phrase(5) = "qui" phrase(6) = "doit" phrase(7) = "être" phrase(8) = "trouvé" recherche = "être" i = 0 while trouve = False If phrase(i) = recherche Then Response.Write "Le verbe <b>" & recherche & "</b> a été trouvé" _ & " à la position n° <b>" & i & "</b>" _ & " au sein de la phrase suivante :<br>" For i = 0 To 7 Step 1 Response.Write phrase(i) & " " Next Response.Write phrase(8) & ". " trouve = True End If i = i + 1 Wend %> <body> <html> |