Access - Centrar Formulario en pantalla

Con que función de VB puedo centrar un formulario en la pantalla

Declare Function glrMoveWindows Lib "user32" Alias "MoveWindow" (ByVal hwnd As Long, ByVal X As Long, ByVal Y As Long, ByVal nWindth As Long, ByVal nHeight As Long, ByVal bRepair As Long) As Long

Function GetScreenResolution() As String
Dim R As RECT, hwnd As Long, RetVal As Long
hwnd = GetDesktopWindow()
RetVal = GetWindowRect(hwnd, R)
GetScreenResolution = (R.x2 - R.x1) & "x" & (R.y2 - R.y1)
End Function
'Al abrir el formulario y dependiendo de la resolución de la pantalla
Private Sub Form_Open(Cancel As Integer)
Dim posicion As String
If GetScreenResolution = "1024x768" Then
posicion = glrMoveWindows(Me.hwnd, 100, 65, 850, 510, True)
ElseIf GetScreenResolution = "1152x864" Then
posicion = glrMoveWindows(Me.hwnd, 200, 100, 850, 510, True)
Else
posicion = glrMoveWindows(Me.hwnd, 100, -20, 850, 510, True)
End If
End Sub

explicación de las posiciones
posicion = glrMoveWindows(Me.hwnd, 100, 65, 850, 510, True)
100 = posición margen izquierdo
65 = posición margen superior
850 = anchura del formulario
510 = altura del formulario

Buenas tardes

Soy novato donde realizo estas modificaciones, como acceso esta codificacion, .
Necesito evaluar en un formulario la dependencia de varios campos , por ejemplo a la hora de facturar esta hora no debe ser mayor a la establecida por parametros. O sea si una factura se tenia que realizar a las 2:00 pm esta hora se debe comparar con la hora que tenia que ser realizada y mostrar un mensaje al momento.
Por favor necesito apoyo para esto gracias.