EJERCICIO 32

Utilizando el editor de Menu realizar las siguientes operaciones:

SUMA Y RESTA

PRIMER FORMULARIO

' Gambas class file

PUBLIC SUB _new()

END

PUBLIC SUB Form_Open()

END

PUBLIC SUB SUMA_Click()

FMain.Hide

Form1.Show

END

PUBLIC SUB RESTA_Click()

FMain.Hide

Form2.Show

END

PUBLIC SUB SALIR_Click()

QUIT

END

SEGUNDO FORMULARIO

' Gambas class file

PUBLIC SUB Button1_Click()

Form1.Hide

FMain.Show

END

PUBLIC SUB Button3_Click()

TextBox1.Text = ""

TextBox2.Text = ""

TextBox3.Text = ""

END

PUBLIC SUB Button2_Click()

TextBox3.Text = (TextBox1.Text) + (TextBox2.Text)

END

TERCER FORMULARIO

' Gambas class file

PUBLIC SUB Button1_Click()

Form2.Hide

FMain.Show

END

PUBLIC SUB Button2_Click()

TextBox3.Text = (TextBox1.Text) - (TextBox2.Text)

END