Sentencias de control

NO SOY AUTOR
Las sentencias de control, denominadas también estructuras de control, permiten tomar decisiones y realizar un proceso repetidas veces. Son los denominados bifurcaciones y bucles. Este tipo de estructuras son comunes en cuanto a concepto en la mayoría de los lenguajes de programación, aunque su sintaxis puede variar de un lenguaje de programación a otro. Se trata de unas estructurasmuy importantes ya que son las encargadas de controlar el  flujo de un programa según los requerimientos del mismo. Visual Basic 6.0 dispone de las siguientes estructuras de control:
If ... Then ... Else
Select Case
For ... Next
Do ... Loop
While … Wend
For Each … Next
3.6.1  Sentencia IF ... THEN ... ELSE ...
Esta estructura permite ejecutar condicionalmente una o más sentenciasy puede escribirse de dos formas. La primera ocupa sólo una línea y tiene la forma siguiente:
If c ondicion Then sentencia1 [Else sentencia2]
La segunda es más general y se muestra a continuación:
If condicion Then
    sentencia(s)
[Else
    sentencia(s)]
End If
Si condicion es True (verdadera), se ejecutan las sentencias que están a continuación de
Then, y si condicion es False(falsa), se ejecutan las sentencias que están a continuación de Else, si esta cláusula ha sido especificada (pues es opcional). Para indicar que se quiere ejecutar uno de varios bloques de sentencias dependientes cada  uno de ellos de una condición, la estructura adecuada es la siguiente:
If condicion1 Then
    sentencias1
ElseIf condicion2 Then
    sentencias2
Else
    sentencia-nEnd If
Si se cumple la condicion1 se ejecutan las sentencias1, y si no se cumple, se examinan
secuencialmente las condiciones siguientes hasta Else, ejecutándose las sentencias correspondientes al primer ElseIf cuya condición se cumpla. Si todas las condiciones son falsas, se ejecutan las sentencias-n correspondientes a  Else, que es la opción por defecto
Por ejemplo,
Numero = 53    ' Seinicializa la variable.
If Numero < 10 Then
    Digitos = 1
ElseIf Numero < 100 Then
' En este caso la condición se cumple (True) luego se ejecuta lo siguiente.
    Digitos = 2
Else    'En el caso en que no se cumplan los dos anteriores se asigna 3
    Digitos = 3
End If
Esta sentencia permite ejecutar una de entre varias acciones en función del valor de una expresión.
Es unaalternativa a If ... Then ... ElseIf cuando se compara la misma expresión con diferentes
valores. Su forma general es la siguiente:
Select Case expresion
Case etiq1
    [sentencias1]
Case etiq2
    [sentencias2]
Case Else
    sentenciasn
End Select
donde expresion es una expresión numérica o alfanumérica, y etiq1, etiq2, ... pueden adoptar las formas siguientes:
1. expresion
2.expresion To expresion
3. Is operador-de-relación expresion
4. combinación de las anteriores separadas por comas Por ejemplo,
Numero = 8                ' Se inicializan las variable.
Select Case Numero        ' Se va a evaluar la variable Numero.
Case 1 To 5               ' Numero está entre 1 y 5.
    Resultado = "Se encuentra entre 1 y 5"
' Lo siguiente se ejecuta si es True laexpresión.
Case 6, 7, 8              ' Numero es uno de los tres valores.
    Resultado = "Se encuentra entre 6 y 8"

Case Is = 9 , Is = 10     ' Numero es 9 ó 10.
    Resultado = "El valor es 9 o 10"
Case Else                 ' Resto de valores.
    Resultado = "El número no se encuentra entre 1 y 10"
End Select
Cuando se utiliza la forma expresion To expresion, el valor más pequeñodebe aparecer en
primer lugar. Cuando se ejecuta una sentencia Select Case, Visual Basic evalúa la expresion y el control del programa se transfiere a la sentencia cuya etiqueta tenga el mismo valor que la expresión evaluada, ejecutando a continuación el correspondiente bloque de sentencias. Si no existe un valor igual a la expresion entonces se ejecutan las sentencias a continuación de Case...