Por que me habre los informes en segundo plano?

He logrado desaparecer el area de trabajo de acces, he puesto a todos mis informes y formularios en modo emergente y modal, con los formularios no hay problema por que los habre normal, pero cuando habro mis informes los habre en segundo plano y no es estetico. El codigo que he usado es la siguiente:

Option Explicit

Const SW_HIDE = 0
Const SW_NORMAL = 1
Const SW_MINIMIZED = 2
Const SW_MAXIMIZED = 3

Private Declare Function ShowWindow Lib "user32" _
(ByVal hwnd As Long, ByVal nCmdShow As Long) As Long

Private Sub Form_Open(Cancel As Integer)
Call ShowWindow(hWndAccessApp, SW_HIDE)
DoCmd.OpenForm "CAMBIAR TEXTO", windowmode:=acDialog
End Sub

Private Sub Form_Unload(Cancel As Integer)
Dim lngRetCode As Long
lngRetCode = ShowWindow(hWndAccessApp, SW_MAXIMIZED)
End Sub