Petit effet moderne pour boutons

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 376 fois - Téléchargée 37 fois

Contenu du snippet

Voila une petite petite source sympatoche pour mettre en gras les captions des boutons
je sais c'est pas grand chose mais ca peut quand même être interressant pour animer et amélirer ses menus
J'ai essayé de mettre un niveau de 0.5 mais j'ai pas réussi, alors pas besoin de me dire que cette source est ne mérite même pas le niveau, je sais
Mettez juste 4 bouttons sur une feuille et c'est tout

Source / Exemple :


Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
   Gras 1, 0, 0, 0
End Sub

Private Sub Command2_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
   Gras 0, 1, 0, 0
End Sub

Private Sub Command3_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Gras 0, 0, 1, 0
End Sub

Private Sub Command4_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Gras 0, 0, 0, 1
End Sub

Public Sub Gras(Val1, Val2, Val3, Val4 As Integer)
    Command1.FontBold = Val1
    Command2.FontBold = Val2
    Command3.FontBold = Val3
    Command4.FontBold = Val4
End Sub

A voir également

Ajouter un commentaire Commentaires
Messages postés
119
Date d'inscription
mercredi 19 juin 2002
Statut
Membre
Dernière intervention
21 avril 2009

DÉJA VU!!!
Et inutile
Messages postés
6
Date d'inscription
vendredi 8 novembre 2002
Statut
Membre
Dernière intervention
2 février 2003

c'st pas mal je te met 5/10 la moyen pour t encourager et faire mieux
salut a toi
Messages postés
19
Date d'inscription
mardi 15 janvier 2002
Statut
Membre
Dernière intervention
22 avril 2002

Nan ya pas vraimen de nouveauté... le truc est de revoir totalement le design des controles windows, qui sont totalements pauvres (et gris)
Messages postés
415
Date d'inscription
mardi 3 avril 2001
Statut
Membre
Dernière intervention
26 avril 2008

Bof... ya rien de tres innovateur la deds... mais kan meme bien

change ton titre pour "Effet pour boutton" , le moderne na pas sa place!

6/10
Messages postés
656
Date d'inscription
mercredi 22 août 2001
Statut
Membre
Dernière intervention
11 mars 2005
13
en tout cas Alan71, c klr que celle la n'est pas d'un grand interet ...
Afficher les 8 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.