EJERCICIO 40

Imprimir los números del del 5 al 100 de 5 en 5 en un Formulario utilizando el DO WHILE

‘Gambas class file

PUBLIC SUB Button1_Click ()

DIM X AS Integer

X = 5

DO WHILE X <= 100

ListBox1.Add(X)

= X + 5

LOOP

END

PUBLIC SUB Button2_Click()

ListBox1.Clear

END