При выборе одного CheckBox другие сделать неактивными

For Each c As Control In GroupBox.Controls
            If TypeOf (c) Is Combobox Then
                With CType(c, Combobox)
                    .Enabled = False
                    .Text = ""
                End With
            End If
        Next

    Dim CB As New List(Of CheckBox)
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        For Each c As Control In GroupBox1.Controls
            If TypeOf (c) Is CheckBox Then
                AddHandler CType(c, CheckBox).CheckedChanged, AddressOf ValuevChange
                CB.Add(c)
            End If
        Next
    End Sub
 
    Sub ValuevChange(ByVal ChkBx As CheckBox, ByVal e As System.EventArgs)
        For Each Check As CheckBox In CB
            If Not Check Is ChkBx Then
                Check.Enabled = Not ChkBx.Checked
            End If
        Next
    End Sub

    Dim CB As New List(Of CheckBox)
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        For Each GB As Control In Me.Controls
            If TypeOf GB Is GroupBox Then
                For Each c As Control In GB.Controls
                    If TypeOf (c) Is CheckBox Then
                        AddHandler CType(c, CheckBox).CheckedChanged, AddressOf ValuevChange
                        CB.Add(c)
                    End If
                Next
            End If
        Next
 
    End Sub
 
    Sub ValuevChange(ByVal ChkBx As CheckBox, ByVal e As System.EventArgs)
        For Each Check As CheckBox In CB
            If Not Check Is ChkBx And Check.Parent Is ChkBx.Parent Then
                Check.Enabled = Not ChkBx.Checked
            End If
        Next
    End Sub