Crystal Reports  

Sortie de boucles For/Next (syntaxe Basic)

Vous pouvez sortir d'une boucle For à l'aide de la clause Exit For. Dans l'exemple suivant, le nom "Fred" est recherché dans le tableau global de noms. Si le nom est trouvé, l'indice du nom est renvoyé dans le tableau. Sinon, la valeur renvoyée est -1. Par exemple, si le tableau de noms est :

Array ("Frank", "Helen", "Fred", "Linda")

La formule renvoie la valeur 3.

Global names () As String
'Le tableau de noms a été initialisé et rempli
'dans d'autres formules
Dim i
formula = -1
'La fonction UBound renvoie la taille de son
'argument de type tableau
For i = 1 to UBound (noms)
   If noms (i) = "Fred" Then
      formula = i
      Exit For
   End If
Next I

Voir aussi

Boucles For/Next