Select : EndSelect
DescriptionSelect <expression1> Case <expression> [, <expression> [<expression numerique> To <expression numerique>]] ... [Case <expression>] ... [Default] ... EndSelect
Select permet d'opérer des choix rapides. Le programme exécute <expression1> et retient la valeur en mémoire. Cette valeur est ensuite comparée à chacune des valeurs "Case <expression>" et s'il y a égalité, le code du bloc Case est exécuté pour quitter ensuite la structure Select. Case supporte les valeurs multiples ainsi que les intervalles à l'aide du mot-clef To (seulement pour les intervalles numériques). Si aucune des valeurs Case n'est vraie, alors le code du bloc Default, (s'il est spécifié) est exécuté.
Note: Select accepte les nombres à virgules (float) comme <expression1>, mais ils seront arrondis à l'entier inférieur (les comparaisons ne se font que sur des nombres entiers).
Exemple
Valeur = 2 Select Valeur Case 1 Debug "Valeur = 1" Case 2 Debug "Valeur = 2" Case 20 Debug "Valeur = 20" Default Debug "Je ne sais pas" EndSelect
Exemple: Cas multiples et intervalles
Valeur = 2 Select Valeur Case 1, 2, 3 Debug "Valeur est 1, 2 ou 3" Case 10 To 20, 30, 40 To 50 Debug "Valeur est entre 10 et 20, égale à 30 ou entre 40 et 50" Default Debug "Je ne sais pas" EndSelect