ItemCheck

某一项目的选中状态即将发生变化时执行。

e参数属性:

Form:     返回触发事件的窗口
Sender:  返回触发事件的控件
Index:   整数型,返回项目位置
Checked:  逻辑型,返回或设置项目新的选中状态。
 

示例:

假定对于下图的CheckedListBox,要求每次只能选中一项,也就是选中一项后,将自动清除其他各项的选中标记:

为此,只需将其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
   
Next

End
If

 

 


本页地址:http://www.foxtable.com/webhelp/topics/0965.htm