EJERCICIO 42

Imprimir los números del del -100 al 50 de 2 en 2 

' Gambas class file

PUBLIC SUB Button1_Click()

DIM X AS Integer

X = -100

DO WHILE X <= 50

ListBox1.Add(X)

X = X + 2

LOOP

END

PUBLIC SUB Button1_Click()

FORM3.HIDE

FMain.Show

END

PUBLIC SUB Button2_Click()

ListBox1.Clear

END