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
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
Publicar un comentario