Instrucciones ejecutables
Actualización: noviembre 2007
Una instrucción ejecutable realiza una acción. Puede llamar a un procedimiento, bifurcar a otra parte del código, recorrer varias instrucciones con un bucle o evaluar una expresión. Una instrucción de asignación es un caso especial de una instrucción ejecutable.
En el ejemplo siguiente se utiliza una estructura de control If...Then...Else para ejecutar diferentes bloques de código basándose en el valor de una variable. En cada bloque de código, un bucle For...Next se ejecuta un número especificado de veces.
Public Sub startWidget(ByVal aWidget As widget, _
ByVal clockwise As Boolean, ByVal revolutions As Integer)
Dim counter As Integer
If clockwise = True Then
For counter = 1 To revolutions
aWidget.spinClockwise()
Next counter
Else
For counter = 1 To revolutions
aWidget.spinCounterClockwise()
Next counter
End If
End Sub
Después, la instrucción If del ejemplo anterior comprueba el valor del parámetro clockwise. Si el valor es True, llama al método spinClockwise de aWidget. Si el valor es False, llama al método spinCounterClockwise de aWidget. La estructura de control If...Then...Else finaliza con End If.
El bucle For...Next de cada bloque llama al método adecuado un número de veces igual al valor del parámetro revolutions.