例: Sqr function

Dim root As Double   
root# = Sqr(169)
Print root#                      '  Prints 13