فى هذه الحالة
ستحتاج الى تحويل التاريخ الهجرى الى ميلادى
مثلاً لديك تاريخ 1/6/1406 والذى يوافق 11/2/1986
الى التاريخ 14/10/1439 والذى يوافق 28/6/2018
من ثم عمل فارق التاريخ بين من الى للتاريخ الميلادى
وبكده تكون حللت مشكلة فارق الايام التى بالسنة
والتى تعطي فارق بين السنين
طريقة تحويل التاريخ الهجري الى ميلادى
كل ما عليك استخدام الكود التالى مع تغيير التواريخ لما هو لديك
ستحتاج الى تحويل التاريخ الهجرى الى ميلادى
مثلاً لديك تاريخ 1/6/1406 والذى يوافق 11/2/1986
الى التاريخ 14/10/1439 والذى يوافق 28/6/2018
من ثم عمل فارق التاريخ بين من الى للتاريخ الميلادى
وبكده تكون حللت مشكلة فارق الايام التى بالسنة
والتى تعطي فارق بين السنين
طريقة تحويل التاريخ الهجري الى ميلادى
كود :
Dim hijri As New HijriCalendar()
Dim dt As Date = New DateTime(1406, 6, 1, hijri)
TextBox1.Text = dt.ToString("dd/MM/yyyy", CultureInfo.CreateSpecificCulture("en-US"))ولطريقة الاستخدام كاملاً طبقاً لما فهمته من طلبك
كل ما عليك استخدام الكود التالى مع تغيير التواريخ لما هو لديك
كود :
Dim culinf As CultureInfo = CultureInfo.CreateSpecificCulture("en-US")
Thread.CurrentThread.CurrentCulture = culinf
Dim hijri As New HijriCalendar()
Dim dt1 As Date = New Date(1406, 6, 1, hijri)
Dim dt2 As Date = New Date(1439, 10, 14, hijri)
Dim datTim1 As String() = Split(dt1.ToString("yyyy/MM/dd", culinf), "/")
Dim datTim2 As String() = Split(dt2.ToString("yyyy/MM/dd", culinf), "/")
Dim dd1 As Date = New Date(1986, 2, 11)
Dim dd2 As Date = New Date(2018, 6, 28)
TextBox1.Text = DateDiff(DateInterval.Year, dd1, dd2)
TextBox2.Text = Val(DateDiff(DateInterval.Month, dd1, dd2)) - Val(TextBox2.Text * 12)تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمةفى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية

