VB LISTBOX STYLE CHECKBOX: Evidenziazione pari a selezione
Ho una listbox style checkbox, ho fatto in modo che solo un elemento x volta venga selezionato ma se scorro con le frecce da tastiera su e giu mi appare un’evidenziazione blu,(se invece clicco su un item me la seleziona col check).
Io voglio che, sia cliccando che spostandomi con la tastiera , se evidenzio seleziono anche e viceversa. Spero che mi avete capito… devo impostare l’evento keydown? Com’è il codice?
Private Sub List1_ItemCheck(index As Integer)
If List1.Selected(index) = True Then
VALUE = 1
List2.Clear
ElseIf List1.Selected(index) = False Then
VALUE = 0
End If
If List1.Selected(index) = True Then
For i = 0 To List1.ListCount - 1
List1.Selected(i) = False
List1.Selected(index) = True
Next
End If