Ik heb een formulier gemaakt met daarin een tekstbox waarin een datum moet worden opgegeven. Voor de waarden uit het formulier worden verwerkt wil ik eerst testen of ook een datum is ingevoerd.
Ik dacht dit te doen door middel van de onderstaande code, maar ik krijg bij alles wat ik invoer de msgbox te zien. Hoe kan ik dit verhelpen?
Ik dacht dit te doen door middel van de onderstaande code, maar ik krijg bij alles wat ik invoer de msgbox te zien. Hoe kan ik dit verhelpen?
Code:
If Not IsDate(tekstFeest2) Then
MsgBox "Voer een correcte datum in!" & vbCr & "(dd-mm-jjjj)"
Exit Sub
End If