For each controle ? [Résolu]

Messages postés
234
Date d'inscription
mercredi 25 octobre 2000
Statut
Membre
Dernière intervention
5 octobre 2012
- - Dernière réponse : Renfield
Messages postés
17280
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
21 juillet 2019
- 6 janv. 2009 à 03:27
Meilleurs voeux à tous !
Bon une question con : Je place des conmmandButton dans un pictureBox. Je souhaite faire un for each des controls comme ceci mais ca marche point... comment fait on ? :

Dim c As CommandButton


For Each c In Picture1
c.Caption = "a"
Next
Afficher la suite 

3 réponses

Meilleure réponse
Messages postés
1822
Date d'inscription
mardi 31 mai 2005
Statut
Membre
Dernière intervention
26 octobre 2010
3
Merci
http://articles.techrepublic.com.com/5100-10878_11-6031208.html

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 200 internautes nous ont dit merci ce mois-ci

Commenter la réponse de violent_ken
Messages postés
578
Date d'inscription
vendredi 26 septembre 2008
Statut
Membre
Dernière intervention
20 novembre 2010
4
3
Merci
peug

Merci, et meilleurs voeux à toi aussi. 
D'une part Picture1 n'est pas une collection d'objets, et d'autre part il n'est pas du même type que c.
Une boucle For Each doit mettre en jeu un objet et une collection d'objets de même type. Par exemple,
Dim c As Control
For Each c in Me.Controls...

Amicalement

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 200 internautes nous ont dit merci ce mois-ci

Commenter la réponse de cs_Orohena
Messages postés
17280
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
21 juillet 2019
58
3
Merci
Dim oCtl As Control
For Each oCtl In Me.Controls
If TypeOf oCtl Is CommandButton Then
If oCtl.Container Is Picture1 Then
MsgBox oCtl.Name
End If
End If
Next oCtl

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 200 internautes nous ont dit merci ce mois-ci

Commenter la réponse de Renfield