Mkeshk قام بنشر نوفمبر 18, 2017 مشاركة قام بنشر نوفمبر 18, 2017 ارجو طريقه لإخفاء إطار اكسس 2010 رابط هذا التعليق شارك More sharing options...
محمد أبوعبدالله قام بنشر نوفمبر 18, 2017 مشاركة قام بنشر نوفمبر 18, 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 وفي نموذج البداية ضع الكود التالي في حدث عند الفتح Private Sub Form_Open(Cancel As Integer) Call HideAccess End Sub تحياتي 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.