Parcourir les contrôles d'une form

Bonjour,

Je ne comprends pas pourquoi ce code génère une erreur :

Code:

---

1 2 3

For Each tb As TextBox In Me.Controls tb.Text = "" Next

---

L'erreur est :
Impossible d'effectuer un cast d'un objet de type 'System.Windows.Forms.Button' en type 'System.Windows.Forms.TextBox'.
Pourquoi est ce que VS me parle de System.Windows.Forms.Button ?
D'avance merci !

Hello,

Parce que quand tu fais appels à Me.controls, il va chercher tous tes controls... donc les boutons, les textbox et autres...

Donc ta boucle cherche le premier control, un bouton, et là il essaie de le caster dans un Textbox vu que dans ta boucle tu castes tous les controls dans ta variable tb.

Il faut plutôt faire un truc du style :

Code:

---

For each ctr as control in Me.Controls

---

puis tester ce control :

Code:

---

if ctr.Gettype = ....

---

La je me souviens plus, si on test le nom "textebox" ou si faut tester le type textbox, je pense que tu vas trouver facilement.

Merci pour ton aide.
N'arrivant pas à utiliser GetType, j'ai utilisé TypeOf :

Code:

---

1 2 3 4 5

For Each ctrl As Control In Me.Controls If TypeOf ctrl Is TextBox Then ctrl.Text = "" End If Next

---

Et ça fonctionne.
Encore merci et bonne journée

J'attire ton attention sur le fait qu'un control tel qu'un panel possède sa propre collection de control (pouvant contenir des textbox par exemple).

Pour être exact, ta boucle doit aussi vérifier la propriété HasChildren du Control et le cas échant faire un appel récursif sur la liste interne des controls.