Hiding and Showing TabPages in tabControl

 If Me.chkShowTab1.Checked = True Then

    Me.tabsShown.TabPages.Add(Me.tabsHidden.TabPages("Tab1"))

    Me.tabsHidden.TabPages.RemoveByKey("Tab1")

Else

    Me.tabsHidden.TabPages.Add(Me.tabsShown.TabPages("Tab1"))

    Me.tabsShown.TabPages.RemoveByKey("Tab1")

End If