How to make my tabstrip look like this

[lilcam]

First of all, I had to code my tabstrip into my project, instead of using the properties.

------------------------------------
Dim Tab1 As MSComctlLib.Tab
Dim Tab2 As MSComctlLib.Tab
Dim Tab3 As MSComctlLib.Tab
Dim Tab4 As MSComctlLib.Tab
Dim Tab5 As MSComctlLib.Tab
Dim Tab6 As MSComctlLib.Tab
Dim Tab7 As MSComctlLib.Tab
Dim Tab8 As MSComctlLib.Tab
Dim Tab9 As MSComctlLib.Tab
Dim Tab10 As MSComctlLib.Tab



Set Tab1 = TabStrip1.Tabs(1)
Set Tab2 = TabStrip1.Tabs.Add()
Set Tab3 = TabStrip1.Tabs.Add()
Set Tab4 = TabStrip1.Tabs.Add()
Set Tab5 = TabStrip1.Tabs.Add()
Set Tab6 = TabStrip1.Tabs.Add()
Set Tab7 = TabStrip1.Tabs.Add()
Set Tab8 = TabStrip1.Tabs.Add()
Set Tab9 = TabStrip1.Tabs.Add()
Set Tab10 = TabStrip1.Tabs.Add()


Tab1.Key = "Key1"
Tab2.Key = "Key2"
Tab3.Key = "Key3"
Tab4.Key = "Key4"
Tab5.Key = "Key5"
Tab6.Key = "Key6"
Tab7.Key = "Key7"
Tab8.Key = "Key8"
Tab9.Key = "Key9"
Tab10.Key = "Key10"


Tab1.Caption = "Company"
Tab2.Caption = "Project Management"
Tab3.Caption = "Support"
Tab4.Caption = "Project Cost(s)"
Tab5.Caption = "Training"
Tab6.Caption = "Maintenance"
Tab7.Caption = "Installation"
Tab8.Caption = "Administration"
Tab9.Caption = "Technical"
Tab10.Caption = "Finish"
-----------------------------

as you can see, that's 10 tabs, and that would take up too much room horizontally. How can I make my tabs look like they are sittign on top of one another? 5 in the front and 5 in the back.

 

[CajunCenturion]

You might try using the TabsPerRow property.
Good Luck
--------------
As a circle of light increases so does the circumference of darkness around it. - Albert Einstein

 

[MapMan]

How about your main tab holding a tab strip for five others. They say a pictures worth a thousand words, so here's what I mean...

[tt]
_____ _____ _____ _____ _____ _____
/Tab1 \/Tab2 \/Tab3 \/Tab4 \/Tab5 \/Menu2| _____ _____ _____ _____ _____ |
| /Tab6 \/Tab7 \/Tab8 \/Tab9 \/Tab10\ |
| | | |
...
[/tt]

HTH,
MapMan

Assume nothing, question everything, be explicit not implicit, and you'll always be covered.

 

[CasperTFG]

Tabs per row set to 2 should do it... Craig, mailto:sander@cogeco.ca

Remember not to name the Lambs...
It only makes the chops harder to swallow

 

[PhilX]

Fortunately, this one is easy.

Just add one line:

TabStrip1.MultiRow = True

Hope that helps...

Phil