Dynamic SStab. How to place a control on each tab 1

[bigracefan]

I have a dynamic SSTab that I want to place listviews on to. My current code place all of the listviews on the first tab. I'm starting out with a listview on the first tab. It's index is 0.

    For i = 0 To LineNames.Count - 1
        SSTab2.Tabs = i + 1
        SSTab2.TabsPerRow = i + 1
        SSTab2.TabCaption(i) = LineNames.Items(i)
        Load lvSchedule(i + 1)
        lvSchedule(i + 1).Visible = True
        
    Next

 

[zemp]

You need to set the active tab before you add your control.

For i = 0 To LineNames.Count - 1
        SSTab2.Tabs = i + 1
        SSTab2.TabsPerRow = i + 1
        SSTab2.TabCaption(i) = LineNames.Items(i)
        [b]SSTab2.Tab = SSTab2.Tabs - 1[/b]
        Load lvSchedule(i + 1)
        lvSchedule(i + 1).Visible = True
        
    Next

The line I added makes the last or newest tab the active tab. You can change that if you need.

zemp