Dim xControl As Control
For Each xControl In me.Controls
If TypeOf xControl Is TextBox Then
xControl.ResetText()
End If
If TypeOf xControl Is CheckBox Then
DirectCast(xControl , CheckBox).CheckState = CheckState.Unchecked
End If
If TypeOf xControl Is RadioButton Then
DirectCast(xControl , RadioButton).Checked = False
End If
If TypeOf xControl Is ComboBox Then
xControl.ResetText()
End If
Next