Utiliser " comme séparateur d'expression

Bonjour,

J'ai un petit problème, j'aimerais utiliser le guillemet (") comme séparateur d'expression.
Par exemple : REF_PRG := "aaa_b_c_dddddd";
Récupérer aa_b_c_ddddd
J'utilise le .split :

Code:

---

1 2	Dim NomProg() = readText(22).Split(" " ") Tb_NomProg.Text = NomProg(1).TrimEnd

---

Mais malheuresement il n'accepte pas le caractère guillemet " comme séparateur alors qu'il s'agit d'un caractère unicode.

Merci d'avance,

Il faut utiliser readText(22).Split("""") ; il faut le doubler à l'intérieur d'une chaine pour le traiter comme caractère "guillemet" plutôt que délimiteur de début/fin de chaine.

J'essaye et je te dis quoi.
Merci de ta réponse,

Edit : Ca marche merci :)

Edit2 : Petit soucis pour récupérer d'autres données :

Pour cette ligne : ETAT_PROG := " 3 / 10/11/2014 / MOI";
Je veux récupérer 3 , 10/11/2014 et MOI
J'effectue

Code:

---

Dim EtatProg() As String = readText(37).Split(" "/ ")

---

Mais il ne veut pas prendre comme séparateur "/

Merci d'avance

Tu peux sinon récupérer ce caractère en faisant Chr(34)

Citation:

---

Envoyé par ekydeta

J'essaye et je te dis quoi.
Merci de ta réponse,

Edit : Ca marche merci :)

Edit2 : Petit soucis pour récupérer d'autres données :

Pour cette ligne : ETAT_PROG := " 3 / 10/11/2014 / MOI";
Je veux récupérer 3 , 10/11/2014 et MOI
J'effectue

Code:

---

Dim EtatProg() As String = readText(37).Split(" "/ ")

---

Mais il ne veut pas prendre comme séparateur "/

Merci d'avance

---

Normal, tu refais la même erreur que précédemment, en mettant un guillemet non-doublé à l'intérieur d'une chaine, celle-ci se "termine" alors au guillemet non-doublé et le code est donc invalide (c'est clairement visible dans tes extraits de code sur le forum, on voit bien que certaines parties sont rouges [signe distinctif d'une chaine de caractères] alors qu'elles ne devraient pas l'être)
Mais même sans ça, le code ne fonctionnerait pas comme souhaité, quand tu dis split sur " ""/ " ça signifie à chaque fois qu'on rencontre un espace suivi d'un guillemet suivi d'un slash suivi d'un autre espace EXACTEMENT on splitte ; alors que toi tu veux splitter soit sur un guillemet soit sur un slash.

Par conséquent, pour résoudre ton soucis, tu dois utiliser la surcharge de Split qui prend (entre autres) un tableaux de chaines afin de donner les différents éléments sur lesquels tu souhaite splitter.
Je te laisse chercher dans la documentation comment faire ;)

Citation:

---

Tu peux sinon récupérer ce caractère en faisant Chr(34)

---

Quel caractère romulus ?

Je ne comprends pas ta réponse.

Edit : Chr(34) simule le " en langage Ascii, il me suffit donc d'effectuer de nouveau split.

Citation:

---

Envoyé par Sehnsucht

Normal, tu refais la même erreur que précédemment, en mettant un guillemet non-doublé à l'intérieur d'une chaine, celle-ci se "termine" alors au guillemet non-doublé et le code est donc invalide (c'est clairement visible dans tes extraits de code sur le forum, on voit bien que certaines parties sont rouges [signe distinctif d'une chaine de caractères] alors qu'elles ne devraient pas l'être)
Mais même sans ça, le code ne fonctionnerait pas comme souhaité, quand tu dis split sur " ""/ " ça signifie à chaque fois qu'on rencontre un espace suivi d'un guillemet suivi d'un slash suivi d'un autre espace EXACTEMENT on splitte ; alors que toi tu veux splitter soit sur un guillemet soit sur un slash.

Par conséquent, pour résoudre ton soucis, tu dois utiliser la surcharge de Split qui prend (entre autres) un tableaux de chaines afin de donner les différents éléments sur lesquels tu souhaite splitter.
Je te laisse chercher dans la documentation comment faire ;)

---

Merci de cette belle explication Sehnsucht.

Je vais de ce pas me documenter dans le MSDN.

Edit : Je n'ai pas réussi à trouver la solution à mon problème.

Bonsoir,

juste :

Code:

---

Dim EtatProg() As String = readText(37).Split(" / ")

---

non?

Bonjour,
Je ne sais pas si j'ai bien compris, mais...
Pour le test :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Dim Str As String = " 3 / 10/11/2014 / MOI"   Dim Str_a As String = Str.Split("/"c)(0) Str_a = Str_a.Replace(" ", "") Dim Str_b As String = Str.Split("/"c)(1) Str_b = Str_b.Replace(" ", "") Dim Str_c As String = Str.Split("/"c)(2) Str_c = Str_c.Replace(" ", "") Dim Str_d As String = Str.Split("/"c)(3) Str_d = Str_d.Replace(" ", "") Dim Str_e As String = Str.Split("/"c)(4) Str_e = Str_e.Replace(" ", "")   MessageBox.Show("***" & Str_a & "," & Str_b & "/" & Str_c & "/" & Str_d & "," & Str_e & "...")

---

inutile répéter replace et split, example:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Dim mydata As String = "ETAT_PROG := "" 3 / 10/11/2014 / MOI"";"   'Qu'un seul replace pour toute la chaine avant le split Dim cleaned As String = mydata.Replace(" ", "")   'découpe à partir des guillemets cleaned = cleaned.Split(""""c)(1)   Dim Num, Day, Month, Year, Who As String 'récupère les infos simplement Dim splitted() As String = cleaned.Split("/") Num = splitted(0) Day = splitted(1) Month = splitted(2) Year = splitted(3) Who = splitted(4)   MsgBox(Num & " " & Day & " " & Month & " " & Year & " " & Who)

---

Vous aimez bien vous casser la tête ; j'avais pourtant donné un moyen simple (si seulement l'information que ça n'aidait pas assez n'avait pas été donnée dans un edit je l'aurais vue plus tôt :D)

Code:

---

1 2 3 4 5 6 7

Const str = "ETAT_PROG := "" 3 / 10/11/2014 / MOI"";"   Dim parts = str.Split({"""", " / "}, StringSplitOptions.None)   For Each part In parts Console.WriteLine(part.Trim) Next

---

Donne comme affichage :

Citation:

---

ETAT_PROG :=
3
10/11/2014
MOI
;

---

Ne reste plus qu'à garder ce qui est nécessaire :)

Après on pourrait aussi passer par une approche expression rationnelle si ça complexifie encore (ou si c'est une source de ralentissement, une regex compilée en début de programme ça peut parfois être un gain de perf [à mesurer dans tous les cas si nécessaire])

Re:
Oui!... je devais être fatigué hier :weird::calim2:
Vous avez raison tous les deux en plus j'avais même oublié les guillemets ...
Pour la solution de Sehnsucht c'est bien à condition d'avoir toujours des " / " (espace, slash, espace) comme séparateurs par contre.

A +

Testé et adopté, Merci les amis !