Barre d'outil

mese - 12 mai 2000 à 19:32
cs_salsabila Messages postés 5 Date d'inscription dimanche 25 décembre 2005 Statut Membre Dernière intervention 1 janvier 2006 - 26 déc. 2005 à 19:46
Bonjour

J'ai crée une barre d'outils dans mon application.
Si je clique sur un de ses bouttons,la ligne suivante apparait dans le code :
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
Le probleme est que le code que je fais executer se lance pour tous les bouttons de la barre d'outils.
Quelqu'un connait-t-il le moyen de specifier a quel boutton de la barre d'outils s'applique le code a executer ?

Merci

3 réponses

If Button.Key = "Btn1" Then MsgBox "Bouton1!!"

Ici 'Btn1' est le "Nom" que tu inscris dans le champs {Key} lorsque tu configure les boutons de ta barre d'outils.
C'est très simple. Chacun de tes boutons possède un numéro.
Ce numéro est donné par la valeur ByVal.
Si ByVal=1, alors tu as cliqué sur le bouton 1.
Si ByVal=2, alors tu as cliqué sur le bouton 2.
etc...

Utilise ce bloc pour traiter tes différents boutons :

Select Case ByVal
Case 1
rem Traitement du bouton 1

Case 2
rem Traitement du bouton 2

etc...
End Select
cs_salsabila Messages postés 5 Date d'inscription dimanche 25 décembre 2005 Statut Membre Dernière intervention 1 janvier 2006
26 déc. 2005 à 19:46
svp moi aussi j'ai un prob de creation de barre d'outil ,si tu as trouve une soulition aidé moi
Rejoignez-nous