The code snippet below taken from a forms code sheet is intended to position the form per the MOVE method. The "X" positioning is correct, but the form opens with the vertical orientation seemingly centered, rather than at the top of my monitor.
Code:
Option Compare Database
Option Explicit
Dim intPCHELPTop As Integer
Private Sub Form_Open(Cancel As Integer)
'*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*
' Nominal position for the PC HELP scenario is global XMove
'*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*
XMoveSet = XMove
intPCHELPTop = 0
End Sub
Private Sub Form_Load()
'*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*
' Nominal position for the PC HELP scenario (User can override with form's set option)
'*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*
Me.Move left:=XMoveSet, top:=intPCHELPTop
End Sub