اذهب الي المحتوي
أوفيسنا

طريقة فتح نموذجين مع بعض


hh88

الردود الموصى بها

11 ساعات مضت, hh88 said:

هل من طريقة لفتح نموذجين في وقت واحد عند فتح البرنامج 

وتحديد النموذج المراد إظهاره في الامام 

اتفضل 
في القاعدة بها ماكرو 
افتحه في وضع التصميم واي نموذج تختار ان يفتحه في الاخير هو راح يكون في الامام

111111.PNG.193741addaca616e69866c352a5229bd.PNG

Dcoun.rar

  • Like 1
رابط هذا التعليق
شارك

1 hour ago, Shivan Rekany said:

اتفضل 
في القاعدة بها ماكرو 
افتحه في وضع التصميم واي نموذج تختار ان يفتحه في الاخير هو راح يكون في الامام

111111.PNG.193741addaca616e69866c352a5229bd.PNG

Dcoun.rar

الف شكر أستاذي العزيز شفان 

هل في طريقة يكون فيها باستخدام كود 

 

وهل هذي الطريقة تبطئ من فتح النموذجين 

 

ولك جزيل الشكر 

 

رابط هذا التعليق
شارك

11 ساعات مضت, hh88 said:

هل في طريقة يكون فيها باستخدام كود

نعم اتفضل
عملت موديول جديد وكتبت فيها هذا السطر من الكود فقط

Option Compare Database
Public OpenNum As Integer

في الخصائص القاعدة البيانات الحالية اخترت احد النماذج لكي يفتح في البداية فتح القاعدة البيانات

Capture.PNG.556ca75bbb413b31372f5ddd34d74dbe.PNG

بعديف وفي ذلك النموذج في حدث عند الفتح كتبت هذا الكود

Private Sub Form_Open(Cancel As Integer)
    OpenNum = OpenNum + 1
    If OpenNum = 1 Then DoCmd.OpenForm "Tabil_Visitors", acNormal, "", "", , acNormal
End Sub

 

11 ساعات مضت, hh88 said:

وهل هذي الطريقة تبطئ من فتح النموذجين

هذا شيء برأيي متعلة بمصدر النموذجين ... والله يعلم

Dcoun (1).rar

  • Like 1
رابط هذا التعليق
شارك

15 minutes ago, Shivan Rekany said:

نعم اتفضل
عملت موديول جديد وكتبت فيها هذا السطر من الكود فقط


Option Compare Database
Public OpenNum As Integer

في الخصائص القاعدة البيانات الحالية اخترت احد النماذج لكي يفتح في البداية فتح القاعدة البيانات

Capture.PNG.556ca75bbb413b31372f5ddd34d74dbe.PNG

بعديف وفي ذلك النموذج في حدث عند الفتح كتبت هذا الكود


Private Sub Form_Open(Cancel As Integer)
    OpenNum = OpenNum + 1
    If OpenNum = 1 Then DoCmd.OpenForm "Tabil_Visitors", acNormal, "", "", , acNormal
End Sub

 

هذا شيء برأيي متعلة بمصدر النموذجين ... والله يعلم

Dcoun (1).rar

الف الف مليون شكر استاذي العزيز شفان 

الله يبارك فيك ويسعدك ويكتب لك الأجر على ماتقدمه 

  • Thanks 1
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information