Extended Multi Select List Box and Keyboard navigation

H

Hakan Naslund

Hi!

I have a listbox configured as Extended Multi Select.

On the After Update Event, I have this code:
Private Sub List0_AfterUpdate()
For Each itm In List0.ItemsSelected
Debug.Print List0.ItemData(itm)
Next itm
End Sub

If I use the mouse to select records (just single records, no ctrl or
shift!), the
debug.print return the correct row and data.

BUT if I use the keyboard arrow keys to move up/down in the listbox,
the debug.print will show the values of the row that was active before the
up/down move!

Let's say my list box shows the following rows:
Andrew
Burt
Charlie
Derek

A mouseclick on Burt will debug.print '1 Burt'
A mouseclick on Charlie will debug.print '2 Charlie'

If I now use the keyboard's down key to move to Derek, it will still print
'2 Charlie' !
And if I press the up key and move back to Charlie, it prints '3 Derek'.

So when using the keyboard I'm always one step behind what's actually
marked...

Any ideas?

Hakan Naslund
Sweden
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

List box returns wrong value 6
Iteration through a multi-Select List box 2
Show the value of a multi-select list box selection 2
Multi Select List Not Working 1
Multi-select multi column list box 4
Clear items selected from multiselect list box 2
Coding Combo Box for keyboard navigation 4
Combo Box Mouseover selection 4

Top