MS Access Form Window Size

[TheSuperstar]

I've been trying to create sort of a sidebar menu that would pop in when you click on a button for quite a bit now and for some reason, I am unable to do it. When I save the code and open the form to test, the "side menu" (which is another form") can be seen instead of being out of the are that you can see. Imgur preview.
The list of forms is pretty messy, but the only ones actually used in the question are the "Menu" and "TestFormFormForm" (don't ask about he name). The code I am using is as follows.

[FONT=Consolas]Option Compare Database[/FONT][/FONT][/COLOR]
<code style="margin: 0px; padding: 0px; border: 0px; font-style: inherit; font-variant: inherit; font-weight: inherit; font-stretch: inherit; line-height: inherit; font-family: Consolas, Menlo, Monaco, "Lucida Console", "Liberation Mono", "DejaVu Sans Mono", "Bitstream Vera Sans Mono", "Courier New", monospace, sans-serif; vertical-align: baseline; white-space: inherit;">
Private Sub Command2_Click()
    Dim x As Integer
    x = 0
    Do
        DoEvents
        Menu.Left = Menu.Left - 100
        timeout (0.0075)
        x = x + 1
    Loop Until x = 50
End Sub

Private Sub Form_Load()
    Me.ScrollBars = 0
    Menu.Left = Me.Width + 1000
    Menu.Move _
        Left:=Me.Width + 1000, Top:=500
End Sub

Sub timeout(duration_ms As Double)
    Start_Time = Timer
    Do
    DoEvents
    Loop Until (Timer - Start_Time) >= duration_ms 
</code>[COLOR=#242729][FONT=Arial][FONT=Consolas]End Sub[/FONT][/FONT][/COLOR]

EDIT: My apologies, seems like the code got messed up for some reason. Here's a Pastebin link for it.

 

[Micron]

looks like cross-posted here http://www.accessforums.net/showthread.php?t=69614
both image links result in the same image
Original Poster (OP): Please read this re: cross posting https://www.excelguru.ca/content.php?184