ESTRUCTURA DE CONTROL REPETITIVA

ESTRUCTURA REPETITIVA FOR/NEXT

Dim X As Integer

For X = 1 To 20 Step 1

List1.AddItem X

Next



Otra forma***************

Dim X As Integer

For X = INICIAL To FINAL Step SALTO

List1.AddItem X

Next


*************************************

ESTRUCTURA REPETITIVA DO WHILE/UNTIL LOOP   -  DO LOOP WHILE/UNTIL

EJEMPLO CON DO WHILE LOOP

Dim T As Byte
Do While T < 20
T = T + 1
List1.AddItem T
Loop


EJEMPLO CON DO UNTIL LOOP

'Dim T As Byte
'Do Until T >= 20
'T = T + 1
'List1.AddItem T
'Loop


EJEMPLO CON DO LOOP WHILE 

'Dim T As Byte
'Do
'T = T + 1
'List1.AddItem T
'Loop While T < 20


EJEMPLO CON DO LOOP UNTIL

Dim T As Byte
Do
T = T + 1
List1.AddItem T
Loop Until T >= 20