控件tabstrip一些问题求各位帮忙！

Question

那位使用过tabstrip这个控件的给小弟回复一下，找了很多书都没看到关于tabstrip一些具体的设置，我的问题是：我的tabstrip空间有两个选项卡--表清理，表初始化。两个界面上有不同的内容要显示，用哪个属性来控制选者表清理对它设置，然后在选另外的。谢谢了！！

Answer 1

tabstrip不需要做什么设置，如果一定要设置则是设置她的选择项卡有多少个，每个标题是什么控件是不放在tabstrip上的，而是放在不同的frame 或者pic内，然后在click中写代码决定哪个frame或者pic被显示出来,因为frame和pic才是真正的主载体，tabstrip并不是载体
Private Sub Tabstrip1_Click()
   If Tabstrip1.SelectedItem.Index = mintCurFrame Then Exit Sub
    Frame1(Tabstrip1.SelectedItem.Index).Visible = True
    Frame1(mintCurFrame).Visible = False
    mintCurFrame = Tabstrip1.SelectedItem.Index
End Sub

Answer 2

建立一个FRAME控件组，INDEX分别为0和1，对应你的TAB的页，将对应的控件放在FRAME中
Private Sub TabStrip1_Click()
    Frame1(TabStrip1.SelectedItem.Index - 1).ZOrder 0
End Sub

Answer 3

SSTab（Microsoft Tabbed Dialog Control 6.0）控件设计比较方便，在设计时可以随意切换选项卡TabStrip控件好象在设计时不能切换选项卡（我不知道怎么切换@@），只好在运行时调整：Public Sub TabStrip1_Click()    
    Select Case TabStrip1.SelectedItem.Index
        Case 1 '选中第1个选项卡
        Me.Fra_2.Visible = False
        Me.Fra_3.Visible = False
        Me.FramAdvanced.Visible = False
        Me.frmN.Visible = True
        
        Case 2 '选中第2个选项卡
        Me.frmN.Visible = False
        Me.Fra_2.Visible = False
        Me.Fra_3.Visible = False
        Me.FramAdvanced.Visible = True
        
        Case 3 '选中第3个选项卡
        Me.frmN.Visible = False
        Me.Fra_3.Visible = False
        Me.FramAdvanced.Visible = False
        Me.Fra_2.Visible = True
        Case 4 '选中第4个选项卡
        Me.frmN.Visible = False
        Me.Fra_2.Visible = False
        Me.FramAdvanced.Visible = False
        Me.Fra_3.Visible = True
        Case Else
        
    End Select
End Sub