1 Programación Visual Basic Pedro Boualy y Fran B 2ºB PC:28

2 Ejercicio 1 C Edad primera persona Edad segunda persona E1

3

4 Private Sub CommandButton1_Click() Dim E1, E2 As Integer E1 = Val(TextBox1) E2 = Val(TextBox2) If E1 > E2 Then Label3 = ("la primera persona es mayor que la segunda persona") Else Label3 = ("la segunda persona tiene la misma edad o es mayor que la primera persona") End If End Sub

5 Ejercicio 2 C b b c a>c a>b C>b Ingresar 3 valores enteros cualesquiera A, B, C. Mostrarlos en pantalla ordenados de menor a mayor, siendo A el menor, B el segundo, y C el tercer valor. B es mayor A es mayor C es mayor si no si no si F

6

7

8 Ejercicio3 Ingresar 10 valores enteros correspondientes a la temperatura máxima tomada durante 10 días. Informar la temperatura máxima El promedio de temperatura. ¿Qué día se registró la mayor temperatura? C repetir 10 a A M=M+A S/10 F

9

10