第1.36例 Sqr 函数
一、题目：
要求编写一段代码，运用 Sqr 函数返回指定参数的平方根。
二、代码：
Sub 示例_1_036()
Dim Gou&, Gu&, Xian&, Pfg
Gou = 3
Gu = 4
Xian = Sqr(Gou * Gou + Gu * Gu)
Pfg = Sqr(-4)
End Sub
三、代码详解
1、Sub 示例_1_036()：宏程序的开始语句。宏名为示例_1_036。
2、Dim Gou&, Gu&, Xian&, Pfg ：声明变量Gou、Gu、Xian为双精度浮点型变量，& 双精度浮点型变量Double的类型声明字符，其它有类型声明字符的数据类型请见第1.24例：Pfg为可变型变量。
3、Gou = 3 ：把3赋给变量Gou。
4、Gu = 4 ：把4赋给变量Gu。
5、Xian = Sqr(Gou * Gou + Gu * Gu) ：运用Sqr函数计算出25的平方根5，赋给变量Xian；
6、Pfg = Sqr(-4) ：生成一个运行时错误（负数不能用此函数开平方根）。
注意工作表函数中也有相同的函数，但是名字是SQRT。
Sqr 函数
返回一个 Double，指定参数的平方根。
Sqr(number)
必要的 number 参数 number 是 Double 或任何有效的大于或等于 0 的数值表达式。