Buenas noches

Mire lo que necesito es hacer un programa el cual se introduce en una caja de texto una fecha de la cual se atrapa el año para después decir si el año es bisiesto o no.
Gracias por la colaboración.
Respuesta
1
Dim aa As Integer
Dim txt As String
aa = Val(Text1.Text)
If (aa Mod 4 = 0) Then
txt = "es bisiesto"
Else
txt = "no es bisiesto"
End
Text2.Text = txt
Prueba con eso y adáptalo a tu programa.

1 respuesta más de otro experto

Respuesta
1
Adapta la función de la siguiente liga:
http://www.lawebdelprogramador.com/codigo/codigo.php?idp=161&id=93&texto=Visual+Basic
A lo que desees...

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas