Discussion :

[mattmax]

Bonjour,

Suite a mon message d'hier j'ai ecrit ce bout de code :

Code :

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

1
2
3
4
5
6
 
For Each tb As Control In Me.Controls
            If TypeOf (tb) Is TextBox Then
 
end if 
next

Mon probleme est que je ne parcours pas mes Textbox, serait ce parcequ'elle se trouve dans un panel?

[ebastien]

Bonjour,

tout à fait, si les Textbox se trouvent sur un Panel, il faut parcourir les controls du Panel.

Bonne journée,
eb.

[mattmax]

Merci bien mais je voit pas trop comment l'ecrire en fait est ce que quelque chose qui ressemble a ca

Code :

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

1
2
3
4
 
for each tb as controls in me.panel
 
next

serait correct ?

Merci

[mattmax]

c bon j'ai trouvé comment ecrire la fonction


Merci

[rv26t]

Bonjour,

Effectivement tu parcours les controles de la Form. Si tes contrôles sont dans un panel ils sont ignorés.
Soit tu parcours les controles de ton panel, soit tu utilises une fonction qui descend dans les contrôles panel.

Code :

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

1
2
3
4
5
6
7
8
9
    Sub ParcourTextBox(ByVal conteneur As Control)
        For Each ctrl As Control In conteneur.Controls
            If TypeOf ctrl Is TextBox Then
                ' code ...
            Else
                If TypeOf ctrl Is Panel Then ParcourTextBox(ctrl)
            End If
        Next
    End Sub

Mais dans ton post d'hier, je te propose une solution pour cibler tes contrôles par leurs noms.

http://www.developpez.net/forums/d12...e/#post6886743

A+, Hervé.