Rapport de message :*
 

Re: isoler une partie variable d'une chaine de caractere en vb

Titre du sujet : Re: isoler une partie variable d'une chaine de caractere en vb
par Guy le 12/10/2009 15:02:15

Bonjour spookyz,

La chaîne à fouiller est-elle toujours de la forme [nom du jour]_[quantième]_[nom du mois]_[année]?
Si oui, le nom du mois se trouve toujours après le deuxième caractère de soulignement.
Alors avec :
Dim TableauChaine() As String
Dim ChaineReponse As String

TableauChaine = Split("lundi_12_octobre_2009", "_")

ChaineReponse = TableauChaine(2)
 
TableauChaine portera les éléments suivant dans l'ordre :
TableauChaine(0) = "lundi"
TableauChaine(1) = "12"
TableauChaine(2) =  "octobre"
TableauChaine(3) = "2009"

Ce sera donc, avec l'hypothèse de départ, toujours l'élément d'indice 2 qui portera le nom du  mois comme tu le souhaites et ce peu importe la longueur des éléments qui précèdent.

On pourra évidemment remplacer le littéral lundi_12_octobre_2009par une variable.
De même n'utiliser qu'une variable chaîne avec :

Dim ChaineReponse As String

ChaineReponse = Split("lundi_12_octobre_2009", "_")(2)

Mais, dans ce deuxième exemple, la chose est plus difficile à apercevoir.

Si l'hypothèse citée n'est pas toujours vérifiée, il faudra sans doute aller vers les expressions rationelles. Mais c'est une autre histoire.

Cordialement,

Guy