كيف اعرف تاريخ الوندوز الهجري

Calendar = vbCalHijri
MsgBox Date
Calendar = vbCalGreg
MsgBox Date

:rolleyes:

hijri.rar

جزاك الله خير على ردودكم

وجدت في برنامج جاهز كلما اغير التاريخ الهجري يتغير في البرنامج معمول بالدت نت ( المشكلة برنامج جاهز)

بمعنى يأخذ التاريخ الهجري من الوندوز

هل توجد دالة تأخذ التاريخ الهجري من خانة ضبط التاريخ الهجري

كما هو في الصورة

علي فكرة ، أعتقد أن كافة تعدادات التاريخ والوقت الخاصة بنظام التشغيل مخزنة في مسجل النظام في المسار :

HKEY_CURRENT_USER\Control Panel\International

أفتح مسجل النظام وأقرأ التعدادات ومن ثم أعرض التاريخ كما هو تم تنسيقة كما يلي :

Dim objRegEdit As Object
Dim strFormat As String

Set objRegEdit = CreateObject("WScript.Shell")

strFormat = objRegEdit.RegRead ("HKEY_CURRENT_USER\Control Panel\International\<ضع هنا إسم مفتاح التنسيق>")


Me.Caption = Format(Date,strFormat)

Set objRegEdit = Nothing

اشكرك على الرد

ولكن لم اجد التاريخ

اخي الحبيـــب

في الملف المرفق ستجد الحل بأذن الله و لو لم تجد الحل راسلني شخصيا و سوف ارفع الحل باذن الله هنا ايضا ...

Hijri_Date.rar

هل ممكن ان تعملوا لنا نفس البرنامج بس بال vb6 لو سمحتوا يا جماعة

اكون شاكر لكم و ممنون

ببساطة : الـ VB يقدر يجيب التاريخ الهجرى بالأرقام.

الشهور ترقيمها من 1 الى 12 و لكل شهر أسم و عندك دالة Select Case

يبقى ايه اللى ناقص ؟

اللي ناقص ان التاريخ اللي بيجيبة ال vb بيكون غير مضبوط كما في الويندوز

لانة بياخذ من دالة ال calendar

احنا نريدة ياخذ التاريخ من اليوندوز

يعني كلما غيرنا التاريخ الهجري يتغير في البرنامج

افهموا السوال ثم جاوبوا رجاءءءءءءء

احنا برضوا بنفهم و اسئلتنا مش سخيفة الى حد انها تنحل ب select case للاسم الموافق للشهر

ياشباب فزعتكم

جرب هذا الملف هو للأخ اسلمة جزاه الله كل الخير

________.rar

اشكرك zine pef

ماهذا نريد الطريقة هذه معروفة

التاريخ الهجري احياناً يفرق بيوم

ونعدله من داخل الوندوز

سؤالي كيف آخذ التاريخ الهجري من الوندوز

يا شباب اين يخزن تاريخ الوندوز في الرجستري وكيف استخرجه