GB3- Valeur par defaut dans une boucle SELECT CASE( Temps de lecture estimé à Moins d'une minute)
Bonjour,
Vous connaissez certainement la selection à choix multiples SELECT CASE avec ce petit exemple ci dessous :
Dim mytext As String Select Case mytext Case "ho" Print "ho" Case "ha" Print "ha" End Select
Remarque : Cet exemple n'a pas grand intérêt au niveau code mais est juste là à but pédagogique.
Saviez-vous qu'il est possible de définir un choix par défaut si aucun cas n'est attribué à votre variable?
Il suffit d'utiliser l'instruction DEFAULT et dorrénavant, si aucun cas ne correspond, la valeur par défaut sera lue comme ceci :
Dim mytext As String Select Case mytext Case "ho" Print "ho" Case "ha" Print "ha" Default Print "by default" End Select
si mytext prend la valeur "georges" par exemple, après moulinette dans ce code, le résultat sera "by default"
Merci pour votre attention