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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : التاريخ الميلادي الموافق للهجري (/showthread.php?tid=32692)

التاريخ الميلادي الموافق للهجري - sofiane-phy - 26-12-19

السلام عليكم

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


كود :
TextBox1.Text = Today.ToString("dddd, dd MMMM yyyy", New Globalization.CultureInfo("ar-SA"))
       TextBox2.Text = Today.ToString("yyyy - MMMM - dd", New Globalization.CultureInfo("ar-EG"))


كود :
اريده بهذا الشكل : الاربعاء 25 ديسمبر 2019 الموافق لـ : 28 ربيع الثاني 1441


RE: التاريخ الميلادي الموافق للهجري - اسامه الهرماوي - 26-12-19

وعليكم السلام...
تفضل:

كود :
Dim a As String
       Dim b As String
       a = Today.ToString("dd MMMM yyyy", New Globalization.CultureInfo("ar-SA"))
       b = Today.ToString("dddd، dd MMMM yyyy ", New Globalization.CultureInfo("ar-EG"))
       TextBox1.Text = b + "  الموافق لــ : " + a


RE: التاريخ الميلادي الموافق للهجري - sofiane-phy - 26-12-19

يعطيك الصحة أخي اسامه الهرماوي ، جزاك الله خيرا