+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] تغير عرض التاريخ باداة DateTimePicker (/showthread.php?tid=39202)
تغير عرض التاريخ باداة DateTimePicker - احمد 2021 - 02-08-21
السلام عليكم
اريد من الاخوة بالمنتدي طريقة فعالة لتغير تاريخ اداة DateTimePicker الي التاريخ الميلادي حتي لو كان تاريخ الجهاز هجري .
الطريقة تكون مباشرة ان امكن
وليس الحل البديل التحايل واضافة تيكست وتغير التاريخ من الاداة الية ولكن اريد طريقة مباشرة افضل ..
حاولت بالطريقة دية ولا شيء تظل الاداة بالتاريخ الهجري تاريخ الجهاز
كود :
'//1
Dim Ar As CultureInfo = New CultureInfo("ar-eg") '
Thread.CurrentThread.CurrentCulture = Ar
Ar.DateTimeFormat.Calendar = New GregorianCalendarمحاولة اخري
كود :
'/// 2
Dim ci As CultureInfo = New CultureInfo("ar-eg")
Dim info As DateTimeFormatInfo = ci.DateTimeFormat
DateTimePicker1.Format = System.Windows.Forms.DateTimePickerFormat.Custom
DateTimePicker1.CustomFormat = info.ShortDatePatternكود :
Function Tomiladeg(ByVal gDate As Date, Optional ByVal format As String = Nothing) As String
Return gDate.ToString(format, New Globalization.CultureInfo("ar-EG"))
End Function
DateTimePicker1.Value = Convert.ToDateTime(Tomiladeg(Now, "dd-MM-yyyy"))