tiradofrank
23 de Octubre del 2003

buenas mi pregunta es la siguiente como puedo hacer para validar que la informacion que entre a un combobox sea una fecha en este formato dd/mm/yyyy
entonces si el usuario introduce algo como dd/mm/**yy, una ventana dirá algo como fecha no reconocida o algo por el estilo.
gracias de antemano a quien me pueda responder

Juan
23 de Octubre del 2003

Prueba con la función IsDate().

jasca
23 de Octubre del 2003

creo que debes de usar el control masked edit de Microsoft, te ofrece la opción de una mascara para el ingreso

tiradofrank
23 de Octubre del 2003

hola juan, probe la funcion que me diste, pero creo que no se como usar esa funcion is date().
la rutina que diseñe fue la siguiente:

Private Sub Command1_Click()
Dim variable As Date
Var = Combo1.Text
variable = Format(Var, "dd/mm/yyyy")
If variable Is Date Then
Label1.Caption = "correcto"
Else
Label1.Caption = "incorrecto"
End If


End Sub

pero me dice que hay un error en la linea numero 4, sombreandome la palabra variable.

gracias por tu primera respuesta y te agradeceria que me aclararas esta duda gracias.

Baltasar
23 de Octubre del 2003

Lo que Juan te ha puesto es:

IF isdate(combo1.text) then
'código para correcto'
ELSE . . . .