Discussion :

[microthib]

Bonjour,
j'ai un petit soucis, voilà :
je récupère un caractère tapé au clavier dans un textbox et je veux vérifier si c'est une voyelle :

If CaracEntrée in {"a", "e", "i", "o", "u", y"} then ...

mais ca ne marche pas (erreur de syntaxe)
allors j'ai essayé un truc de collection

dim Voyelle as collection
voyelle.add ( "a"& "e"& "i"& "o"& "u"& "y")
If CaracEntrée in Voyelle then ...

mais ca ne marche toujours pas (erreur de syntaxe)
Si quelqu'un a la solution ce serait sympa car j'essaye de trouver des exemples de code dans l'aide dynamique mais je suis perdu ...

il semblerait que "in" ne soit pas le bon mot mais je ne vois pas quoi mettre à la place...

merci d'avance
Byebye

[Pleymo]

Salut

J'ai laméthode longue pour toi, pour la métohde plus court...laisse moi un peu de temps ! héhé

If CaracEntrée = "a" or CaracEntrée = "e" or CaracEntrée = "i" or CaracEntrée = "o" or CaracEntrée = "u" or CaracEntrée = "y" then
end if

donne moi des news!
alp

[toubib]

Le plus simple est de voir si le caractère entré est présent dans la chaine "aeiouy"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
If InStr("aeiouy", CaracEntrée) <> 0 Then
            MsgBox("voyelle")
End If

Il y a probablement d'autres méthodes.

Cordialement

[troxsa]

Pourquoi ne pas faire un simple for each ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
        For Each Vo As String In TextBox1.Text
 
 
        Next

[microthib]

Problème résolu !

Merci beaucoup pour vos réponses, ça me permet en plus de voir différentes façon de faire, très intéressant

Merci encore !!