plusieurs ListBox: petit pb visuel

Question

Bonjour,

Voila mon probl&#232;me: j'ai un panel dans lequel je cr&#233;&#233; plusieurs ListBox. La navigation se passe bien, sauf quand je passe d'une LB &#224; la suivante, le dernier item de la LB pr&#233;c&#233;dente reste affich&#233; en mode s&#233;lectionn&#233;, malgr&#233; mes efforts pour qu'il ne le soit plus...

J'ai mis ca dans la gestion des touches:
Private Sub LB_KeyDown (ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs)
        Dim idx As Integer
        Dim thisLB As ListBox = CType(sender, ListBox)

        Select Case e.KeyCode
            Case Keys.Down
                ' item suivant?
                idx = thisLB.SelectedIndex
                If (idx = thisLB.Items.Count - 1) Then
                    'dernier de la liste
                    ' on d&#233;s&#233;lectionne
                    thisLB.SetSelected(idx, False)
                    thisLB.ClearSelected()
                    thisLB.Update()
                    ' on passe &#224; la liste suivante
                         ...
                End If
        End Select
End Sub

Ai-je oubli&#233; quelque chose? (apparament oui, puisque ca ne fonctionne pas...)

Merci d'avance pour votre aide.

econs · Answer

Salut,



Sur le click d'une listbox, d&#233;sactive la s&#233;lection de l'autre listbox, comme ceci :


Private Sub ListBox2_Click()

    ListBox1.SelectedIndex = -1

End Sub


Manu

clubcs · Answer

Bonjour,

Merci de ta r&#233;ponse, mais c'est d&#233;j&#224; fait par ClearSelected() ca... 
Je l'ai quand m&#234;me ajout&#233;, mais ca ne marche pas ...

Plusieurs ListBox: petit pb visuel

2 réponses

Discussions similaires