أبو هادي قام بنشر أغسطس 16, 2003 قام بنشر أغسطس 16, 2003 السلام عليكم مطلوب تجربة هذا الكود وملاحظة النتائج : Sub test2() Dim K As Long For K = CLng(#8/16/2003#) To CLng(#8/22/2003#) MsgBox Format(K, "dddd") & Chr(13) & _ "الإفتراضي " & Weekday(K) & Chr(13) & _ "المطلوب " & Weekday(K, vbSaturday) Next K End Sub تحياتي . 1
محمد طاهر عرفه قام بنشر أغسطس 16, 2003 قام بنشر أغسطس 16, 2003 جميل جدا و إضافة بسيطة أن الافتراضي أن بداية الاسبوع هو يوم رقم 1 أو الأحد = vbsunday و فى مثال الأخ أبو هادي وضع بداية الاسبوع السبت باستخدام vbsaturday او رقم 7 Weekday(K, 7) و في حالة وضع رقم صفر بدل 7 يستخدم الاعدادات الافتراضية المناظرة للبلد المختارة فى لوحة تحكم الويندوز Weekday(K, 0) و بالنسبة لحهازي فصفر تعطي نفس نتيجة 7 فى المثال و البلد عندي مصر فهل نفس النتيجة لديكم ؟؟ و هذا المثال شامل الاحتمالات كلها الي دالة الاخ ابو هادي لسهولة المقارنة weekday.zip
ashraf قام بنشر أغسطس 16, 2003 قام بنشر أغسطس 16, 2003 الافتراضي أو رقم 1 الناتج = 7 صفر أو الرقم 7 الناتج = 1 البلد عندي السعودية .
رحال العمر قام بنشر أغسطس 17, 2003 قام بنشر أغسطس 17, 2003 الافتراضي أو رقم 1 الناتج = 7 صفر أو الرقم 7 الناتج = 1 البلد عندي السعودية . نفس كلام اخي اشرف وفي السعودية ايضا
أبو هادي قام بنشر أغسطس 17, 2003 الكاتب قام بنشر أغسطس 17, 2003 السلام عليكم شكرا لك أخي محمد على المثال ، وأعتقد أن الإفتراضي لبداية الأسبوع هو الأحد دائما دون الإعتبار للإعدادات الإقليمية . أما أن رقم 7 تعطي 0 فأعتقد هي منطقية حيث أنه من الفحوصات الداخلية للدالة هو أخذ باقي القسمة على 7 أي الـ Mod 7 . تحياتي .
محمد طاهر عرفه قام بنشر أغسطس 18, 2003 قام بنشر أغسطس 18, 2003 نعم و ما يرتبط بالاعدادات الاقليمية هو خيار الصفر نفسه ( حسب ما فهمت من التعليمات ) و في حالة وضع رقم صفر بدل 7 يستخدم الاعدادات الافتراضية المناظرة للبلد المختارة فى لوحة تحكم الويندوز Weekday(K, 0)
الردود الموصى بها