IMPRIMIR LA PALABRA PATO 10 VECES EN UN LISTBOX1 Y EN UN LABEL1

IMPRIMIR LA PALABRA PATO 10 VECES EN UN LISTBOX1 Y EN UN LABEL1

' Gambas class file

PUBLIC SUB _new()

END

PUBLIC SUB Form_Open()

END

PUBLIC SUB Button3_Click()

QUIT

END

PUBLIC SUB Button2_Click()

Label2.Caption = ""

END

PUBLIC SUB Button1_Click()

DIM x AS Integer

FOR x = 1 TO 5

Label2.Caption = ("pato")

NEXT

END

PUBLIC SUB Button5_Click()

ListBox1.Clear

END

PUBLIC SUB Button4_Click()

DIM A AS Integer

FOR A = 1 TO 10

ListBox1.Add("pato")

NEXT

END