Rester dans le textbox après le controle de la saisie

Bonjour à tous,

J'ai un textbox parametré pour saisir une date. Un message apparaît si
l'utilisateur saisie autre chose qu'une date, mais j'aimerais qu'après
le message informant l'utilisateur, que le curseur reste positionné
dans la textbox qui vient d'être controlé.
Quelqu'un aurait il la solution à mon problème
Merci par avance de vos réponses.
Alex


J'ai écrit ceci :

Private Sub DDB_AfterUpdate()
If IsDate(Me.DDB) Then
Me.DDB = Format(Me.DDB, "dd/mm/yy")
Else
MsgBox "Ceci n'est pas un format date correcte, veuillez saisir
votre date avec le format JJ/MM/AA"

''''''ICI : Je souhaiterais ajouter ligne de commande pour dire
repositionne toi sur la textbox

End If
End Sub