eduardo
06 de Abril del 2004

como valido un dato en fecha corta

SIL
06 de Abril del 2004

FOMAT(FECHA, "DD/MM/YY")

Meifer
06 de Abril del 2004

Ademas para q sea correcta debes colocar....

If IsDate(Me.TXTFECHA1.Text) = False Then
MsgBox " Debe ingresar una fecha valida", vbExclamation, "Fecha"
Exit Sub
End If