高分紧急求助：如何用代码实现切换tabstrip控件中的选项卡啊!!

[orinyangyang]

各位大侠，请问如何用代码实现切换tabstrip控件中的选项卡啊!!
实在紧急，在线等。。。

[junki]

'选择第三页
TabStrip1.Tabs(2).Selected = True

[tripman]

'在tabstrip点击选项卡的时候设置需要和不需要显示的控件,例如:
Private Sub tabstrip1_Click()
Dim iTab As Long
Dim iT As Long
iTab = tabstrip1.SelectedItem.Index - 1
picTab(iTab).Visible = True
For iT = 0 To tabstrip1.Tabs.Count - 1
picTab(iT).Visible = (iT = iTab)
Next iT
End Sub

'tabstrip不方便，换个SSTab吧简单些不用在单击选项卡时写代码

[fishboyok]

tab属性吧

[orinyangyang]

fishboyok(fish)，能说的详细点吗？我用了tabs和tab属性都不行啊。谢谢