Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

comment changer la valeur BackColor ?

4 réponses
Avatar
Bartez
Bonjour à tous,

Je change actuellement la propriété BackColor de tous les objets contenus
dans un formulaire en les nomant 1 à 1.
du genre :
MonFormulaire.Frame1.BackColor = &H00FFC0C0&
MonFormulaire.Frame2.BackColor = &H00FFC0C0&
MonFormulaire.Label1.BackColor = &H00FFC0C0&
...etc.

Existerait-il un moyen plus efficace pour faire cela sous forme d'une boucle
par exemple ?

Merci de votre aide
@+
Bartez

4 réponses

Avatar
Ardus Petus
(Non testé)

dim c as Object
for each c in MonFormulaire.Controls
c.BackColor= &H00FFC0C0
next c

Cordialement,
--
AP

"Bartez" a écrit dans le message de news:

Bonjour à tous,

Je change actuellement la propriété BackColor de tous les objets contenus
dans un formulaire en les nomant 1 à 1.
du genre :
MonFormulaire.Frame1.BackColor = &H00FFC0C0&
MonFormulaire.Frame2.BackColor = &H00FFC0C0&
MonFormulaire.Label1.BackColor = &H00FFC0C0&
...etc.

Existerait-il un moyen plus efficace pour faire cela sous forme d'une
boucle par exemple ?

Merci de votre aide
@+
Bartez



Avatar
JLuc
Bonjour à tous,

Je change actuellement la propriété BackColor de tous les objets contenus
dans un formulaire en les nomant 1 à 1.
du genre :
MonFormulaire.Frame1.BackColor = &H00FFC0C0&
MonFormulaire.Frame2.BackColor = &H00FFC0C0&
MonFormulaire.Label1.BackColor = &H00FFC0C0&
...etc.

Existerait-il un moyen plus efficace pour faire cela sous forme d'une boucle
par exemple ?

Merci de votre aide
@+
Bartez


Pas testé, mais :
For Each ctrl In Me.Controls
ctrl.BackColor = &H00FFC0C0&
Next
Devrait aller, dis nous

--
JLuc

Avatar
Bartez
Ok, JLuc, ça fonctionne.

Merci pour ton aide

@+
Bartez

"JLuc" a écrit dans le message de news:

Bonjour à tous,

Je change actuellement la propriété BackColor de tous les objets contenus
dans un formulaire en les nomant 1 à 1.
du genre :
MonFormulaire.Frame1.BackColor = &H00FFC0C0&
MonFormulaire.Frame2.BackColor = &H00FFC0C0&
MonFormulaire.Label1.BackColor = &H00FFC0C0&
...etc.

Existerait-il un moyen plus efficace pour faire cela sous forme d'une
boucle par exemple ?

Merci de votre aide
@+
Bartez


Pas testé, mais :
For Each ctrl In Me.Controls
ctrl.BackColor = &H00FFC0C0&
Next
Devrait aller, dis nous

--
JLuc





Avatar
Bartez
Merci AP pour ton aide.
C'est quand même bien plus rapide que ma longue liste d'objets !

@+
Bartez

"Ardus Petus" a écrit dans le message de news:
%
(Non testé)

dim c as Object
for each c in MonFormulaire.Controls
c.BackColor= &H00FFC0C0
next c

Cordialement,
--
AP

"Bartez" a écrit dans le message de news:

Bonjour à tous,

Je change actuellement la propriété BackColor de tous les objets contenus
dans un formulaire en les nomant 1 à 1.
du genre :
MonFormulaire.Frame1.BackColor = &H00FFC0C0&
MonFormulaire.Frame2.BackColor = &H00FFC0C0&
MonFormulaire.Label1.BackColor = &H00FFC0C0&
...etc.

Existerait-il un moyen plus efficace pour faire cela sous forme d'une
boucle par exemple ?

Merci de votre aide
@+
Bartez