السلام عليكم ورحمة الله
عندي مشكلة بنموذج من نوع Split Form لما عملت الاخفاء عن طريق الكود التالي
في الفورم في خانة on open
NHidwindow
ويوجد Module يحتوي على الكود التالي
Option Compare Database
Global Const NM_HIDE = 0
Private Declare PtrSafe Function apiShowWindow Lib "user32" Alias "ShowWindow" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Sub NHidwindow()
Dim NMC As Long
NMC = apiShowWindow(hWndAccessApp, NM_HIDE)
End Sub
لما افتح النموذج يختفي اصلا ولا يظهر بس لما احول صيغة النموذج الى Single form يعمل بشكل طبيعي وشكرا للجميع