Sélectionner une ligne avec clic droit dans listbox

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 295 fois - Téléchargée 132 fois

Contenu du snippet

Code permettant de sélectionner une ligne de listbox avec le clic droit comme avec le clic gauche.

Dans une feuille possédant une listbox 'list1', coller le code suivant :

Source / Exemple :


Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)

Private Sub Form_Load()
List1.AddItem ("1")
List1.AddItem ("2")
List1.AddItem ("3")
List1.AddItem ("4")
List1.AddItem ("5")
End Sub

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

    If Button = vbLeftButton Then

    ElseIf Button = vbRightButton Then
        
        'Simulation du clic droit de la souris
        Call mouse_event(2, 0, 0, 0, 0)
        Call mouse_event(4, 0, 0, 0, 0)
        DoEvents
        
    End If

End Sub

Conclusion :


Non révolutionnaire, mais peut éventuellement servir.

A voir également

Ajouter un commentaire

Commentaires

Messages postés
86
Date d'inscription
lundi 17 novembre 2003
Statut
Membre
Dernière intervention
9 mars 2006

AAaaah super j'ai trouver la solution a mon probléme
10/10 ;)
Messages postés
6
Date d'inscription
lundi 27 octobre 2003
Statut
Membre
Dernière intervention
23 janvier 2005

Est ce que ce code marche avec .NET?
si non qqn peut il me faire passer comment le faire...
Merci
Messages postés
24
Date d'inscription
vendredi 30 août 2002
Statut
Membre
Dernière intervention
1 octobre 2004

merci man pour cette source ça va me permetre de resoudre un prob(pas tres important mais un peu chiant) bien ouech
Messages postés
161
Date d'inscription
mardi 19 juin 2001
Statut
Membre
Dernière intervention
10 avril 2007

Exellent ! Moi je faisais ça de façon malpropre avec un timer :P
Thx pour cette super astuce :)

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.