Visual Basic - Necesito ayuda con el control tabstrip

Tengo en un formulario un control Tabstrip con varias pestañas, en cada una de estas quiero manejar otros controles; lo que hice fue insertar un grupo de control frame como contenedor de estos controles. Cada frame estara asociado a una pestaña, basandose un su propiedad index. Como los arrays de controles comienzan en el Index 0 y la coleccion Tabs comienza en el index 1, asocie frame(n) con tab(n+1).

El codigo que deberìa hacer esto es:
Private Sub Form_Load()
currentTab = 1
'Set TabStrip1.SelectedItem = TabStrip1.Tabs(currentTab)
Frame1(currentTab - 1).Visible = True

End Sub

Private Sub TabStrip1_Click()

If TabStrip1.SelectedItem.Index = currentTab Then Exit Sub
Frame1(TabStrip1.SelectedItem.Index - 1).Visible = True
Frame1(currentTab - 1).Visible = False
currentTab = TabStrip1.SelectedItem.Index

End Sub

Pero no lo hace y no encuentro el error podrian ayudarme?

Gracias de antemano.

Si en lugar del control TabStrip utilizas el Microsoft Tabbed Dialog Control, no tendrás que hacer todo eso, ya que el propio control se encarga de mostrar los controles que contiene cada pestaña.

declaraste la variable como global ?
creo que no la declaraste, y vb creo una variable local por eso al salir del procedimiento la variable se destruye.

declaralo como global y servira y todos los frames como invisible al comenzar