Liste déroulante a la souris

Soyez le premier à donner votre avis sur cette source.

Snippet vu 6 653 fois - Téléchargée 39 fois

Contenu du snippet

Ce code permet de faire des listes déroulante sur les boutons de la souris

Source / Exemple :


''Toto est le nom de la forme

'' Crée la lsite avec l'éditeur de menu
menu01 (non visible)
....menu02(visible)
....menu03(visible)
....menu04(visible)
....menu05(visible)
............menu06(visible)

''ENsuite dans la form
Private Sub TOTO_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
   
  Select case Button
    case is = vbRightButton Then '' sur le bouton droit
        PopupMenu TOTO.popup_menu
    case is = vbleftButton Then '' sur le bouton gauche
    
    case is = vbcenterButton Then '' bouton centrale
      
   case else
    
    End Sub

A voir également

Ajouter un commentaire

Commentaires

cs_Womby
Messages postés
69
Date d'inscription
jeudi 29 août 2002
Statut
Membre
Dernière intervention
27 avril 2007
-
Pas tres tres fortement expliqué. Si tu pouvait donner plus de renseignement ca serait pas mal Thanks :)
cs_Womby
Messages postés
69
Date d'inscription
jeudi 29 août 2002
Statut
Membre
Dernière intervention
27 avril 2007
-
Oups autant pour moi c etait plus simple que ce que je ne voulait comprendre :)
cs_Clem
Messages postés
282
Date d'inscription
dimanche 1 avril 2001
Statut
Membre
Dernière intervention
12 février 2007
-
oui, c simle, mais je crois que tu tes troupé VNathanael : dans les if tu as mit deux foix vbrightbutton, il faut en mettre un des deux en left.
Et au lieu de faire deux blocs if pour faire la même chose, autant en faire un seul avec une fonction ou :


If Button vbRightButton Or Button vbLeftButton Then
PopupMenu Frm_00_principale.popup_menu
end if
Guidelor
Messages postés
236
Date d'inscription
jeudi 31 octobre 2002
Statut
Membre
Dernière intervention
18 août 2006
-
HEEEEEEE !!!! C peut-être bien comme prog mais qu'est-ce que ca vient faire dans la catégorie DirectX ?!?!?!? Change-moi vite ca !!!
Guidelor
Messages postés
236
Date d'inscription
jeudi 31 octobre 2002
Statut
Membre
Dernière intervention
18 août 2006
-
HEEEEEEE !!!! C peut-être bien comme prog mais qu'est-ce que ca vient faire dans la catégorie DirectX ?!?!?!? Change-moi vite ca !!!

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.