[Taha Okla]

وعليكم السلام ورحمة الله وبركاته

لا تحتاج أن تستخدم أي مكتبات خارج نطاق الدوت نت..
فقط ما تحتاجه حيلة بسيطة، أن تطلب التاريخ بإعدادت دولة معينة..

مثلاً : نعرف أن السعودية تعتمد التاريخ الهجري، لذا سنقوم بطلب التاريخ بحسب إعدادات المملكة..
- استيراد المكتبة : 

كود :

Imports System.Globalization

- ثم الكود، ((لأجل التبسيط حولنا الكود لفانكشن عام)) يقوم بالعملية بمجرد استدعاءه دون الحاجة لتكرر الأكواد :

كود :

Public Function GetHijriDate(pDate As DateTime) As String
   Dim ci As CultureInfo = CultureInfo.GetCultureInfo("ar-SA")
   Return pDate.ToString("yyyy/MM/dd", ci)
End Function

- طريقة الاستدعاء : نسند لـ اللفانكشن متغير من نوع (DateTime) ..
مثلا تاريخ اليوم بالهجري سيكون : 

كود :

Label1.Text = GetHijriDate(Today)

وفقك الله ..