24-09-17, 08:23 PM
ضع True للخاصية CheckOnClick
كود :
Private Sub CheckedListBox1_ItemCheck(ByVal sender As Object, ByVal e As ItemCheckEventArgs) Handles CheckedListBox1.ItemCheck
For i = 0 To sender.Items.Count - 1
If i <> e.Index Then sender.SetItemChecked(i, False)
Next
End Subإقتباس :اذا أردت المساعدة من أي أحد لا تضع له مشروع فارغ
