VB6 actie uitvoeren als selectie in listbox veranderd

[Orcaa]

Heb een form met een listbox en een paar labels erop.
De waarde van de listbox("List1") zijn "A", "B", "C","_", en "1"

Nu wil ik als er in de listbox met de scrollbutton "B" is geselecteerd dan moet van Label1 de caption van leeg veranderen naar "B geselecteerd" en als "A" in listbox staat , moet label1 "A geselecteerd" worden.

Heb eigenlijke alle dingen geprobeerd van List1_click tot List1_GotFocus en List1_Scroll maar bij geen van alle gebeurd er iets. Alleen als je in de listbox daadwerkelijk bv "A" selecteer gebeurd er iets.

Heeft iemand een idee hoe je dit kan doen. Dus alleen maar met scrollbutton een selectie in listbox maken en dan moet er dus een label caption gezet worden

Alvast bedankt

 

[CoD_NL]

Ik heb VB en al helemaal VB6 al jaren niet meer gebruikt, maar even uitgaande van MSDN:

ListBox control: http://msdn.microsoft.com/en-us/library/2yc9d57t(v=vs.90).aspx

De link in het Scroll event verwijst naar de pagina http://msdn.microsoft.com/en-us/library/cxh2w9wf(v=vs.90).aspx en daar staat de volgende tekst:

Scroll Event

The Scroll event in Visual Basic 6.0 is used in conjunction with the TopIndex property to perform actions when the list is scrolled. Visual Basic 2008 does not support the Scroll event; however, in most cases the SelectedIndexChanged event should be a suitable replacement.

Ik verwacht dat hetgeen je wenst dan ook met iets als het onderstaande te bereiken is:

[cpp]
private sub List1_Scroll()
lblInformatie.Caption = List1.TopIndex
end sub
[/cpp]

 

[Orcaa]

bedankt
dit werkt inderdaad. Krijg dan het index nummer terug van 0 tm ..