لدي datetimepicker
لدي label
اريد عند اختيار تاريخ يظهر لي اسم اليوم على ال label
مثلا عندما اختار تاريخ امس 19/08/2020 يظهر على ال label الاربعاء
وعند اختيار تاريخ اليوم 20/08/2020 يظهر على ال label الخميس هل بالامكان المساعده لوسمحتم
تم الحل
في حدث التاريخ نضع هذا الكود
label. Text= datetimepicker. Value. Dayofweek. Tostring
لكن يظهر اسم اليوم بالانجليزي كيف احول اسم اليوم بالعربي
ضع فنكشن
كود :
Function ToHijra(ByVal gDate As Date, Optional ByVal format As String = Nothing) As String
Return gDate.ToString(format, New Globalization.CultureInfo("ar-SA"))
End Function
ثم في حدث DateTimePicker1
كود :
("Label1.Text = ToHijra(DateTimePicker1.Value, "dddd
(21-08-20, 07:33 AM)tryold كتب : [ -> ]ضع فنكشن
كود :
Function ToHijra(ByVal gDate As Date, Optional ByVal format As String = Nothing) As String
Return gDate.ToString(format, New Globalization.CultureInfo("ar-SA"))
End Function
ثم في حدث DateTimePicker1
كود :
("Label1.Text = ToHijra(DateTimePicker1.Value, "dddd
بارك الله فيك اخي
تمام يظهر اسم اليوم بالعربي لكن اذا غيرت التاريخ يرجع انجليزي ايش الحل
السلام عليكم...
هذا الكود يقوم بإظهار اليوم حسب التاريخ, وحسب لغة الجهاز.
تفضل:
كود :
Dim DayName1 As String = System.Threading.Thread.CurrentThread.CurrentUICulture.DateTimeFormat.GetDayName(DateTime.Parse(Now.ToString("dd/MM/yyyy"), New Globalization.CultureInfo("ar-EG")).DayOfWeek)
Label1.Text = DayName1
مع العلم أن هذا الجزء هو الذي يحدد اللغة والدولة
("ar-EG").
ف ar= العربية
و Eg= جمهورية مصر وكذلك Sa= السعودية...وهكذا.