Sqr Function
ααααΆβα«αβααΆααβααβααααααβαααΒ α
ααΆαααβααααααα α
Sqr (Number)
αααααβαααα‘αα α
αααα
αααΆαααΆαααααα α
α ααα½αβ α ααααααβαααβββαα½αβα ααα½αβ αααβα’αααβα ααβααααΆβα«αβααΆαα α
α«αβααΆααβααΊβααΆβα ααα½αβαααβα’αααβαα»αβααΉαβαααα½αβααΆ ααΎααααΈβαααααΎαβααΆαβααΆβα ααα½αβαααααβααα α§ααΆα ααα α«αβααΆααβαα 36 ααΊ 6Β α
α§ααΆα ααα α
Sub ExampleSqr
Dim iVar As Single
iVar = 36
MsgBox Sqr(iVar)
End Sub