Practica 4.- Realizar una aplicación que pueda indicarnos el mayor de tres números dados.
Objetivo.- El alumno analiza, comprende y aplica el uso de la función If anidada.
La interfaz de la aplicación es la siguiente:
Los objetos que deberán usar:
5 labels
3 cajas de texto
1 botón
El código sugerido es:
Dim a As Double
Dim b As Double
Dim c As Double
a = TextBox1.Text
b = TextBox2.Text
c = TextBox3.Text
If a > b Then
If a > c Then
Label5.Text = "El valor de a que es de " & a & " es mayor"
Else
Label5.Text = "El valor de c que es de " & c & " es mayor"
End If
Else
If b > c Then
Label5.Text = "El valor de b que es de " & b & " es mayor"
Else
Label5.Text = "El valor de c que es de " & c & " es mayor"
End If
End If
Recuerda que todas las aplicaciones deberán de contener los botones salir y borrar.
Recuerda que todas las aplicaciones deberán estar protegidas contra errores de usuario.
No hay comentarios:
Publicar un comentario