vb.net: zapri vse tabcontrole

V VB.netu bi rad napisal SUB, kateri skrije vse instance tabcontrol-ov na formi.
Poskušal sem takole pa ne gre :

Sub tab_zapre()
        Dim tab As System.Windows.Forms.TabControl
        For Each tab In Me.Controls
            tab.Visible = False
        Next tab
    End Sub

pri vrstici for each tab javi:
Unable to cast object of type 'System.Windows.Forms.SplitContainer' to type 'System.Windows.Forms.TabControl'.

Poiskus takole:

 Sub tab_zapre() 
       Control control = Nothing     
       For Each control In Me.Controls
          if (control == typeof(System.Windows.Forms.TabControl)) then   
            control.Visible = False
        Next tab
    End Sub 

Ja potem pol pa nared vgezdeno zanko al pa če greš rekurzivno čez vse kontrole, poiščeš TabControle in jim daš visible na false.

  Sub tab_zapre()
      Control control = Nothing    
      For Each control In Me.Controls
        if (control == typeof("splitcontainer")) then
           Control control1 = Nothing 
           For Each control1 In control.Controls
             if (control == typeof(System.Windows.Forms.TabControl)) then  
               control.Visible = False
           Next tab
       Next tab
  End Sub

Lahko preprosto napises rekurzivno funkcijo, ki ti preisce vse komponente poljubno globoko in ti vrne vse komponente dolocenega tipa.


Druga stvar:

If TypeOf (chd) Is TabControl Then
chd.visible = false

ti najbrz skrije tudi svoje otroke, ali pač?