1.¿para que sirven en general las sentencias o estructuras de control en visual basic 6.0?

R/las sentencias de flujo también llamadas estructuras de control o flujo permite cambiar las secuencias de instrucciones de un programa y ejecutar varias veces un bloque de las mismas sin necesidad de escribirlas tantas veces como se requieran.
Todas las sentencias de control sirven para tomar la decisión de ejecutar o no un bloque de instrucciones dependiendo del resultado de la evaluación, de una condición o variable.

2.¿cual es la sintaxis de las siguientes estructuras de control en visual basic 6.0 y para que sirve cada una de ellas en particular, de un ejemplo de uso ?

  •  IF THEEN ELSE 

     sintaxis :

     if then
     instrucciones
     else
     otras instrucciones
     End if

sirve para la sustitución del Si por If, del Entonces por Then, del SiNo por Else y del Finsi por End If. La única salvedad a tener en cuenta es que Visual Basic permite además de la escritura en bloques la escritura en una sola línea.
ejemplo:
'Dim count As Integer = 0
        Dim message As String 

        If count = 0 Then
            message = "There are no items." 
        ElseIf count = 1 Then
            message = "There is 1 item." 
        Else
            message = "There are " & count & " items." 
        End If
  • SELECT CASE
        sintaxis:
Case [valor expresión 1]
    Instrucción 1
    Instrucción 2
Case [valor expresión 2]
    Instrucción 3
    Instrucción 4
.
.
.
Case [valor expresión n]
    Instrucción k
Case Else
    Instrucción m
End Select

sirve para métodos más fáciles y utilizados en Excel cuando se trata de asignar y clasificar en función de una única variable con varios posibles resultados. En este tutorial vamos a ver su sintaxis, sus parámetros y cómo usarla con varios ejemplos muy sencillos.

ejemplo:
 Dim number As Integer = 8
Select Case number
    Case 1 To 5
        Debug.WriteLine("Between 1 and 5, inclusive")
        ' The following is the only Case clause that evaluates to True. 
    Case 6, 7, 8
        Debug.WriteLine("Between 6 and 8, inclusive")
    Case 9 To 10
        Debug.WriteLine("Equal to 9 or 10")
    Case Else
        Debug.WriteLine("Not between 1 and 10, inclusive")
End Select
  • DO LOOP
Sintaxis:
Do { While | Until } condition
    [ statements ]
    [ Continue Do ]
    [ statements ]
    [ Exit Do ]
    [ statements ]
Loop
-or-
Do
    [ statements ]
    [ Continue Do ]
    [ statements ]
    [ Exit Do ]
    [ statements ]
Loop { While | Until } condition
sirve para Repite un bloque de instrucciones mientras una condición Boolean sea True o hasta que la condición se convierta en True
ejemplo:
Dim index As Integer = 0
Do While index <= 100
    If index > 10 Then 
        Exit Do 
    End If

    Debug.Write(index.ToString & " ")
    index += 1
Loop

Debug.WriteLine("")
' Output: 0 1 2 3 4 5 6 7 8 9 10 
  • WHILE WEND
Sintaxis:
Sub test_loop_1()
Dim i As Integer
i = 1
Do While i < 10
    Cells(i, 1) = i
    i = i + 1
Loop

End Sub

Sub test_loop_2()
Dim i As Integer
i = 1
While i < 10
    Cells(i, 1) = i
    i = i + 1
Wend

End Sub
ejemplo:
Dim Counter 
Counter = 0 ' Initialize variable. 
While Counter < 20 ' Test value of Counter. 
 Counter = Counter + 1 ' Increment Counter. 
Wend ' End While loop when Counter > 19. 
Debug.Print Counter ' Prints 20 in the Immediate window.

  • FOR NEXT
Sintaxis:
For counter [ As datatype ] = start To end [ Step step ]
    [ statements ]
    [ Continue For ]
    [ statements ]
    [ Exit For ]
    [ statements ]
Next [ counter ]
funciona bien cuando no se sabe de antemano cuántas veces para ejecutar las instrucciones del bucle. Sin embargo, cuando espere ejecutar el bucle un número concreto de veces.
ejemplo:
For index As Integer = 1 To 5
    Debug.Write(index.ToString & " ")
Next
Debug.WriteLine("")
' Output: 1 2 3 4 5

Comentarios