erreur dans listbox

Bonsoir
Voila j'ai une application qui utilise des listbox, le probléme est que lorsque je click sans faire attention dans la pertie blanche de la listbox j'ai une erreur.
je voudrais savoir comment gérer ce pb???

message :

InvalidArgument=La valeur '-1' n'est pas valide pour 'index'.
Nom du paramètre : index
Code:

1 2 3 4 5 6 Private Sub ListBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListBox1.MouseDown ListBox1.DoDragDrop(ListBox1.Items(ListBox1.IndexFromPoint(e.X, e.Y)), DragDropEffects.Copy Or DragDropEffects.Move) End Sub
bon et bien merci par avance.
Philippe

Bonjour.

Teste d'abord la validité de l'index :

Code:

1
2
3
4
5
6
7
 
Private Sub ListBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListBox1.MouseDown
 
        if ListBox1.IndexFromPoint(e.X, e.Y) < 0 then exit sub
        ListBox1.DoDragDrop(ListBox1.Items(ListBox1.IndexFromPoint(e.X, e.Y)), DragDropEffects.Copy Or DragDropEffects.Move)
 
End Sub

Cdt.

et au lieu de faire du nimp avec .IndexFromPoint

Code:

1
2
3
4
5
6
Private Sub ListBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListBox1.MouseDown
 
    if ListBox1.SelectedIndex < 0 then exit sub ' quand il n'y a rien de selectionné, listbox.selecteditem répond -1
    ListBox1.DoDragDrop(ListBox1.SelectedItem,d DragDropEffects.Copy Or DragDropEffects.Move)
 
End Sub

Bonjour.

C'est pas faux Sperot51 :lol: !

J'avais pas bien les yeux ouverts sur le coup :lol: !

Cdt.

oui, un suffit pour répondre à la question mais avec le 2eme on peut voir les détours de code :D

Et si tu veux gagner une ligne:

Code:

1
2
3
4
5
Private Sub ListBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListBox1.MouseDown
 
    if not ListBox1.SelectedIndex < 0 then ListBox1.DoDragDrop(ListBox1.SelectedItem,d DragDropEffects.Copy Or DragDropEffects.Move)
 
End Sub

Bonjour

merci ça marche super!!!!

@+
Philippe