منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - التعامل مع التواريخ

فى الملف مرفق

اريد ان التاريخ الذي يظهر للمستخدم يكون التاريخ الهجرى و ان يكون التاريخ فى قاعدة البيانات التاريخ الميلادى

على سبيل المثال تاريخ انتهاء مستند بالهجري
يظهر له التاريخ بالهجري و عندما يقوم المستخدم بتحديث التاريخ يظل يظهر بالتاريخ بالهجري
لكن فى قاعدة البيانات يكون التاريخ بالميلادي

الدالة التالية تحول قيمة التاريخ المرسل لها الى التاريخ الهجري حتى لو كانت الاعدادات الاقليمية Regional Settings في الجهاز الحالي لا تدعم التاريخ الهجري ، وذلك اعتماداً على الإعدادات الإقليمية Globalization .

كود :

Function ToHijra(ByVal gDate As Date, Optional ByVal format As String = Nothing) As String

Return gDate.ToString(format, New Globalization.CultureInfo("ar-SA"))

End Function

كود :

Textbox1.Text = ToHijra(Now, "d dddd, MMMM yyyy")

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

khaled Mohammed

ابو محمد محمد محمد