Discussion :

[Tornade8912]

Bonjour,
Je tiens à vous dire que si ce sujet à déjà été évoqué je m'en excuse.

Bon voilà mon problème je voudrai faire un système qui permet de trouver une lettre dans une chaine string (cette chaine ne contient qu'un seul mot).
Prenons l'exemple de camion. Je voudrai que quand on clique sur un bouton,
et bien que ce bouton lance une procédure afin de tester la présence du caractère "a" dans camion. Ensuite il faudrait que vb me renvoie la position du caractère "a" dans camion.

Existe t-il une fonction qui le permet en vb.net ?
Je vous souhaite une bonne journée en attente d'une réponse.

[sevyc64]

TaChaine.Contains(LaChaineCherchée) pour savoir si elle y est, ou alors TaChaine.IndexOf(LAchaineCherchée) pour avoir l'index (base 0) du premier caractère de la première occurrence trouvée

[Tornade8912]

Donc si je comprends bien mon code devrait ressembler
à ça :

Code :

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

1
2
3
4
5
6
 
Dim mot As String = "camion"
If mot.Contains("a") = True Then
       Dim As aInMot As Integer = mot.IndexOf("a") + 1 'je rajoute 1 pour venir à une base "normale"
       MsgBox("La lettre a se trouve :" & aInMot)
End If

[sevyc64]

Oui.

Tu peux ne pas utiliser Contains, et utiliser directement IndexOf, mais il faudra alors tester s'il vaut -1 en cas de lettre non trouvée. Ce qui, au final, niveau code, revient au même.

[Tornade8912]

Ah oui j'oubliais comment dois-je faire si le caractère "a" se trouve plusieurs fois par exemple dans alphabet
Est-il possible d'afficher dans une msgbox :

la lettre "a" se trouve à (emplacement du premier "a") et à (emplacement du deuxième "a").
Dois-je faire une boucle ou existe t-il une fonction qui le permet ?

Bonne soirée en attente d'une réponse

[Sankasssss]

Bonsoir,

oui bien sûr, en regardant la définition de : String.IndexOf, méthode (System) - MSDN - Microsoft
on trouve String.IndexOf, méthode (Char, Int32)
où se trouve un code intéressant pour vous...

[Tornade8912]

J'avoue ne pas comprendre le code donné par MSDN. Pouvez vous me montrer le code avec pour exemple
le mot "alphabet" ?
Ça me rendrai beaucoup service

[wallace1]

Bonjour,

J'avoue ne pas comprendre le code donné par MSDN. Pouvez vous me montrer le code avec pour exemple
le mot "alphabet" ?
Ça me rendrai beaucoup service

Si tu ne comprends pas le contenu c'est que tu as certainement sautés des étapes dans l'apprentissage des bases ou bien que tu manques de pratiques, choses qu'il ne faut pas négliger...la preuve en est...



Il est certains que pour traiter ce genre de parsing, l'utilisation de regEx n'est pas forcément l'alternative la plus rapide et la moins gourmande en terme de ressource mais si ça peut servir voilà comment je procéderais :

Code :

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

1
2
3
4
5
 
   Dim matchs As MatchCollection = Regex.Matches("alphabet", "a")
        For Each m As Match In matchs
            MsgBox("Lettre : " & m.Value & vbNewLine & "Index : " & m.Index.ToString)
        Next

PS : si tu veux prendre en compte la casse alors à toi de voir comment bien construire ton "Pattern" (= 2ème argument de la signature de la méthode ".Matches") ou bien à toi de gratter le 3ème argument dans cette même signature (IgnoreCase...etc...).


Je pense que tu as désormais beaucoup de lecture en perspective......


A+

[Sehnsucht]

C'est quand même sortir l'artillerie lourde là (enfin après tout dépend du besoin exact derrière )
Sinon en reprenant l'exemple de la documentation, appliqué au cas actuel ça donnerait un truc dans ce style

Code :

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

1
2
3
4
5
6
Dim str As String = "alphabet"
Dim index As Integer = str.IndexOf("a"c)
Do While index <> -1
    ' utiliser index (ex: Console.WriteLine(index)
    index = str.IndexOf("a"c, index + 1)
Loop

À noter que dans le genre "exotique" on pourrait aussi utiliser Linq ici :

Code :

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

1
2
3
Dim indices = Aggregate i In str.Select(Function(ch, i) If(ch = "a"c, i, -1))
              Where i <> -1 Into ToArray()
' ici indices "vaudra" { 0, 4 }

[wallace1]

C'est quand même sortir l'artillerie lourde là (enfin après tout dépend du besoin exact derrière )

J'en conviens Sehn, pour le besoin actuel il est clair que RegEx fait partie des gros calibres....hi hi hi... d'ou le pitit layus dans mon message précédent....
Cependant je considère que lorsqu'on commence à traiter ce genre de parsing de chaîne, qu'à un moment'n'donné Regex deviendra l'alternative la plus adaptée du fait de pouvoir paramétrer et affiner un pattern et ce en quelque ligne seulement.

voilà voilou...