Si, si que lo es... más que nada por que ya deberías saber hacerlo, viendo tu código.

If (TypeOf obj Is Label) Then
    obj.Text = ""
End If

Saludos!

Bueno lo he puesto de esta forma y medio va

 Private Sub LimpiarTodoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LimpiarTodoToolStripMenuItem.Click
        For Each obj As Control In Me.Controls
            If (TypeOf obj Is TextBox) Then
                obj.Text = ""
            End If
 
            If (TypeOf obj Is Label) Then
                obj.Text = ""
            End If
 
            If (TypeOf obj Is GroupBox) Then
                For Each caja As Control In obj.Controls
                    If (TypeOf caja Is TextBox) Then
                        caja.Text = ""
                    End If
                Next
            End If
            ListBox1.Items.Clear()
            ListBox2.Items.Clear()
            ListBox3.Items.Clear()
            ListBox4.Items.Clear()
            ListBox5.Items.Clear()
            ListBox6.Items.Clear()
 
        Next 

Solamente que al borrar tambien me borra algunos textos que no deberia de borrar ya que son fijos ,con los listbox no tengo problemas ya que solo pongo los que me interezan borrar, ahora con los otros no se como descriminarlos

luis