05-02-17, 08:12 PM
(آخر تعديل لهذه المشاركة : 05-02-17, 08:17 PM {2} بواسطة عبد الرحمن.)
جرب هذا الكود
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:mm
s")
Catch ex1 As Exception
End Try
واذا تتعامل مع الهجري غير ar-eg بدالها ar-sa
ترى السمايل الي طلع في الكود هو نقطتين : وبعدها حرف s
جربت اكتب 1/2/2017 10:2:5 pm
طلع 01/02/2017 22:02:05
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:mm
s")Catch ex1 As Exception
End Try
واذا تتعامل مع الهجري غير ar-eg بدالها ar-sa
ترى السمايل الي طلع في الكود هو نقطتين : وبعدها حرف s
جربت اكتب 1/2/2017 10:2:5 pm
طلع 01/02/2017 22:02:05
