MODULO DEL VECTOR Y PARA BORRAR

PUBLIC SUB Button3_Click()
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
END

PUBLIC SUB Button2_Click()
TextBox3.Text = ((TextBox1.Text) ^ 2 + (TextBox2.Text) ^ 2) ^ (1 / 2)
END