Visual Basic - Llamada a Access desde VB6

Desde mi aplicación en VB6 abro Access para que me presente un reporte de la base de datos, lo que quiero hacer es que desde mi aplicación, dejar la ventana de Access con solo la ventana del reporte. Ya lo hago pero es demasiado tardado, mi pregunta es como dejo invisible la ventana Base da Datos, el menú principal de Access, para no permitir modificar la Base.

Esto es lo que tengo:

Private AppAccess As Access.Application

'crea referencia al objeto
Set AppAccess = New Access.Application
'Abre Access
AppAccess.SysCmd acSysCmdAccessVer
'Abre la base de datos
AppAccess.OpenCurrentDatabase BaseDatos
'Abre el reporte
AppAccess.DoCmd.OpenReport NombreInforme, acViewPreview
AppAccess.DoCmd.Maximize

'ESTA PARTE ES TARDADA
For Each Bar In AppAccess.Application.CommandBars
…..
…..

Gracias, por su ayuda.