Activates the next or previous Tab in a TabStrip control.
TabStrip.NextTab
TabStrip.PrevTab
NextTab activates the next Tab in TabStrip control. PrevTab selects the previous Tab. Both methods are circular. A Change event is generated.
Local n As Int32
OpenW Fixed 1
Ocx TabStrip tbs = "", 0, 10, TwipsToPixelX(Win_1.Width), 40
tbs.TabFixedWidth = TwipsToPixelX(Win_1.Width) / 11 : tbs.TabWidthStyle = tabFixed
For n = 1 To 10 : tbs.Add , , "Tab " & n : Next n
Ocx Command cmd(1) = "<<< Previous Tab", 10, 70, 120, 22
Ocx Command cmd(2) = "Next Tab >>>", 150, 70, 120, 22
Do : Sleep : Until Me Is Nothing
Sub cmd_Click(Index%)
Select Index%
Case 1 : tbs.PrevTab
Case 2 : tbs.NextTab
EndSelect
EndSub
TabStrip, Change
{Created by Sjouke Hamstra; Last updated: 20/10/2014 by James Gaite}