Fechas

16/07/2003 - 15:53 por juanca | Informe spam

Simple, tam simple como el hecho de que no se como hacerlo.

Tengo un formulario dentro de este cuadro de texto
(TxtDia.Text)en el cual el usuario debe de ingresar una
fecha.
Pues bueno esa fecha no puede ser menor que el 30/06/2003
y escribi el siguiente codigo pero me da el mensaje de
erro aun y con fechas mayores al 30/06/2003. Cual es el
error.

If DateValue(TxtDia.Text) < "30/06/2003" Then
MsgBox ("A data ten que ser maior ao 30/06/03")
TxtDia.SetFocus
Exit Sub
End If

Siga el debate

6 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#6 Gustavo Fellay

16/07/2003 - 21:57 | Informe spam

El problema es que el "30/06/03" lo toma como texto y no
como fecha
Saludos,
Gustavo

Gracias. Me sirvio.
Solo una duda; porque no acepta de manera directa la

fecha?

Hola Juanca!
Asigna la fecha a una variable previamente definida como

fecha, tal que así:

Dim FechaTope As Date
FechaTope = "30/06/03"
If DateValue(TxtDia.Text) < FechaTope Then
Beep 'para que emita un sonido de aviso

...

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

1 2

Busqueda sugerida