Código Operaciones Basicas

OPERACIONES
En este programa utilizamos un formulario con 4 label, 3 TextBox, 6 Button, calcula las operaciones básicas, suma, resta, multiplicación, y división.

PUBLIC SUB Button1_Click()
TextBox3.Text = TextBox1.Text + TextBox2.Text
TextBox1.SetFocus
END
PUBLIC SUB Button3_Click()
ME.Close
END
PUBLIC SUB Button2_Click()
TextBox1.Clear
TextBox2.Clear
TextBox3.Clear
TextBox1.SetFocus
END
PUBLIC SUB TextBox1_KeyPress()
TextBox2.SetFocus
END
PUBLIC SUB Button5_Click()
TextBox3.Text = TextBox1.Text - TextBox2.Text
TextBox1.SetFocus
END
PUBLIC SUB Button4_Click()
TextBox3.Text = TextBox1.Text * TextBox2.Text
TextBox1.SetFocus
END
PUBLIC SUB Button6_Click()
TextBox3.Text = TextBox1.Text / TextBox2.Text
TextBox1.SetFocus
END