كود شاشة افتتاحية - حسب الوقت - صباحاً او مساءاً

[الفدعاني]

كيف عمل كود شاشة افتتاحية على ان يكون فيها الوقت صباحا او مساء على حسب

توقيت الجهاز

DoCmd.Close acForm, "Startup", acSaveYes

DoCmd.OpenForm "Employees"

End Sub

:lol:

[ali1]

اخي الفدعانى

اولا اعمل مربع تسمية Label بسم CrntTime

ضع هذا الكود

Private Sub Form_Load()

Me![CrntTime].Caption = Time$

End Sub

Private Sub Form_Timer()

Me![CrntTime].Caption = Time$

End Sub

لتفعيل الثواني من حدث النمودج في الفاصل الزمني لعداد الوقت ضع 1000

[الفدعاني]

الاخ على

انا عايز يكون توقيت (( مثلا صباح الخير)) او (( في المساء مساء الخير ))

جزاك الله خيرا

[جمال فايز]

أخى الكريم

سارفق لك مثال فى أقرب وقت ممكن وشكراً لأتصالك .

تم تعديل يونيو 21, 2004 بواسطه جمال فايز

[الفدعاني]

بارك الله فيك اخ جمال فايز

[جمال فايز]

أخى الكريم / محمد ابراهيم

أسف أن كنت تأخرت عليك لكن يعلم الله جهازى مش مساعدنى ودائما يعلق معى ومش عاوز أعمله فرمات بسبب عملى المهم أخى الفاضل اليك المثال الذى أعدته لك أبتغى بذلك وجه الله ومن ثم دعائك أخى الكريم

يمكنك من تغير الوقت لدى جهازك ورؤية النتيجة بمحاولة تشغيل البرنامج وفى الختام

أدعو الله التوفيق والسداد

والسلام عليكم ورحمة الله وبركاته .

تقبل حياتى أخوك / جمال

جمال.zip

[الفدعاني]

اشكرك استاذي جمال الفايز

والمثال رائع جدا جزاك الله خيرا

واتمنى لك وللاسرة سفره سعيده

وبحفظ الله ورعايته

:f4: :f4:

[عساف]

الاخ جمال فايز

بارك الله فيك وجزاك خير الجزاء

[جمال فايز]

أخوانى الكرام

شكراً لكم أخوانى على دعائكم لي والله هذا مبتغاي والله ولى التوفيق .

سبحانك اللهم وبحمدة .. سبحان الله العظيم

[Anwar]

اخي الغزيز جمال

المثال اكثر من رائع ممتاز

اتمني لك النجاح وان يطيل اللة في عمرك ويزيد من علمك ويرزق التوفيق في كل امورك

[جمال فايز]

جزاكم الله خير يا جماعة الخير