اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

(تمت الإجابة) هل من كود لادراج ساعة فى يوزر فورم


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

اخى برجاء هذا الكود وجدته للاستاذ الحسامى

هو يعمل بالانجليزية فقط

وعند التحويل اللغة للعربية يظل ايضا بالانجليزية

المطلوب عند تحويل اللغة يتحول انا عربى او انجليزية

KH_3.rar

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

اخى برجاء هذا الكود وجدته للاستاذ الحسامى

هو يعمل بالانجليزية فقط

وعند التحويل اللغة للعربية يظل ايضا بالانجليزية

المطلوب عند تحويل اللغة يتحول انا عربى او انجليزية

أخي الكريم أبو الحسن

أولا : لعرض الساعة في نموذج يفضل أن توضع في تسمية label وليس في مربع نص textbox

ثانياً : عرض الساعة باللغة العربية أو الإنجليزية مرتبط بتنسيق التاريخ في جهاز المستخدم ولغة هذا التنسيق

ثالثاً : تم معالجة عرض صباحاً ومساءً في المرفق

مرفق ملف بكود بسيط يعالج موضوع المؤقتات في الإكسل من خلال الحدث ontime الخاص بالتطبيق

mas_clockform.rar

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

اخى برجاء هذا الكود وجدته للاستاذ الحسامى

هو يعمل بالانجليزية فقط

وعند التحويل اللغة للعربية يظل ايضا بالانجليزية

المطلوب عند تحويل اللغة يتحول انا عربى او انجليزية

أخي الكريم أبو الحسن

أولا : لعرض الساعة في نموذج يفضل أن توضع في تسمية label وليس في مربع نص textbox

ثانياً : عرض الساعة باللغة العربية أو الإنجليزية مرتبط بتنسيق التاريخ في جهاز المستخدم ولغة هذا التنسيق

ثالثاً : تم معالجة عرض صباحاً ومساءً في المرفق

مرفق ملف بكود بسيط يعالج موضوع المؤقتات في الإكسل من خلال الحدث ontime الخاص بالتطبيق

ممتاز جدا وخاصة ايقاف الكود بعد الخروج من الفورم

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

استاذنا احترامى

هناك مشكلة ان الماوس على الفورم يظل يتحرك مع كل تغير بالثوانى

هل من حل استاذنا

احترامى

الماوس على الفورم اخى به رعشة مستمرة مع كل ثانية بالساعة

هل من حل اخى واستاذنا

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

مشكلة اهتزاز الماوس اخى

بكود حضرتك

لا تظهر بكود الاستاذ الحسامى ولكن المشكلة بكود الاستاذالحسامى انالساعة انجليزى فى كل الاحوال

وبكود حضرتك عربى بس اهتزاز الماوس

جربت استخدام

Application.ScreenUpdating = False

ولم تفلح هل من حل

استاذنا

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

أخي الكريم لإضافة صباحاً ومساء لكود الأستاذ الحسامي

غير كود الدالة UpdateForm لما يلي:


Public Function UpdateForm()

	 frmTimer.lblNow = Format(Now, "hh:mm:ss ampm")

End Function

تجدها في الموديول الثاني

وإذا استعملتها في نموذج جديد يجب جعل خاصية مشروط في خصائص النموذج show modal تساوي false

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

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

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



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

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

Important Information