大师:这是帮助中的描述,为何选择该控件的空白区域,选中状态也发生变化呢?如何实现选中复选框或那一行才发生变化呢?
ItemCheck
某一项目的选中状态即将发生变化时执行。
为此,只需将其ItemCheck事件代码设置为:
If e.Checked Then Dim cst As WinForm.CheckedListBox = e.Form.Controls("CheckedListBox1") For idx As Integer = 0 To cst.Items.Count - 1 If idx <> e.Index Then cst.SetItemChecked(idx, False) End If NextEnd If