Validar una fecha en un evento change

natalyro · #1 (**permalink**) 13/04/2009, 08:19

Hola de nuevo!!!

es que en una caja de texto el usuario debe digitar una fecha, pero quiero validarla para que solo me ingresen el formato de fecha, he visto la funcion isdate pero seguramente no la se utilizar.

lo estaba haciendo asi, por favor me corrigen que demas que esta malisimo...

date = CDate(Text_Validez.Text)

datecheck = IsDate(firstdate)

If secondate = True Then
Else
MsgBox "debe digitar formato fecha dd/mm/aaaa"
End If

Gracias

David · #2 (**permalink**) 13/04/2009, 10:40

Puedes usar directamente el valor del TextBox para saber si es una fecha o no:

Código vb:

Ver originalIf Not IsDate(Text_Validez.Text) Then
    'No es fecha válida
End If

culd · #3 (**permalink**) 13/04/2009, 11:43

Mira podes usar el componente "Microsoft Masked Edit Control 6.0" para darle una "mascara" y que tenga ya predefinido en ese textbox el formato ##/##/#### asi evitas errores de que omitan el / o que carguen mas numeros de los que deberian.

Sensillamente vas a componentes y agregas "Microsoft Masked Edit Control 6.0" y en la propiedad Mask pone "##/##/####" (sin las comillas) y luego cuando necesidad validas si es isDate

natalyro · #4 (**permalink**) 13/04/2009, 13:42

David y culd gracias,

ya hice lo de la Mascara en componentes, pero mi pregunta es como le asigno el formato al textbox ##/##/####?

culd · #5 (**permalink**) 13/04/2009, 19:38

Cita:

Iniciado por natalyro

David y culd gracias,

ya hice lo de la Mascara en componentes, pero mi pregunta es como le asigno el formato al textbox ##/##/####?

Visque te agregaste el objeto "MaskEdBox1" que seria algo parecido a un texbox... Bueno en el menu de PROPIEDADES tenes la opcion que dice "Mask" bueno ahi le pones el formato de la mascara

natalyro · #6 (**permalink**) 14/04/2009, 07:00

Gracias culd,

un besito