VB: Clear all Text Boxes and Combo Boxes

    Public Sub ClearBoxes(parent As Control)
        For Each child As Control In parent.Controls
            ClearBoxes(child)
        Next
        If TryCast(parent, TextBox) IsNot Nothing Then
            TryCast(parent, TextBox).Text = ""
        End If
        If TryCast(parent, ComboBox) IsNot Nothing Then
            TryCast(parent, ComboBox).SelectedIndex = -1
        End If
    End Sub