RAIZ CUADRADA DE X O DE UN NUMERO CUALESQUIERA

PUBLIC SUB Button2_Click()
TextBox1.Text = ""
TextBox2.Text = ""

END

PUBLIC SUB Button1_Click()
TextBox2.Text = (TextBox1.Text) ^ (1 / 2)
END