+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : كيف أقدر أتحكم بالتاريخ (/showthread.php?tid=34676)
كيف أقدر أتحكم بالتاريخ - DOX.1 - 09-05-20
كيف أقدر أتحكم في تغيير أعدادات تاريخ الجهاز أنه يكون ميلادي
وبفورمات (yyyy/mm/dd)
شكراً هذا الحل
كود :
Public Function convertoAD(hijri As String) As String
Dim h As New HijriCalendar()
Dim g As New GregorianCalendar(GregorianCalendarTypes.USEnglish)
Dim tempDate As DateTime = Convert.ToDateTime(hijri)
Dim date3 As New DateTime(tempDate.Year, tempDate.Month, tempDate.Day, h)
Dim ad As String = g.GetYear(date3).ToString() + "/" + g.GetMonth(date3).ToString() + "/" + g.GetDayOfMonth(date3).ToString()
Dim tempDate2 As DateTime = Convert.ToDateTime(ad)
ad = tempDate2.ToString("yyyy/MM/dd")
Return ad
End FunctionRE: كيف أقدر أتحكم بالتاريخ - ابراهيم ايبو - 10-05-20
السلام عليكم ورحمة الله وبركاته
اخي هذا الكود يغير نمط ShortDate للويندوز اما long Date فلا اعلم ربما يفيدنا احد من الاعضاء الكرام
كود :
' استورد المكتبة التالية
Imports Microsoft.Win32
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim keyName As String = Registry.CurrentUser.ToString() & "\Control Panel\International"
Dim valueName As String = "sShortDate" ' تغيير الشورت دات
Dim s As String = Registry.GetValue(keyName, valueName, String.Empty).ToString()
Registry.SetValue(keyName, valueName, "dddd/MMMM/yyyy") ' تغيير الى هذا النمط او الفورمات التي تريدها
MsgBox("تم تغيير نمظ التاريخ الى النمط الجديد")
End SubRE: كيف أقدر أتحكم بالتاريخ - ابراهيم ايبو - 11-05-20
السلام عليكم ورحمة الله وبركاته
عندما يسأل البعض سؤالا واحاول الاجابة عليه اقوم بتجربة الكود عندي كما ذكرت سابقا حتى اتبين عمله بشكل جيد وهذه من صلب الاجابة الصحيحة
والاخ DOX.1 سأل عن التحكم في التاريخ للويندوز من الفيجوال بيسك نت
قدمت له الاجابة عن تغيير ال sShortDate بعد ان قمت بتجربة الكود على حاسوبي وكانت الصيغة المعتمدة هي "dddd/MMMM/yyyy"
وكنت قد نسيت الموضوع بعدها فتحت احد المشاريع للتعديل عليه ووجدت ان البيانات لاتعرض بالشكل الامثل فقط الاعمدة الاولى التي تسبق التاريخ تعرض اما الباقي يعرض في الداتا غرايد ولكن لايتم عرضه في مربعات النصوص وبقيت يومين اتحرى عن المشكلة بدون فائدة بالرغم من ان المشروع سليم ولم اعدل عليه بعد .
اليوم حاولت اعادة بناء نفس المشروع وكانت النتيجة واحدة ايضا ... ذهبت لقاعدة البيانات لاتحرى فلربما قد غيرت اوعدلت فيها وانا ناس فتحت الجدول لاجد حقل التاريخ قد اصبح كله اشارة # تذكرت على الفور انني قمت بتعديل sShortDate للويندوز عندما اجبت عن احد الاسئلة وفعلا رجعت الى الوينوز ووجدت ان صيغة التاريح معدلة وليس كما في الجدول قمت بتعديلها ورجعت الى المشروع وعمل بشكل جيد
لذلك وجدت لزاما علي كتابة هذه الاسطر احذر فيها من يقوم بتغيير صيغة التاريخ لانها يجب ان تتوافق مع التاريخ المدخل الى جداول قواعد البيانات كلها والا ستكون هناك المشكلة التي واجهتها وحتى لايقع فيها احد ويصبح مهموما
دمتم بألف خير