You can try this....
Private Sub clearControl(ByVal ctrls As Control.ControlCollection)
For Each ctrl As Control In ctrls
If TypeOf ctrl Is TextBox Then
CType(ctrl, TextBox).Text = String.Empty
End If
If ctrl.Controls.Count > 0 Then
clearControl(ctrl.Controls)
End If
Next
End Sub