كيف يمكنني ان اعمل زي الي بالصورة
tyhank
[ تمت الإجابة ]التاريخ؟
If IsDate(Me.Text1.Text) Then
MsgBox "Valid Date"
Else
MsgBox "Invalid Date"
End If
End Sub
Private Sub Command1_Click()
و Command1 هو زر الـ Submit والـ Text1 هو حقل إدخال التاريخ
اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي
فليقبل الجميع تقديري واحترامي .. ولكم تحياتي
تحيااااااااااااااااااااااااااااتي الك..
تمت الاجابة