Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Bouton à bascule enfoncé

Bouton à bascule enfoncé

3 réponses
Avatar
tonio
Bonjour,

J'ai des boutons à bascule mais selon les postes, on arrive pas à faire
la différence entre les boutons enfoncés et ce qui ne le sont pas.

Quelqu'un aurait-il une solution?

ou une idée

Merci d'avance

--
Tonio
Débutant mais volontaire ;-)
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
3stone
Salut,

"tonio"
| J'ai des boutons à bascule mais selon les postes, on arrive pas à faire
| la différence entre les boutons enfoncés et ce qui ne le sont pas.


Un bouton à bascule peut comporter un texte (de couleur), comme un bouton normal...

Il suffit de jouer sur ces propriétés :


If Bascule = True Then
Bascule.Caption = "Homme"
Bascule.ForeColor = vbRed
Else
Bascule.Caption = "Dame"
Bascule.ForeColor = vbBlack
End If


que tu place dans la Sub sur après mise à jour...


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
Tonio
3stone a utilisé son clavier pour écrire :
Salut,

"tonio"
J'ai des boutons à bascule mais selon les postes, on arrive pas à faire
la différence entre les boutons enfoncés et ce qui ne le sont pas.



Un bouton à bascule peut comporter un texte (de couleur), comme un bouton
normal...

Il suffit de jouer sur ces propriétés :


If Bascule = True Then
Bascule.Caption = "Homme"
Bascule.ForeColor = vbRed
Else
Bascule.Caption = "Dame"
Bascule.ForeColor = vbBlack
End If


que tu place dans la Sub sur après mise à jour...


En fait j'ai commis une petite erreur
Ce n'est pas un bouton à bascule mais un bouton d'un groupe de choix.


Avatar
3stone
re,

"Tonio"
| En fait j'ai commis une petite erreur
| Ce n'est pas un bouton à bascule mais un bouton d'un groupe de choix.


Le principe reste le même...

Si ton groupe d'options comptes 3 bascules :

Bascule1.ForeColor = vbBlack
Bascule2.ForeColor = vbBlack
Bascule3.ForeColor = vbBlack

Select Case Cadre1
Case 1
Bascule1.ForeColor = vbRed
Case 2
Bascule2.ForeColor = vbRed
Case 3
Bascule3.ForeColor = vbRed
End Select



--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/