Recherche
Recherche
Les mémos
Je débute...
Visites

 994650 visiteurs

 2 visiteurs en ligne

FAQ
Déplier Fermer  Formulaire

Les boutons des formulaires ont par défaut une apparence grise.


Si l'on remplace le bouton par une étiquette (Label), il est possible d'utiliser une couleur pour le texte comme pour les boutons, mais en plus il est possible d'attribuer un couleur de fond. L'impression de mouvement, l'enfoncement, sera obtenu en ajoutant deux lignes de code.


Par défaut, on donnera l'apparence "en relief" à l'étiquette.


Private Sub Bouton_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

Me.Bouton.SpecialEffect = 2

End Sub


Private Sub Bouton_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

Me.Bouton.SpecialEffect = 1

End Sub


Dernière modification :02/02/2007 : 17:08 Hyperlien