After integrating the two frame in one form:
Private selectedTab As Integer
Private Sub TabStrip1_Click()
selectedTab = TabStrip1.SelectedItem.Index
Debug.Print "sTab " & selectedTab
Select Case selectedTab
Case 1
frameOne.Visible = True
frameTwo.Visible = False
Case 2
frameOne.Visible = False
frameTwo.Visible = True
End Select
End Sub
The fancy VB control, later, after we got this running.
No comments:
Post a Comment