a = CInt(Text1.Text) d = CInt(Text2.Text) c = a + d Text3.Text = Str(c)