looodi قام بنشر مايو 24, 2017 قام بنشر مايو 24, 2017 السلام عليكم ورحمة الله وبركاتة اخواني لقد قمت بتجربة اكثر من طريقة واستخدام كود ولم يضبط معي هل من الممكن شرح بالخطوات
أفضل إجابة Shivan Rekany قام بنشر مايو 24, 2017 أفضل إجابة قام بنشر مايو 24, 2017 في الحقيقة المنتدى مليـــــــــــــــئة بنفس هذا الموضوع لكن يللا اليكي هذا اعمل كوبي باست لهذا فانكشن الى موديول جديد 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 للاخفاء و ShowAccess للاظهار من جديد
الردود الموصى بها