Red de conocimiento informático - Conocimiento informático - Ayúdeme a escribir un programa VB para determinar la fase de una persona según el año, ¡gracias!

Ayúdeme a escribir un programa VB para determinar la fase de una persona según el año, ¡gracias!

Dim Year As Integer

Dim Name As Integer

Año = Val(InputBox("Ingrese el año de nacimiento de la persona: ", "Consulta del Zodíaco", 1977))

Label1.Caption = "Eres " & Str(Año) + "El año de nacimiento en el zodíaco chino es:"

Nombre = Año Mod 12

Seleccionar Nombre del caso

Caso 4

Label2.Caption = "Rata"

Caso 5

Label2.Caption = "Buey"