Discussion :

[GarsDuCalvados]

Bonjour,
Je souhaiterai mettre en GRAS certaines informations dans une RichTextBOX provenant de variable.

J'arrive bien à faire cela :

Code :

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

Me.text11.Rtf = "{\rtf Le salarié :\b Roger DUPOND\b0 à 30 ans}"

Comment faire lorsque le nom et le prénom sont 2 variables?
NON ==> tableau_chaine_salarie(0)
PRENOM ==> tableau_chaine_salarie(1)


Merci pour votre aide,

.Matthieu

[robri]

salut,

en concaténant tes variables dans la chaine rtf :

Code :

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

Me.text11.Rtf = "{\rtf Le salarié :\b " & tableau_chaine_salarie(1) & " " & tableau_chaine_salarie(0) & "\b0 à 30 ans}"

[GarsDuCalvados]

Ok ça marche

Mais comment faire lorsque je remplis ma RichTEXTBOX au fur et à mesure.

Par exemple pour une texTbox je fais :

Code :

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

1
2
3
4
5
6
 
 
'Informations sur le salarié dans la TEXTBOX information :
Me.informations.Text = "Vous avez selectionné le salarié " & tableau_chaine_salarie(0) & " " & tableau_chaine_salarie(1)
'Informations sur le Type d'arret selectionné dans la Textbox information :
Me.informations.Text = Me.informations.Text + Environment.NewLine + "L'arrêt du salarié est du type " & tableau_chaine_type_arret(0)

Comment faire la même chose avec une RichTEXTbox car avec ça :

Code :

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

1
2
3
4
 
 
Me.text11.Rtf = "{\rtf Le salarié :\b " & tableau_chaine_salarie(1) & " " & tableau_chaine_salarie(0) & "\b0 à 30 ans}"
Me.text11.Rtf = Me.text11.Rtf & Environment.NewLine & "{\rtf Le N° du salarié est :\b " & tableau_chaine_salarie(0) & "\b0 héhé}"

ça ne m'affiche que la première ligne.

Quelqu'un peut il m'aider sur ce second point?

Merci,
.Matthieu

[OhMonBato]

Code :

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

1
2
3
4
5
Dim Ch AsString
Ch = "{\rtf Le salarie :\b " & TextBox1.Text & " " & TextBox2.Text & "\b0 … 30 ans"
Ch = Ch & "\par Le Nø du salarie est :\b " & TextBox3.Text & "\b0 hehe}"
RichTextBox1.Rtf = Ch

Je te conseille ce lien pour avoir plus d'infos sur le format RTF :
http://www.biblioscape.com/rtf15_spec.htm

[Poulain]

Ou il me semble, si tu veux gagner un poil de temps:

Code :

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

Ch &= "\par Le Nø du salarie est :\b " & TextBox3.Text & "\b0 hehe}"