[kslawy]

السلام عليكم ورحمة الله وبركاته

كود :

Private Sub ListviewCheckBox(ByVal checkState As Boolean)
        If ListView1.Items.Count > 0 Then
            For Each itm As ListViewItem In ListView1.Items
                itm.Checked = checkState
            Next
        End If
    End Sub


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        ListviewCheckBox(True)
    End Sub