Clear All Textbox and Uncheck all checkbox in VB.Net

 Private Sub clear()
        For Each textclear As Control In Me.Controls
            If TypeOf textclear Is TextBox Then
                textclear.Text = “”

            End If
            If TypeOf textclear Is CheckBox Then
                DirectCast(textclear, CheckBox).Checked = False

            End If
        Next
    End Sub