An example of a recursive function to clear all TextBox values on a page

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click  
        EmptyTextBoxValues(Me)  
    End Sub  
      
    Private Sub EmptyTextBoxValues(ByVal parent As Control)  
        For Each c As Control In parent.Controls  
            If (c.Controls.Count > 0) Then  
                EmptyTextBoxValues(c)  
            Else  
               If TypeOf c Is TextBox Then  
                   CType(c, TextBox).Text = ""  
               End If  
           End If  
       Next  
   End Sub