تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
لمعرفة عدد الأيام المتبقية في السنة
#1
كاتب الموضوع : AhmedEssawy


كود :
Dim iDayInYear As Integer
iDayInYear = DatePart("y", Now())

DaysLeftInYear = IIf(IsDate(sDate = "02/29/" & _
CStr(Year(Now))), 366 - iDayInYear, 365 - iDayInYear)
}}}}
تم الشكر بواسطة: محمد ئوزبك , محمد ئوزبك


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  لمعرفة عنوان المجلد MyDocuments RaggiTech 0 312 17-10-12, 02:23 PM
آخر رد: RaggiTech
  لمعرفة حجم الذاكرة الحية الخاصة بكل Slot RaggiTech 0 338 17-10-12, 02:22 PM
آخر رد: RaggiTech
  لمعرفة ان كانت السنة كبيسة أم لا RaggiTech 0 319 17-10-12, 02:22 PM
آخر رد: RaggiTech
  لمعرفة الوقت المستغرق منذ بدأ تشغيل الآلة RaggiTech 0 368 17-10-12, 02:22 PM
آخر رد: RaggiTech
  لمعرفة الخطوط المدعومة RaggiTech 0 327 17-10-12, 02:21 PM
آخر رد: RaggiTech
  معرفة عدد الأيام في الشهر الحالي RaggiTech 0 353 17-10-12, 01:07 AM
آخر رد: RaggiTech
  لمعرفة نوع المعالج المثبت في جهازك RaggiTech 0 313 17-10-12, 01:02 AM
آخر رد: RaggiTech
  لمعرفة نسبة استخدام البروسيسور في الجهاز RaggiTech 0 366 17-10-12, 01:02 AM
آخر رد: RaggiTech
  لمعرفة لو كان التحديد باستخدام Tab او باستخدام الماوس RaggiTech 0 313 17-10-12, 01:01 AM
آخر رد: RaggiTech
  لمعرفة فيما إدا كنت متصلاً بالانترنت أم لا RaggiTech 0 297 17-10-12, 01:01 AM
آخر رد: RaggiTech

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم