Select : EndSelect

Select <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