Properly position tab control

[AlanJordan]

I have a page that is filled with controls.

I want to prevent a user from using them until they select their name from a combo box and enter a password.

I decided to place a tab control over the controls and make the tab control invisible when a user takes the above actions.

This works fine, until I attempt to shrink the size of tab control and resize and reposition it with this code.

    With Me.tabInstructions
        .Top = 6.875
        .Left = 0
        .Width = 8.6979
        .Height = 6.1771
        .Visible = True
    End With

This code repositions the tab control at the very top of the page, preventing the user from using the combo box.

Questions, please:

(1) Should I be using an other method, like the move method? If so, what's the syntax?

(2) Is there a better way to accomplish my goals. I guess I could disable every control on form except the combo box. If so, could you suggest the code to do this quickly?

Thanks in advance,
Alan

 

[lupins46]

Why not use a big label or textbox with the same backcolor as your form. All you have to do is make it visible or invisible. No repositioning required ( nor should there be with a tab control but I can't see why you would choose that)

 

[AlanJordan]

Hi Lupins46,

Yes, I'll try a big label.

BTW, I choose a tab control because it allows me to place detailed directions on different tabs.

I'll let you know the results.

Alan

 

[rubbernilly]

If you want to get a little eye-candy, you could also try the Roll-up code I put here:

thread705-1130043

You could roll the label out of the way (before, I would suggest, making it invisible and then resetting it to the original size).

 

[AlanJordan]

Hi Rubbernilly,

Your code is interesting, but I want to get the basic functionality installed first, before implementing it.

It's very strange. Both the tab control and a label control go to the top of the form. Could it be that I am entering information in twips, and not inches? If so, how do I specify inches.

Alan

 

[PHV]

If I remember right, 1 inch = 1440 twips.

 

[AlanJordan]

Mystery solved!
Ironically, the first thing that I noticed was that on the property box a " indicates inches. Duh!

For the benefit of others:

    With Me.tabInstructions
        '1440 Twips to an inch:
        .Top = (2.125 * 1440)
        .Left = (0.0417 * 1440)
        .Width = (8.75 * 1440)
        .Height = (6.2188 * 1440)
        .Visible = True
    End With

 

[rubbernilly]

Yes, you are giving sizes in Twips for those properties.