lunes, 20 de abril de 2009

EJEMPLO DE CICLO FOR.

Crear un programa que muestre los numeros comprendidos entre 10 y 20.

Herramientas a utilizar:
1 listbox, 1 commandbutton.

programando el command1:

Private Sub Command1_click( )

Dim x As Integer Declaramos la variable y el tipo de datos a utilizar.
for x = 10 To 20 Incrementa por default en una unidad.
list1.AddItem (x) Agregar elemento en listBox (variable).
Next x Continua nuevamente el ciclo hasta que x sea igual a 20.

End sub