Visual Basic - Como validar un campo Fecha

Mi problema es como validar un campo fecha, y como definirlo en un tipo textbox,para que no se ingresa un fecha incorrecta desde teclado.

haz esto:

If IsDate(text1.text) Then

--- algo

End If

es la funcion isdate