KJ-clueless said:
Is there any way to rotate or otherwise change orientation of a tab control
so that it's tabs appear on the left side rather than across the top? I've
looked in several forumns with no luck.
What Doug said.
The obvious(?) workaround is to set the tab control's style
to None and use a bunch of buttons on the left. Each
button's Click event just needs to set the tab control's
Value to the corresponding page number. Unfortunately, the
focus can then become very tricky (in one case impossible)
to manage.
The fallback approach is what we used to do way back before
there was such a thing as a tab control. It's more work but
just as viable as a real tab control. Place the "page"
command buttons next to the area for the pseudo tab control.
I like to use an option group with option or radio buttons
with the OptionValues set to 1, 2, .... Use a rectangle
control to define the outline of the area.
Then add one page of controls into the rectangle area and
set each control's Tag property to a string such as "Page1".
Repeat this step for each set of controls, setting their Tag
tp "Page2" and so on. This will look like a mess with
controls on top of other controls, but you can't have
everything ;-)
The code in the option frame's AfterUpdate event could then
be something like:
Dim ctl As Control
For Each ctl In Me.Controls
If Left(ctl.Tag, 4) = "Page" Then
ctl.Visible = (Mid(ctl.Tag, 5) = Me.frame)
End If
Next ctl
