محمد احمد لطفى

أستاذى @مسفر اريد ان يبتعد الكود عن الامر ( عند عداد الوقت ) و المرفق جميل جزاك الله خيرا أستاذى @أبو إبراهيم الغامدي ظهرت رسائل بكل الاستعلامات بالنموذج و منها

للرفع

يا أستاذ @مسفر أنا طالب حاجة جديدة أريد أن يعمل الشريط المتحرك لمدة 13 ثانية و يكون بعيد عن الامر (عند عداد الوقت) اذا كان لا ينفع اذن انتهى الموضوع سوف استغنى عن الشريط المتحرك برسالة ترحيب بسيطة ويغلق النموذج عند فتح النموذج الثانى

ممكن أستاذى @محمد التميمي النموذج الاول (شريط تقدمي) لأنه فعلا يبتعد عن عند عداد الوقت كيف اجعله يستغرق 13 ثانية واريد ان يعمل بدون زرار

سوف اراجعهم مرة ثانة كان بهم ان نموذج التحميل ليس النموذج الاول كان الثانى و بالتالى سيستغرق خلفية اكسيس موجودة على سطح المكتب 13 ثانية و هو ما لا اريده

السلام عليكم ورحمة الله و بركاته هل يمكن عمل شريط تحميل (progressbar) بوقت محدد يستغرق 13 ثانية والكود الخاص به يبتعد عن ( عند عداد الوقت ) وجزاكم الله خيرا progressbar.mdb

يجب فتح النموذجين معا لأن Datamasterform يستغرق فتحه 13 ثانية لا تتعب نفسك

أساتذتي الأفاضل القاعدة عندى كبيرة 100 ميجا و بها معلومات خاصة بعملى وهى عبارة عن نموذج بملىء الشاشة وبها أكثر من نموذج تقريبا 5 نماذج ناتجة عن استعلامات وبفضلكم الان حل مؤقت جعلت نموذج الشريط المتحرك يعمل فى البداية و يغلق فى نفس الوقت مع فتح نموذج Datamasterform بحيث عندما يفتح يغلق نموذج Start و الشريط المتحرك لا يعمل ( سوف أجعل مكانه رسالة ترحيب ) و أسف على الازعاج أستاذ @مسفر سوف أقوم بالتجربة بعد قليل

أسف كان هناك مشاكل بالكهرباء الان اعمل على نموذج Start و لا يعمل الشريط المتحرك و يغلق بكود عند فتح نموذج datamasterform أستاذى @ابوخليل أستأذن حضرتك ممكن مثال صغير لما أشرت

أستاذى @ابوخليل فعلا نموذج Start هو النموذج الوسيط DoCmd.OpenForm "DataMasterForm" Forms!Start.SetFocus If ProgressBar2 = 13 Then DoCmd.Close 'DoCmd.OpenForm "DataMasterForm" Else ProgressBar2.SetFocus t = t + 1 ProgressBar2 = ProgressBar2 + 1 End If وهذا الامر جيد جدأً و لكن شريط المتحرك لا يعد ولكنه يغلق فعلا نموذج Start و يفتح datamasterform هل نستطيع تنشيط امر الشريط المتحرك بعد فتح نموذج datamasterform أقصد وهو يفتح

أستاذى @ابوخليل الفكرة أن نموذج datamasterform يستغرق فتحه 13 ثانية و بالتالى تظهر خلفية اكسيس الحلفية طول هذه المدة و هذا الهدف من الموضوع واخر مرفق لم يفتح نموذج start نهائيا وفتح نموذج datamsterform انسب طريقة هيا عند عداد الوقت DoCmd.OpenForm "DataMasterForm" If ProgressBar2 = 13 Then DoCmd.Close 'DoCmd.OpenForm "DataMasterForm" Else ProgressBar2.SetFocus t = t + 1 ProgressBar2 = ProgressBar2 + 1 End If ولكن العد لا يعمل و يبقى نموذج Start حتى يفتح نموذج datamasterform و يبقى مفتوح

جزاك الله خيرا استاذى @ابوخليل عند وضع الامر DoCmd.OpenForm "DataMasterForm" عند التحميل او الفتح لا يظهر نموذج start ابداً

الاثنين غير متاحيين

أول مشاركة فى الموضوع السلام عليكم ورحمة الله و بركاته برنامجى النموذج يفتح فى خلال 13 ثانية اى وجود نافذة اكسس كل هذه المدة فالبحث وجدت فى موضوع استاذى / ابا جودى موضوع صلاحيات المستخدمين نموذج به شريط متحرك يفتح بسرعة و بوقت يفتح النموذج التالى ولكن لا استطيع تطبيقها المطلوب كيف اتحكم فى غلق النموذج الذى به شريط متحرك ( اى عندما يصل الى 100 % ) يغلق و يتم فتح النموذج الاخر بدايةً يجب ضبط الشريط المتحرك ليغلق بعد 13 ثانية عند فتح شريط start فى حدث عند الفتح أن يفتح نموذج DataMasterForm جزاكم الله خيرا

كود الاخفاء موجود ولكن نموذج البداية يجب ان يكون خفيف حتى يختفى نافذة اكسيس الخلفية الاولى بسرعة

نموذج البداية يجب أن يكون نموذج start حتى يخفى نافذة اكسيس الخلفية جزاك الله خيرا

والله مقدر تعبكم جزاكم الله كل خيرا

اتفقنا أن نموذج start يفتح واول ما يفتح يفتح نموذج DataMasterForm نموذج DataMasterForm سيستغرق فتحه 13 ثانية نموذج start هيفضل فاتح 13 ثانية و يغلق يعنى نموذج DataMasterForm لا يمكن ان ينظر شريط التحميل نموذج start ( اى لا يعمل بعد وصول شريط التحميل الى 100 % ) بل يجب فتحه عند فتح نموذج start أراكم على خير غداً ان شاء الله

اثنين فقط الهدف من نموذج start هو اخفاء نافذة DataMasterForm الخلفية التى تعمل لمدة كبيرة (13 ثانية)حتى يفتح النموذج DataMasterForm

الهدف من نموذج start هو اخفاء نافذة DataMasterForm الخلفية التى تعمل لمدة كبيرة حتى يفتح النموذج

يفتح دائما بعد 13 ثانية على نموذج DataMasterForm ولا يبدأ بنموذج start يجب فعلا أن يعمل النموذجين معا نموذج Start يعمل حتى يظهر نموذج DataMasterForm

لم يعمل يجب فتح النموذجين معا فعلا أطبق بالفعل على نموذجى

يفتح نافذة اكسيس حتى يفتح النموذج و يظهر الويتنج لمدة ثوانى ويختفى

أستاذى @kanory نموذج DataMasterForm يتاخر 13 ثانية عند فتحة و هوه موضوعنا ( نموذجى الاصلى وليس المرفوع ) و لذلك يجب فتحه عند فتح نموذج sTART و يعمل شريط التحميل 13 ثانية ويغلق نموذج START ويفتح نموذج DataMasterForm