Clear all the text box together

 I am using more then one text box in one form, i want to clear all these text boxes in one shot. currently i am doing it individually like "textbox1.value="",textbox2.value="" ...". Can any body tell me better way to do the same?

clear text boxes

For Each theControl In UserForm1.Controls
theControl.Value = ""
Next