Discussion :

[pti_pierrot]

Bonjour, j'ai une question à 1000 points je vous explique mon problème :

Sur une feuille, j'ai 5 label et 5 textbox, les label sont nommées : LblA, lblB, lblC, lblD, lblE et les textbox sont nommées : tbA, tbB, tbC, tbD, tbE

les label et les textbox sont associées par couple ( lblA avec tbA etc ...)

j'aimerai que lorsque je clique sur une textbox, la ForeColor de la label associée devienne verte. J'y arrive en definissant les evenement mouseClick pour chaque textbox, mais je souhaiterai faire une fonction générique. J'ai pour cela eu une idée :

Code :

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

1
2
3
4
5
6
7
8
 
Public function maFonction(ByVal tb as TextBox)
  Dim maLabel as new Label
 'renseigne le bon nom pour la label
  maLabel.name = "lbl" & Mid( tb.name, 3 )maLabel.ForeColor = Color.Green
  'pour verifier que c'est bien le bon nom
  MsgBox("Nom de la label :" & maLabel.name)
End Function

si j'appelle la fonction avec : maFonction( tbA )

j'obtiens bien une msgbox qui me dit : "Nom de la label : lblA"
Mais la label sur ma feuille n'est pas modifiée

Est-ce réalisable ? autrement qu'en tenant un tableau à 2 dimensions contenant les couples de label, textbox.

Merci d'avance

[Invité]

Tu pourrais utiliser la propriété TAG de TextBox pour stocker le label Associé au textBox.

[pti_pierrot]

J'y ai pensé mais le tag est au format text, et meme en le récupérant je ne sais pas comment faire. Je sais creer une label qui aurai le bon nom ( recuperé depuis le tag ) mais pas récuperer dans ma feuille la label avec ce nom ( autrement qu'en parcourant toutes les label et en comparant le nom à chaque fois, ca serai trop lourd).

Merci pour ta suggestion

[neguib]

Je pense qu'il serait plus judicieux d'associer le label et son textbox dans un même container (panel par exemple) et c'est celui-ci qui gèrerai les évènements sur ces contrôles enfants pour assigner leurs propriétés communes

[Nico-xs]

( autrement qu'en parcourant toutes les label et en comparant le nom à chaque fois, ca serai trop lourd)

C'est une solution, et si tu as que 10 controles, c'est vraiment pas "lourd".

Mais la solution des containers reste la plus appropriée.

[guitoux1]

Tu créer cette fonction :
et tu l'associe à tous les evenemtn mouseClick de des textbox.

Code :

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

1
2
3
4
5
 
TextBox txtBox = sender as TextBox;
string controlLetter = txtBox.Name.Substring(txtBox.Name.Length - 1);
Label lbl = Controls["lbl" + controlLetter] as Label;
lbl.BackColor = Color.White;

Ps : ne fonctionne que si les label ont pour nom lblX et si il n'y a qu'un caractère dans leur nom qui les distingue (A....Z)