15-08-21, 12:22 PM
(آخر تعديل لهذه المشاركة : 15-08-21, 12:29 PM {2} بواسطة ابراهيم ايبو.)
السلام عليكم ورحمة الله وبركاته
اخي الكريم تفضل هذا الكود ووظفه كما تريد
وان اردت اظهار اسم اليوم بالعربي استبدل السطر الثاني بهذا
واستدعي المكتبة Imports System.Globalization
اخي الكريم تفضل هذا الكود ووظفه كما تريد
كود :
Dim MyDate As Date = CDate(TextBox1.Text)
MsgBox(MyDate.ToString("dddd"))كود :
MsgBox(MyDate.ToString("dddd", New CultureInfo("ar-AE")))اعمل الخير وأجرك لا تنتظره فالله خير من إليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات
