У меня проблема с моими формами доступа.Я скрываю базу данных доступа пользователям с этим кодом.
Const SW_HIDE = 0
Const SW_NORMAL = 1
Private Declare Function ShowWindow Lib "user32" _
(ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
In der Öffnen-Sub deines Übersichtsformulares:
Dim hWindow As Long
Dim nResult As Long
Dim nCmdShow As Long
hWindow = Application.hWndAccessApp
nCmdShow = SW_HIDE
nResult = ShowWindow(ByVal hWindow, ByVal nCmdShow)
Call ShowWindow(Me.hWnd, SW_NORMAL)
Но затем я пытаюсь открыть отчеты через форму, они не открываются.Я не знаю почему