تاريخ ووقت

أخي الكريم

لكي تجعل شيء ما يحدث وفق شرط ما أنت بحاجة لحدث

أي لكي يتم تغير قيمة الساعة مع ساعة الجهاز يجب عمل حدث OnTimer وتضبط الفاصل الزمني = 1000 أي واحد ثانية

أمات ما ستكتبه في مصدر عنصر التحكم لمربع النص فهو :

= now()

وتضبط تنسيق مربع النص هو Long Time

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

 Text1.Requery

إنشأ نموذجاً

ضع حقلاً وسمه مثلاُ txtTime

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

=Time()

في خصائص النموذج :

خاصية (الفاصل الزمني لعداد الوقت ) ضع قيمة 1000 يعني ثانية واحدة

عند حدث (عند عداد الوقت) اختر إجراء حدث ثم اكتب التالي :

Me.txtTime.Requery

وبالتوفيق

=============

(( عفواً أستاذنا مهند لم أر ردك إلا بعد أن أرفقت ردي .. فعذراً ))

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