Checkbox in Listbox

[mharcourt]

I am using a listbox with checkboxes. I'm looking for a way to have the checkbox change its state (unchecked to checked or checked to unchecked) if a user clicks on an item. Silly of me to assume a checkbox and the item are treated as one object. Any help would be greatly appreciated.

 

[1127]

Hi,

when the checkbox is changing the it's value the ItemCheck event fires.

Best regards,
Tibi

 

[Swi]

Private Sub lstUsers_ItemCheck(Item As Integer)
Dim u As Integer
Dim Index As Integer
Index = lstUsers.ListIndex
For u = 0 To lstUsers.ListCount - 1
If lstUsers.Selected(u) Then lstUsers.Selected(u) = False
Next
lstUsers.Selected(Index) = True
End Sub

Swi

 

[mharcourt]

The itemcheck sub does not seem to kick in until you either select the item twice or double click on the item. Shouldn't this kick in on one click? Also, if multiple selections are required do I need to track previous selections?