Programación General > Visual Basic 6.0 e inferiores

 Año Bisiesto

(1/2) > >>

Nalah:
Wenas a todos. es la primera vez que entro aqui. queria saber si alguien me puede echar una manita... tengo q comprobar en un formulario una fecha. para ello tengo 3 cuadros de texto, para comprobar el dia, (dependiendo de meses ) y ahora quiero comprobar si el año es bisiesto. para saber si febrero puede tener 28 o 29. el año pasado vi algo de esto en clase pero ya no me acuerdo.

Muchas gracias

Nalah

cpmario:
Una manera fácil de obtener el año bisiesto es la siguiente:

--- Código: Text ---    If IsDate("29/02/2007") Then        MsgBox "El 2007 es bisiesto"    Else        MsgBox "El 2007 no es bisiesto"    End If        If IsDate("29/02/2008") Then        MsgBox "El 2008 es bisiesto"    Else        MsgBox "El 2008 no es bisiesto"    End If  :comp:

Mollense:
Otra solución, pero independiente del lenguaje de programación es dividiendo el año por 4. Si el resto de dicha división es cero (0) entonces el año es bisiesto de lo contrario, no lo es.-

Ej:
2007/4=501 ;Resto=1    "No es bisiesto"
2008/4=502 ;Resto=0    "Es bisiesto"

Salu2  :beer:

ElNapster:

--- Citar ---Otra solución, pero independiente del lenguaje de programación es dividiendo el año por 4. Si el resto de dicha división es cero (0) entonces el año es bisiesto de lo contrario, no lo es.-
--- Fin de la cita ---

 :kicking:  Ese es el algoritmo que se necesita , ya luego se implemtenta a cualquier lenguaje de programacion .....  ;)

Nalah:
Muchiiiisimas gracias. Menos mal que existen foros como estos. A ver si me sale y si tengo alguna duda mas, os digo. un besazo

Navegación

[0] Índice de Mensajes

[#] Página Siguiente