Navgar solo con formularios
Publicado por arrobangel (61 intervenciones) el 29/03/2018 05:10:09
Hola a tod@s
Estoy haciendo una base de datos en access y quiero que la base al ser abierta por el usuario no muestre el panel de microsoft access para que de esta forma el usuario no pueda modificar algo por herror.
Navegando por la web encontré este codico:
Pero al implementarlo en mi base me responde con el siguiente herror:

por favor necesito ayuda para resolver este problema, les dejo otra captura de pantalla que podría facilitar el entendimiento de mi problema

de ante mano gracias
Estoy haciendo una base de datos en access y quiero que la base al ser abierta por el usuario no muestre el panel de microsoft access para que de esta forma el usuario no pueda modificar algo por herror.
Navegando por la web encontré este codico:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
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
Pero al implementarlo en mi base me responde con el siguiente herror:

por favor necesito ayuda para resolver este problema, les dejo otra captura de pantalla que podría facilitar el entendimiento de mi problema

de ante mano gracias
Valora esta pregunta


0