Sqr

Public Function Sqr(ByVal Number As Double) As Double

Returns the square root

Public Function Pythagoras(a As Double, b As Double) As Double
   Return Sqr(a^2 + b^2)
End Function


SendDebug Sqr(9) 'Prints 3
SendDebug Sqr(81) 'Prints 9
SendDebug Sqr(2) 'Prints 1.4142135623730951