[khairallah]

الرجاء من الاخوة الكرام جعلت في البرنامج اداة التاريخ تنسيقها  ("Date.Now.ToString("dd/MM/yyyy وعندما يكون التاريخ في الحاسوب MM/dd/yyyy يعطي رسالة خطا
ما الحل هل يجب الغاء التنسيق وجعله الافتراضي وشكرا

[الحازمي]

أخي خير الله

يجب الإهتمام في تنسيق التاريخ خصوصا أماكن اليوم والشهر،
ففي بعض الدول يكون التاريخ يبدأ بالشهر مثل MM/dd/yyyy وأغلبية الدول تبدأ باليوم dd/MM/yyyy

بالنسبة إلى ("Date.Now.ToString("dd/MM/yyyy فلا توجد مشكلة

المشكلة تحدث عندما يكون تنسيق النظام MM/dd/yyyy وتريد تحويل تاريخ نصي مثل "30/12/2018" بالأمر CDate

وبما أن مشروعك قد يعمل في دول تختلف عن ما تعمل عليه في جهازك فعليك بالأمر Date.ParseExact

الأمر Date.ParseExact يوضح للتحويل بحيث يأخذ التنسيق الذي لدينا ويحوله إلى نوع تاريخ مثل

PHP كود :

Dim d As Date = Date.ParseExact("30/12/2018", "dd/MM/yyyy", Globalization.CultureInfo.InvariantCulture) 


قد تبدو العملية طويلة، ولكن فيه الحل من أجل التحويل بشكل التنسيق الذي عليه التاريخ النصي،

تستطيع عمل دالة خاصة تخدم عملك في المشروع فتريحك من كتابة هذا السطر الطويل مثل

PHP كود :

Public Function GetDate(stringDate As String) As Date
    Dim provider = Globalization.CultureInfo.InvariantCulture
    Return Date.ParseExact(stringDate, "dd/MM/yyyy", provider)
End Function 


وكل ما عليك هو أن ترسل للدالة الخاصة له التاريخ النصي ليعيده لك بنوع تاريخ مثل

PHP كود :

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim d As Date = GetDate("30/12/2018")
    MsgBox(d.ToString)
End Sub 


أخي خير الله
إن كان لديك استفسار في هذا الكود فأخبرني

[khairallah]

مشكور اخ الكريم على اهتمامك