Traductor

miércoles, 2 de octubre de 2013

PRACTICA 4 (El mayor de dos números)

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