Renvoi la valeur arc-cosinus d 'un nombre

Exemple :

PUBLIC SUB _new()
END

PUBLIC SUB Form_Open()
ME.Center
'valeur de depart
TextBox1.Text = 0.23

'valeur de sortie
TextBox2.Text = ACos(CFloat(TextBox1.Text))
END