برای حل مساله مخفي شدن پنجره اكسس از ماژولی بنام HideAccess استفاده كنيد که در بخش کد زیر مشاهده می کنید.
Option Compare Database
Public Declare Function ShowWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Public Sub HideAccess()
Call ShowWindow(Access.hWndAccessApp, 0)
End Sub
Public Sub ShowAccess()
Call ShowWindow(Access.hWndAccessApp, 5)
End Sub
جهت فراخوانی ماژول فقط کافی است بصورت زیر عمل کنید.
HideAccess





پاسخ با نقل قول