ho il seguente codice:
PUBLIC SUB GridEU_Click()
DIM cordX, cordY AS Integer
DIM ReForm AS NEW Form
DIM Pulsante1, Pulsante2 AS Button
ReForm = NEW Form
WITH ReForm
.Height = 100
.Width = 300
.Center
.Show
.Title = "TITOLO"
END WITH
Pulsante1 = NEW Button(ReForm)
Pulsante2 = NEW Button(ReForm)
WITH Pulsante1
.Height = 30
.Width = 50
.X = 20
.Y = 20
.Caption = "SALVA"
END WITH
WITH Pulsante2
.Height = 30
.Width = 50
.X = 20
.Y = 60
.Caption = "EXIT"
END WITH
cordX = GridEU.Row
cordY = GridEU.Column
END
come posso scrivere del codice allo scatenarsi dell'evento pulsante2_click?
trovato il problema:
Pulsante1 = NEW Button(ReForm) AS "Pulsante1"
Pulsante2 = NEW Button(ReForm)
bisogna aggiungere AS "nome" altrimenti non si può generare nessun evento
il pulsante1 adesso accetterà Pulsante1_Click
mentre il pulsante2 no.
Ho un altro problema ora, una volta generato l'evento pulsante1_Click al suo interno vorrei metterci reform.CLOSE ma non accetta reform perchè è un form creato dentro un evento con il metodo NEW FORM.
come posso chiamarlo da un altra SUB ?