martes, 8 de febrero de 2011

EJERCICIO 45

Realizar una aplicaciòn que imprima los multiplos de 3 con el ciclo.

' Gambas class file

PUBLIC SUB _new()

END

PUBLIC SUB Form_Open()

END

PUBLIC SUB Button3_Click()
QUIT
END

PUBLIC SUB Button2_Click()
ListBox1.Clear
END


PUBLIC SUB Button1_Click()
DIM A AS Integer
FOR A = 0 TO 99 STEP 3
ListBox1.Add(A)
NEXT

END


No hay comentarios:

Publicar un comentario