السلام عليكم ورحمة الله وبركاته
التاريخ الهجري عندي في الويندوز xp مضبوط صح ...مثلا اليوم : 06/05/1425
وعند استعراضي للتاريخ الهجري في الشريط الموجود اسفل سطح المكتب
عند الوقت يظهر صح وهو 06/05/1425
كذلك اذا ذهبت الى :
لوحة التحكم
الخيارات الإقليمية وخيارات اللغة
تخصيص
التاريخ
ضبط التاريخ الهجري إلى
وجدته مضبوط على التاريخ 06/05/1425
ولكن في الأكسس عند استخدام الدالة vbCalHijri ترجع لي التاريخ 07/05/1425
اي زيادة يوم واحد
مع العلم ان التاريخ الميلادي صحيح وهو 24/6/2004
ارجو المساعدة ولكم جزيل الشكر
************
الدالة التي استخدمه كتالي :
Function chaingdate()
Calendar = vbCalHijri
chaingdate = Format(Date, "yyyy-mm-dd")
Calendar = vbCalGreg
End Function
