我加了3个选项卡和3个Frame,代码如下:
Private Sub TabStrip1_Click()
Select Case TabStrip1.SelectedItem.Index
Case 1 Frame1.Visible = True
Frame2.Visible = False
Frame3.Visible = False
Case 2 Frame1.Visible = False
Frame2.Visible = True
Frame3.Visible = False
Case 3 Frame1.Visible = False
Frame2.Visible = False
Frame3.Visible = True
End Select
End Sub
可是这样,第2个和第3个都不显示。要怎么做才行????
Private Sub TabStrip1_Click()
Select Case TabStrip1.SelectedItem.Index
Case 1 Frame1.Visible = True
Frame2.Visible = False
Frame3.Visible = False
Case 2 Frame1.Visible = False
Frame2.Visible = True
Frame3.Visible = False
Case 3 Frame1.Visible = False
Frame2.Visible = False
Frame3.Visible = True
End Select
End Sub
可是这样,第2个和第3个都不显示。要怎么做才行????
这样把frame直接放到不同的tab上即可
就不用再控制显示了
以上代码我这里测试没问题
用sstab 总比 tabstrip好很多。