[Alhootti1]

السلام عليكم
عندي تكست بوكس و فيه تاريخ بصيغة (dd/MM/yyyy) فإذا ادخل حد التاريخ بصيغة أخرى مثلا (11/25/2021) احصل على تنبيه

ارجو التعديل على الكود التالي :

كود :

If Pt_DOB.Text = Format(Date.Now, "dd/mm/yyyy") Then
MsgBox(" Correct format ")
Else
MsgBox(" Format of date of birth not correct ! try to use this format day/month/year like 23/08/2021 ")
End if

2.12.0.0
2.12.0.0