Vider Textbox, Checkbox quand TextBox_change

Bonjour,

J'aimerai vider les TextBox ainsi que les checkbox quand il y a TextBox Change, j'ai reussi à faire pour les TextBox, mais je n'arrive pas pour les Checkbox.

Merci de l'aide,

ci-dessous le code utilisé pour vider les textbox

Dim Ctrl As Control
    
'vide les champs (TextBox et ComboBox) sauf le TextBox servant à la recherche
For Each Ctrl In Me.Controls
        
    If Ctrl.Name <> "TextBox_Test" Then
        If TypeName(Ctrl) = "TextBox" Or TypeName(Ctrl) = "ComboBox" Then Ctrl.Text = ""
    End If
        
Next