Foro de elhacker.net

buenas
miren mi problemas es que nesecito sacar una raiz cuaquiera de un numero cualquiera
que no sea cuadrada.
mirando por ahi vi que la funcion sqr solo saca raiz cuadrada, busque en MSDN y no encuntro como sacar ottrsa raices, por ejemplo que se necesita la raiz cubica de 9 debe dar 3 pero como se saca.
gracias

Conociendo que la raiz de un numero se obtiene elevandolo a la potencia inversa, se puede hacer lo siguinte:

Private Sub Form_Load()
   MsgBox RaizA(14, 2) ' ejemplo1
   MsgBox RaizB(27, 3) ' ejemplo2
End Sub
 
Private Function RaizA(ByVal Radicando As Double, Indice As Double) As Double
    RaizA = Radicando ^ (1 / Indice)
End Function
 
Private Function RaizB(ByVal Radicando As Double, Indice As Double) As Double
    RaizB = Exp((1 / Indice) * Log(Radicando)) 'e elevado a la potencia x
End Function