Sqr Function

It returns calculates the square root of the given number
Dim MyValue, MyReturn
MyValue = 3
MyReturn = Sqr(MyValue)
MsgBox MyReturn