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

السلام عليكم

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

كود :

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

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

كود :

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

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

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

sofiane-phy

اسامه الهرماوي

sofiane-phy