Resolución de Problemas con Condicionales

En los problemas con condicionales, ademas de reconocer datos de entrada, proceso y datos de salida, hay que reconocer cuál es la condición que debe cumplir el dato para ser procesado de una u otra manera, cuáles son los posibles datos de salida de acuerdo a si se cumple o no la condición.

Ejemplo de análisis y codificación para el ejercicio 2

Datos de entrada: a b c d

Condiciones (pruebas lógicas):  a>0  b>0  c>0  d>0

Procesos: R=a+b+c+d

                  E= "Ingrese sólo números positivos"

Dato de salida si se cumplen las condiciones: R

Dato de salida si no se cumple por lo menos una de las condiciones: E

                         
                         

Private Sub CommandButton1_Click()

Dim a As Integer

Dim b As Integer

Dim c As Integer

Dim d As Integer

Dim  r as integer

Dim e as string

a = InputBox("Ingresa un número")

b = InputBox("Ingresa un número")

c = InputBox("Ingresa un número")

d = InputBox("Ingresa un número")

If a > 0 And b > 0 And c > 0 And d > 0 Then

r = a + b + c + d

MsgBox ("El total es ") & r

Else

e="Ingrese sólo números positivos"

MsgBox (e)

End If

End Sub