IF .... THEN ....  else …… END IF

Con esta sentencia de control se puede hacer que el programa tome decisiones a partir de una condición que se expresara al inicio de este.

En el caso de que la condición sea cierta Visual basic ejecutara unas líneas de programa, si la condición no se cumple, Visual ejecutara otras líneas de programa diferentes.

EJEMPLO:

Dim number, digits As Integer
Dim myString As String
number = 53
If number < 10 Then
    digits = 1
ElseIf number < 100 Then
    digits = 2
Else
    digits = 3
End If
If digits = 1 Then myString = "One" Else myString = "More than one"