Reconnaitre le controle dans un panel (VB Express) [Résolu]

Signaler
Messages postés
20
Date d'inscription
vendredi 13 mai 2005
Statut
Membre
Dernière intervention
5 juin 2008
-
Messages postés
20
Date d'inscription
vendredi 13 mai 2005
Statut
Membre
Dernière intervention
5 juin 2008
-
Salutations à tout le monde

voilà, j'ai fait un Panel dans le lequel il y a 2 types de controles : sur une ligne, j'ai cote à cote 5 textbox et au bout une checkbox, le tout sur 10 lignes.

J'aurai voulu savoir comment faire pour reconnaitre sur quelle checkbox je clique (c'est pour faire "quand je clique sur une checkbox, toutes les textbox de la ligne font telle action")

J'avais trouvé ça :
 Dim c As CheckBox
        For Each c In Panel1.Controls
            AddHandler c.CheckedChanged, AddressOf CaseClic
 Next c

mais c'est valable uniquement  quand le panel est composé uniquement de checkbox.........

voilà, merci de votre aide

4 réponses

Messages postés
3172
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
30
Non, en gardant la for...each :
For Each c As System.Windows.Forms.Control In Panel1.Controls
  If c.GetType() Is GetType(System.Windows.Forms.CheckBox) Then
    AddHandler CType(c, System.Windows.Forms.CheckBox).CheckedChanged, AddressOf CaseClic
  End If
Next c, ----
(Coloration syntaxique automatique par Kenji)

__________
  Kenji
Messages postés
3172
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
30
Salut,

Vérifie le type du control :
If c.GetType is Gettype(Checkbox) ...

__________
  Kenji
Messages postés
20
Date d'inscription
vendredi 13 mai 2005
Statut
Membre
Dernière intervention
5 juin 2008
1
    OK merci charles

mais tu ferais quelle boucle à ce moment là
je ne peux plus declarer c comme checkbox, sinon que voudrais dire le c.GetType

le truc serait de faire

Dim nbcontrole As Integer
Dim c As CheckBox

        For nbcontrole = 0 To Panel1.Controls.Count

             Si le controle du Panel est une checkbox alors

                  AddHandler c.CheckedChanged, AddressOf CaseClic

             fin du Si

       Fin du For

ou dans le même genre

merci d'avance pour votre aide...
Messages postés
20
Date d'inscription
vendredi 13 mai 2005
Statut
Membre
Dernière intervention
5 juin 2008
1
    Charles, tu es magnifique, mon nouveau mentor  en Panel !!!!

Merci bien, t'es un rude biloute, parole de ch'ti !!