Question : Center Form on Window when Maximized

I am trying to mimic a stand alone application by using a miximized pop-up form.
The only things on this form are a Tab Control (in Detail) and Button Control (Quit Button in Footer).

I want to maximise the pop-up form on the screen and center as aligned left looks silly.

Here is waht I have tried so far:

Controls:
Tab Control Name = TabCtl
Button Name = QuitButton

************************************************
Private Sub Form_Load()
    Dim intWidth As Integer
    Dim intHeight As Integer
    Dim intTabWidth As Integer
    Dim strFormName As String
    Dim intLeft As Integer
   
    'Maximise window
    DoCmd.Maximize
   
    'Get current width parameters
    intWidth = Me.WindowWidth
    intTabWidth = Me.TabCtl.Width
   
    'Get new left position
    intLeft = ((intWidth - intTabWidth) / 2)
   
    'Change width of form
    Me.Width = Me.Width + intLeft
   
    'Move Tab Control
    Me.TabCtl.Move intLeft
End Sub
************************************************

All this seems to do is extend the width of the Tab Control.

Can anyone tell me why this doesn't work and how I can achieve what I'm trying to do?

Thanks in advance.

Answer : Center Form on Window when Maximized

I tried your code on a very basic form containing a single tab control, and it appears to work as one would expect.