Discussion :

[Attila54]

Bonjour,

Je rencontre un petit souci avec un label dans lequel je veux integrer 3 variables et du texte fixe

J'ai la textbox TxtA qui est remplie avec des valeurs entieres
J'ai la textbox TxtB qui est remplie avec des valeurs entieres et/ou decimales (2 chiffres apres la virgule)

Dans mon label, appelé labelphrase, je veux ecrire :
" L'ENTITE MESURANT valeur de textboxA DOIT FAIRE valeur de textboxB POUR REUSSIR"

j'ai fait :

Code :

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

1
2
3
4
5
 
Dim A as integer = Convert.ToInt32(TxtA.text)
Dim B as integer = Convert.ToInt32(TxtB.text)
 
Labelphrase.Text = "L ENTITE MESURANT"  & A.ToString &   " DOIT FAIRE " & B.ToString & "POUR REUSSIR"

La variable A s'affiche bien mais j'ai un bug de conversion avec B
Je sais que j'ai un souci avec le Dim B as integer puisque B n'est pas un integer mais j'ai essayé avec d'autres types (Double ... etc) et cela ne fonctionne pas non plus

Une petite idée ????

Question subsidiaire : est il possible d'attribuer une couleur de texte differente pour les valeurs A et B ???

Merci beaucoup

[mactwist69]

Je sais que j'ai un souci avec le Dim B as integer puisque B n'est pas un integer mais j'ai essayé avec d'autres types (Double ... etc) et cela ne fonctionne pas non plus

C'est pas très clair...
Que contient le Textbox B comme texte ?

[calagan99]

Bizarre!
As-tu simplement essayé quelque chose comme :

Code :

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

Dim B as integer = Convert.ToDecimal(TxtB.text)

.

ou

Code :

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

Dim B as integer = CDec(TxtB.text)

[Attila54]

Que contient le Textbox B comme texte ?

Ma textbox B ne contient pas de texte mais des valeurs numériques décimales (12.25 par exemple)

Dim B as integer = CDec(TxtB.text)

sauf erreur de ma part, cela ne fonctionne pas en VB6

et est il possible d'affecter des couleurs aux valeurs de mes textbox dans le label ?

[Attila54]

c'est bon cela fonctionne, il ne me reste plus qu'à trouver si on peut mettre des couleurs différentes aux chiffres dans le label.

Personne n'a d'idée ??

Merci bien

[calagan99]

sauf erreur de ma part, cela ne fonctionne pas en VB6

Dans ce cas, la section VB.Net n'est probablement pas la plus appropriée pour poser ta question.

Pour ce qui est des couleurs, je doute qu'il soit possible d'utiliser plusieurs couleurs dans un seul Label.
Pour ma part, j'utiliserais plusieurs Labels collés les uns aux autres. Ainsi, il est possible de définir la couleur de chacun d'entre eux.

[Attila54]

désole pour l'erreur, je voulais dire cela ne fonctionne pas en VB.NET mais en VB6

Je vais effectivement regarder du coté des labels collés

Merci beaucoup

[Sehnsucht]

Bonjour,

Pour la question des couleurs, à part le contrôle RichTextBox qui permet de gérer ce genre de choses (au format RTF) le mieux est comme conseillé d'utiliser plusieurs Label.

Par contre, je n'ai pas vraiment saisi l'intérêt de se casser la tête à récupérer les valeurs des TextBox en tant que valeurs numériques pour ensuite les remettre en format texte, autant directement insérer le contenu des TextBox (à moins que les variables ne servent à d'autres choses, mais ce n'est pas précisé ici).

Une autre chose, un peu plus pointilleuse, l'affectation de la propriété Text du Label, telle qu'elle est écrite nécessite pas moins de 5 copies de chaînes de caractère (à chaque concaténation une nouvelle copie est crée la classe String étant immutable), certes cela ne se ressent pas mais il préférable d'éviter ceci, en utilisant par exemple la méthode String.Format:

Code :

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

Labelphrase.Text = String.Format("L ENTITE MESURANT {0} DOIT FAIRE {1} POUR REUSSIR", TxtA.Text, TxtB.Text)

On pourrait en profiter le cas échéant pour spécifier des formats aux "injections" de valeur, et on pourrait également stocker cette chaine quelque part de manière centralisée et unique (un Shared Readonly par exemple) ce qui permettrait de n'avoir à créer la chaine qu'une fois pour toute).


Cordialement !