[VB.Net] Problème d'affichage de text dans une MessageBox

Bonsoir tout le monde,
Voila j'ai encore un petit problème :
J'ai déclaré une structure qui est, en fait, un tableau :

Code:

---

1 2 3 4 5 6 7 8 9

Structure QuestionsStruc Public strQuestion As String Public intCode As Integer Public strTabReponses() As String Public strNomPhoto As String Public [u]strCorrection[/u] As String End Structure Private mStrTabQuestionsReponses() As QuestionsStruc

---

Et j'aimerais maintenant afficher dans une MessageBox la correction d'une question (située dans un fichier) qui est dans la variable strCorrection de la structure. Pour cela j'ai écrit :

Code:

---

1 2	MessageBox.Show(PP_strCorrection, "Correction",MessageBoxButtons.OK)

---

Mais quand on m'affiche la correction elle s'inscrit comme je l'avais saisie au départ, c'est à dire du type : "....." & vbNewLine & "..."
Voila j'ai cherché mais je n'ai pas trouvé comment on peut s'en sortir...
Si vous avez une idée, je suis preneur :)
Bonne soirée
Nico[/code]

salut,
tu ne peux pas afficher celà directement, à moins que j'ai mal saisi le probleme.. :P
Il faut que tu fasse un peu d'interprétation.

déjà dans ton fichier, n'écris pas "la réponse" & vbNewLine & "à la question"
Mais plutot la réponse£à la question

utilise un caractère que tu es certain de ne pas rencontrer.

tu créés en suite une fonction qui va balayer tous les caracteres et lorsque tu rencontre '£' tu concatene un vbNewLine a ta chaine. (je pense qu'on peut?-jamais fait)

ensuite tu retourne la chaine interprétée.

Merci NiamorH pour cette aide. Je crois que tu n'as pas tout à fait compris. J'essais tout simplement de passer des lignes dans mon MessageBox avec vbNewLine
Ce qui s'affichera dans le MessageBox est uniquement la réponse à la question. Par ex. la première réponse est :

"Le marquage au sol est une ligne discontinue et autorise donc le dépassement." & vbNewLine & "En revanche, je ne peux pas dépasser car j'approche d'une intersection."

Ce texte vient d'un fichier texte Questions.txt et a été mis dans la "rubrique" strCorrection de la structure QuestionsStruc qui elle-même est un tableau (mStrTabQuestionsReponses)
(Voir ci-dessus)

J'ai essayé avec ta méthode mais je n'est pas réussi : il me mets toujours le texte tel quel dans le MessageBox :

Code:

---

1 2 3

PP_strCorrection.Replace("£"," & vbNewLine & ") MessageBox.Show(PP_strCorrection,"Correction")

---

J'espère que vous pourrai m'aider car c'est mon dernier problème pour que tout marche..
Voila sur ce, c'est l'heure du p'tit déj
Bon appétit

Citation:

---

Envoyé par eultartuffe

il me mets toujours le texte tel quel dans le MessageBox

---

Ce qui est tout à fait normal. Il y a un topic du même genre récemment avec le problème des \ dans une chaîne en C#, ici.

Pour reprendre ce que disait Merlin : "Il y a mélange entre le contenu d'une variable et la syntaxe particulière d'un langage particulier."

C'est la même chose ici pour ce qui est du contenu de la variable. Ton texte est dans un fichier et tu initialises une variable en lisant dans ce fichier. Ton vbNewLine ne sera jamais interprété à ce moment puisque le tout sera considéré comme une chaîne.

Ce n'est pas équivalent à :

Code:

---

maChaine = "Le marquage au sol est une ligne discontinue et autorise donc le dépassement." & vbNewLine & "En revanche, je ne peux pas dépasser car j'approche d'une intersection."

---

En lisant dans le fichier, tu serais plutôt dans ce cadre :

Code:

---

maChaine = "Le marquage au sol est une ligne discontinue et autorise donc le dépassement."" & vbNewLine & ""En revanche, je ne peux pas dépasser car j'approche d'une intersection."

---

Je ne connais pas le VB.Net du tout, mais il faut dédoubler les quotes il me semble ^^

Le vbNewLine n'est donc pas interprété et tu n'auras pas de retour à la ligne dans ta chaîne, tu auras juste la chaîne "& vbNewLine &" ;)

Ah daccord je comprends mieux maintenant pourquoi ça ne marche pas..Merci :)
Par contre, je ne sais pas du tout ce qu'est le dédoublage...Et encore moins les "quotes" :? Je vais essayé de me renseigner mais je crois que là, ça dépasse mon niveau :(
En tout cas , merci :D

Citation:

---

Envoyé par eultartuffe

Ah daccord je comprends mieux maintenant pourquoi ça ne marche pas..Merci :)

---

Je ne t'ai donné aucune solution petit scarabé, juste l'origine du problème, ne soit pas si pressé ^^

Une solution possible est de mettre un caractère spécial là ou tu veux un retour à la ligne (comme le £ cité plus haut). Quand tu récupères la chaîne, tu effectues un Split de cette chaîne sur le caractère £. Ensuite tu parcours le tableau de chaînes renvoyé par le Split et tu ajoutes, dans une variable, chaque ligne avec un retour à la ligne entre chaque de manière à obtenir le résultat souhaité ;)

En très gros (et surtout que je ne connais pas du tout le VB.Net), en supposant que maChaine contienne la chaîne lue dans le fichier

Code:

---

1 2 3 4 5 6 7

string nouvelleChaîne   foreach(string s in maChaine.Split('£')) { nouvelleChaîne = nouvelleChaîne & s & vbNewLine }

---

Merci beaucoup StormimOn
J'ai enfin réussi :) en suivant ton exemple
Et ça donne ça :

Code:

---

1 2 3 4 5 6 7 8 9 10

Dim PF_strChaineDepart, PF_strChaineModifiee As String Dim PF_strTabSousChaines() As String Dim PF_intIndice As Integer   PF_strChaineDepart = mStrTabQuestionsReponses _(mIntIndiceQuestion).strCorrection PF_strTabSousChaines = PF_strChaineDepart.Split("&") For PF_intIndice = 0 To PF_strTabSousChaines.Length - 1 PF_strChaineModifiee = PF_strChaineModifiee & vbNewLine & _ PF_strTabSousChaines(PF_intIndice) Next

---

J'ai juste déclaré un tableau en + pour pouvoir stocker les sous chaines
Merci encore :D
Bonne soirée