我在vb6中使用SSTab,我有2个标签:“Tab1”,“Tab2”。
哪个Tab1有内容这样的框架,dll。
并且Tab2没有内容,然后,我想要点击Tab“Tab2”,它显示另一种形式,并没有显示空白内容。 就像使用Form.Show和Form.Hide函数一样。
我从网上搜索过,我发现了这段代码:
Private Sub SSTab1_Click(PreviousTab As Integer)
If SSTab1.Tab Then
Form2.Show
End If
End Sub
是的,它有效,但是当我点击任何标签时表格会打开,我希望当我点击“Tab2”标签时表格会打开,我该怎么做?
答案 0 :(得分:1)
试试这个
Private Sub SSTab1_Click(PreviousTab As Integer)
Select Case SSTab1.Tab
Case 0
' your code
Case 1
' your code
Case 2
' your code
Form2.Show
End Select
End Sub