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

(05-02-17, 08:12 PM)عبد الرحمن كتب : [ -> ]جرب هذا الكود
       Try
           TextBox2.Text = ""
           Threading.Thread.CurrentThread.CurrentCulture = New Globalization.CultureInfo("ar-eg")
           Dim dt = CDate(TextBox1.Text)
           TextBox2.Text = dt.ToString("dd/MM/yyyy HH:mms")
       Catch ex1 As Exception
       End Try


واذا تتعامل مع الهجري غير ar-eg بدالها ar-sa

---

ترى السمايل الي طلع في الكود هو نقطتين : وبعدها حرف s

---

جربت اكتب 1/2/2017 10:2:5 pm
طلع 01/02/2017 22:02:05

الله يحفظك اخي ويبارك فيك ان يجعلها لك في مسزان الحسنات
وان يجعل ايامك كلها سعادة
شكرا لك