Validar fecha en textbox

Te hago otra pregunta... ¿cómo puedo validar una fecha en un text box?
¿Cuándo pierda el foco la caja de texto...?
Probé con ISDATE pero no se como usarlo... Probé este código y no funciona pero me permite escribir cualquier fecha
if not isDate(txtFecha.text) then
  Msgbox"La fecha no es valida"
TxtFecha. Setfocus
end if
y como hago para que valide, cuando el textbox pierde el foco.... ?

1 Respuesta

Respuesta
1
ISDATE(txtFecha.text) devuelve un true/false dependiendo si el valor del control textbox es una fecha valida o no, entonces lo que tienes en tu codigo esta muy bien.
Si quieres validar cuando se pueda el foco debes colocar ese código en el evento LostFocus del control textbox.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Validar textbox y MaskEdBox

Tengo un par de problemitas uno es que quiero validar un textbox de la siguiente manera. Quiero ingresar un cedula "8 dígitos" en la caja de texto ya le coloque MaxLength = a 8 máximo, pero también quiero que cuando se haga click en la caja de texto...
4 respuestas

Fecha en un textbox

Tengo una duda no se si me podrías colaborar con la programación. Dentro un textbox quisiera que se almacene fechas en formato dd/mm/yyyy, y que si no lo ingresa de esa manera o introduce cualquier fecha que aparezca error en un msgbox.
1 respuesta

Cómo puedo validar un textbox con máximo y mínimo

Bueno tengo un problema con un textbox, quiero que me acepte los números del 0 al 20 y que sean enteros, este textbox es de notas, por favor envíenme una solución, la que se sea no importa si son con mensajes el lenguaje es visual basic...
1 respuesta

Mantener el cursor en un textbox cuando tire mensaje

Solo con una consulta como puedo hacer para que un textbox no siga si manda un mensaje de error, por ejemplo estoy utilizando estos códigos. Private Sub TextBox62_Change() If Not IsNumeric(TextBox62.Text) And TextBox62.Text <> "" Then Beep MsgBox "Se...
1 respuesta

VBA setfocus no funciona

Tengo esta sencilla validación.. Y no logro que el SetFocus me de resultado. Siempre se pasa al siguiente textbox. He probado de todo, y no hay caso. Private Sub Text_Fecha_AfterUpdate() If Not IsDate(Text_Fecha.Value) Then MsgBox ("ingrese en...
1 respuesta

Validar datos en visual basic 6.0

Necesito saber como se validan los datos en visual basic 6.0, ¿Por ejemplo tengo un textbox donde almaceno en la cedula de identidad del usuario y obligatoria mente necesito que sea de tipo numérico... Como ago para que ese textbox no acepte ninguna...
2 respuestas

Si se deja un Textbox en blanco

Tengo este código en un formulario de excel: Private Sub TextBox1_Change() largo_entrada = Len(Me.TextBox1) Select Case largo_entrada Case 2 Me.TextBox1.Value = Me.TextBox1.Value & "/" Case 5 Me.TextBox1.Value = Me.TextBox1.Value & "/2008"...
2 respuestas

Compara 2 fechas distintas en visual basic 6

Que tal tengo este inconveniente quisiera saber como le puedo hacer para comparar 2 fechas en visual basic 6, en un formulario tengo 2 textbox con los siguientes nombres text1 y text2 ambos reciben fecha, pero text1 siempre debe mostrar la fecha...
1 respuesta

Condicionar tipos de datos en textbox.

Tengo un formulario de visual para llenar datos y guardarlos en tablas de access. La cuestión es que hay textbox que van números otros letras y otros van combinados números y letras. El problema esta en que lleno todos los datos y le doy guardar y si...
1 respuesta

Fecha en inputbox Excel VBA

Una vez más tengo una pregunta... Estoy solicitando por medio de un inputbox una fecha para hacer unos cálculos, luego la fecha la coloco en una celda... Así es como solicito la fecha... Dim x x = InputBox("Escribe la fecha de vencimiento") Do While...
1 respuesta