Ayuda con CheckedListBox (DesSeleccionar)

[juantux]

Espero te ayude este codigo:

Código:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        For i As Integer = 1 To 10
            chkList1.Items.Add("Elemento" & i.ToString)
        Next
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        For i As Integer = 0 To chkList1.Items.Count - 1
            If chkList1.GetItemChecked(i) = True Then
                chkList1.SetItemChecked(i, False)
            End If
        Next
    End Sub

Buena suerte...