اخواني اريد ان اظهر الوقت بال12 ساعة مش بال24 انا كتبت هذا الكود ولكن يظهر رقم 0
ME.Label6 = Format(Hour(Now()), "h")
مشكلة بيسطة في الوقت
Me.label6.Caption = Format(Time, "h") - 12
اقتباسIf A is success in life, then A equals x plus y plus z. Work is x; y is play; and z is keeping your mouth shut
Albert Einstein
أخي انا شاكر لك كثيير على الاهتمام ولكن عندي استفسار بسيط وهو اني كتبت هذا الكود :
Label6.Caption = Format(Hour(Time()), "h") - 12
لماذا لم تكون مخرجاته مثل هذا الكود :
Me.label6.Caption = Format(Time, "h") - 12
اخي عندي استفسار اخر وهو كيف اختبر قمية الساعات ... في Label مثلاً بحيث ان لو كانت القيمة التي في هذا الليبل أصغر من الساعة الحالية للنظام التشغيل يظهر رسالة خطأ تفيد بان هناك خطأ بتحديد الساعات
تم تعديل هذه المشاركة بواسطة Xeon_1001 في 20 أبريل 2008 في 01:33
اخواني اريد حل لاني برنامجي متوقف على هذا الكود :cry:
الأخ الكريم ، هناك طريقة أبسط من كل هذا ، وهو :
1- إيجاد الوقت حسب 12 ساعة :
Me.Caption = Format(Time, "HH:NN:SS AM/PM")
2- إيجاد الوقت حسب 24 ساعة :
Me.Caption = Format(Time, "HH:NN:SS")
أخيراً ، أنظر الي الطريقة التالية :
Me.Caption = Mid(Format(Time, "HH AM/PM"), 1, 2)
شكراً
تم تعديل هذه المشاركة بواسطة MMA_EG_Cairo في 21 أبريل 2008 في 02:52
لا تخلط ما بين شخصيتي وأسلوبي .. فشخصيتي هي
ما أنا عليه وتحت تصرفي .. وأسلـوبي يعتمد عليـك
أنت وتصرفاتك
ولحظاتي صمت... وصمـت لحظاتي كلام ... كلامه
اشد آلام ... فصمتي أنا عنوان