Ver Mensaje Individual
  #3 (permalink)  
Antiguo 10/04/2004, 23:03
Gerardo_mfg
 
Fecha de Ingreso: octubre-2003
Ubicación: Huancayo - Peru
Mensajes: 32
Antigüedad: 21 años, 5 meses
Puntos: 0
Alguito mas fácil :)

Hola, bueno, eso de poner los números en DropdownLists te puede generar errores ya que das la posibilidad de que el usuario pueda seleccionar la fecha 31/02/1993 por ejemplo que por ser Febrero 31, no existe y si te vas a poner a validar todos los dropdown lists, tomando en cuenta los años bisiestos y todo eso te va a salir un código un poco pesado.

te parece si,
defines una variable de tipo cadena, en ella concatenas tus tres textbox en forma de fecha por ejemplo

-------------------
dim FechaValidar as string
FechaValidar = textbox1.text & "/" & textbox2.text & "/" & textbox3.text
--------------------

entonces luego
defines una variable de tipo fecha y otra de respuesta y realizamos la validacion

----------------

dim FechaVal as date
dim resp as integer
try
FechaVal = cDate(FechaValidar)
resp = 0 'fecha valida
catch
resp = 1 'fecha no valida
end try


-----------------------------------

esto es verificar los datos por transformación, entonces el visual verifica la fecha y te captura si hay un error de conversión o si el usuario ha ingresado letras en vez de numeros , lo que significa que la fecha no es valida y por lo tanto te devuelve 1, y te devuelve 0 si la fecha es valida.

Espero que te haya servido.
__________________
La fidelidad es a la vida de las emociones lo que la coherencia a la vida del intelecto. ("El Retrato de Dorian Gray" - Oscar Wilde)