Snap a Form to Upper Right Corner

[akjim62]

Does anyone know code to snap a form to the very top right corner of the main window? I know how to do it for the top left. I also know how to make the top right happen in inches, but each of my 8 forms are a different width, and not all users have the same screen resolution. Is there an easy way to just snap to top right without messing with the inches?

Thanks ~ Jim

 

[static]

Private Sub Form_load()
    DoCmd.Maximize
    x = Me.WindowWidth
    DoCmd.Restore
    DoCmd.MoveSize x - Me.WindowWidth, 0
End Sub

 

[MarkK]

That's clever. Does it flicker?

 

[static]

Cheers. Not that I noticed. You see it move around but you could use a splash screen to get the initial coordinates I suppose.