Practica 5

PRACTICA 5

CALCULADORA SIMPLE DE SUMA

Private Sub Command1_Click()

a = Val(Text1.Text)

b = Val(Text2.Text)

r = a + b

MsgBox (r)

End Sub