[VB] ListBox : verifier avant de selectionner

Bonjour,
J'ai une listbox et je voudrais savoir comment faire pour verifier qu'un item est selectionner avant de le selectionner, car dans mon cas, le checkbox est parfois coche et donc se decoche alors que je veux qu'il soit coche dans tous les cas.

Merci

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub CmdSupp_Click() If ListArchive.SelCount > 1 Then SuppLignes ' au moins une ligne est en cour de selection End Sub   Public Sub SuppLignes() For T = ListArchive.ListCount - 1 To 0 Step -1 If ListArchive.Selected(T) = True Then ListArchive.RemoveItem (T) Next T End Sub

---

Ce petit bout de code supprime les lignes d'un listbox, je pense qu'il repond à ton problem pour la partie

Citation:

---

pour verifier qu'un item est selectionner avant de le selectionner

---

Une ligne du style :

Code:

---

1 2 3

If ListArchive.Selected(T) = True Then '...... End if

---

Salut

Il faut vérifier si la propriété ListIndex est plus grand que -1. La valeur -1 signifiant qu'aucune sélection n'a été faite.