te envío más código por si está algo mal
  Cita:   Dim nuevobotonProducto As New Infragistics.Win.Misc.UltraButton
                Dim primerpaso As Integer
                Dim primerpasoborra As Integer
 
                primerpaso = 1
                primerpasoborra = primerpasoborra + primerpaso
                If primerpasoborra = 1 Then
                    For Each nuevobotonProducto In Me.Controls
                        If TypeOf nuevobotonProducto Is Infragistics.Win.Misc.UltraButton Then
                            nuevobotonProducto.Controls.Clear()
                        End If
                    Next