Affichage ListBox dans labelRésolu

Question

Bonsoir,   

Sur mon formulaire je souhaite avoir une ListBox d'un cot&#233;, de l'autre un label et que dans ce label s'affiche un &#233;l&#233;ment de ma listbox que je fais d&#233;filer en cliquant sur un bouton pr&#233;c&#233;dent ou suivant.
J'esp&#232;re avoir &#233;t&#233; assez explicite.

Merci par avance de vos r&#233;ponses et bonne soir&#233;e.

Chubaka73

Gobillot · Accepted Answer

Private Sub CmdPrecedent_Click()

    Dim i As Integer

    i = List1.ListIndex

    If i > 0 Then

       i = i - 1

       List1.ListIndex = i

       Label1 = List1.List(i)

       End If

End Sub



Private Sub CmdSuivant_Click()

    Dim i As Integer

    i = List1.ListIndex

    If i < List1.ListCount - 1 Then

       i = i + 1

       List1.ListIndex = i

       Label1 = List1.List(i)

       End If

End Sub


Daniel

chubaka73 · Answer

Je te remercie beaucoup, je pense gr&#226;ce &#224; ton aide avoir compris pas mal de choses.

Encore merci, bonne fin de week end et bonne programmation 

Chubaka73

Affichage ListBox dans label

2 réponses

Discussions similaires