[khaled Mohammed]

فى الملف مرفق 


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

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

[ابو محمد محمد محمد]

الدالة التالية تحول قيمة التاريخ المرسل لها الى التاريخ الهجري حتى لو كانت الاعدادات الاقليمية 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")