[aftfm]

السلام عليكم ورحمةالله وبركاته

اريد كود التأكد من فورمات جهاز الحاسب

إذا كان dd/MM/yyyy يتم فتح الفورم

اما إذا كان بفورمات تاريخ مختلفة تظهر مسج بتعديل فورمات تاريخ الجهاز ويتم اقفال البرنامج

[Osama_Ghareeb]

وعليكم السلام ورحمة الله وبركاته

تفضل الأمر التالي :

كود :

Dim S As String = Now.ToShortDateString()
        Dim D As Date = Date.ParseExact(S, "dd/MM/yyyy", Nothing)
        If S <> D Then
             MsgBox("Wrong Format")
        End If

بالتوفيق

[الميسري]

حلوووووو جدآ

[aftfm]

الف شكر جزاك الله خير