Búsqueda personalizada

Instrucciones de control

Cuando se escribe un programa es normal pretender que éste tome decisiones. Esas decisiones pueden depender de los datos que introduzca el usuario, de si se ha producido algún error o de cualquier otra cosa.

If …Then…Else

Se usa para ejecutar una o más instrucciones de forma condicional. La sintaxis general es:

If condición Then inst_verdaderas [Else inst_falsas]

Sub Positivos()
    a = InputBox("Ingrese un número")
    If a > 0 Then
        MsgBox "Número Positivo"
    End If
End Sub

Sub Positivos_Negativos()
    a = InputBox("Ingrese un número")
    If a > 0 Then MsgBox "Número Positivo" Else _
        MsgBox "Número negativo"
End Sub

Select Case

La estructura Select Case es útil para elegir entre tres o más opciones

Sub Positivos_Negativos_Cero()
    a = InputBox("Ingrese un número")
    Select Case a
    Case Is > 0
        Msg = "Número Positivo"
    Case Is < 0
        Msg = "Número negativo"
    Case Else
        Msg = "Cero"
    End Select
    MsgBox Msg
End Sub

For…Next

Conocido también como ciclo, esta sentencia de iteración se ejecuta un número determinado de veces
Su sintaxis es:

For contador = empezar To finalizar [Step valorincremento]
            [Instrucciones]
            [Exit For]
            [instrucciones]
Next [contador]

Sub SumaNúmeros
   Sum = 0
   For Count = 0 To 10
            Sum = Sum + Count
   Next Count
    MsgBox Sum
End Sub

Tema Anterior |

Ir Al Indice