Tab Controls - How To Zoom In And Out of Forms, Anchor Controls, and Handle Form Errors in Microsoft Access


	Back to Access Developer 41 Comments List

Upload Images @Reply Bookmark Link Email Next Unseen

Tab Controls

Ray White

4 years ago

What would you need to add for Tab Controls.?

For Each C In F.Controls
        C.Height = C.Height + (C.Height * ZoomAmount)
        C.Width = C.Width + (C.Width * ZoomAmount)
        C.FontSize = C.FontSize + (C.FontSize * ZoomAmount)
        C.Top = C.Top + (C.Top * ZoomAmount)
        C.Left = C.Left + (C.Left * ZoomAmount)
        If C.ControlType = acSubform Then
            FormZoom Forms(F.Name).Controls(C.Name).Form, ZoomAmount, True
        End If
    Next

	Ray White OP @Reply 4 years ago
If you take the CustomerContactF form and add a tab control with 2 tabs then put the Notes control in one of the Tabs then take the Contact History list and put it in the other Tab. Then run the resizer code, You will see what I'm talking about.

	Richard Rost @Reply 4 years ago
I really hate tab controls. They're on my Evil list. They're a pain on so many levels. I'd have to set this up and play with it to tell you.

This thread is now CLOSED. If you wish to comment, start a NEW discussion in Access Developer 41.

Next Unseen