Rubrik: Controls · ListBox & ComboBox | VB-Versionen: VB2005, VB2008 | 21.07.09 |
Ich hatte in der Praxis das Problem, dass man bei Verwendung der CheckedListbox normalerweise immer mehrere Items wählen/abwählen kann. Folgender Tipp zeigt das kleine Programm, wie im Click-Ereignis der Box abgefangen werden kann, dass eben nur ein Item wählbar ist, alle anderen angezeigten nicht.
Private Sub CheckedListBox1_Click(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles CheckedListBox1.Click
' nur ein Item kann ausgewählt werden.
With CheckedListBox1
For i As Integer = 0 To .Items.Count - 1
If Not sender.Equals(.Items(i)) Then .SetItemChecked(i, False)
Next
End With
End Sub
Hinweis:
Bei der CheckedListbox muss die Eigenschaft CheckOnClick auf True gesetzt sein.