Cos
 
返回角度的余弦值

语法

Declare Function Cos ( ByVal angle As Double ) As Double

用法

result = Cos( angle )

参数

angle
角度（弧度）

返回值

将angle 的参数angle 的余弦值返回-1.0范围内1.0.

说明

参数number 以弧度（不是度）衡量。

值为angle 的绝对值为2 ^ 63或更大时，此函数返回的值未定义。

例子

Const PI As Double = 3.1415926535897932
Dim a As Double
Dim r As Double
Input "请输入以度为单位的角度：", a
r = a * PI / 180    '将度数转换为Radians
Print ""
Print "a的余弦" ; a; "度角是"; Cos ( r ) 
Sleep

输出：
Please enter an angle in degrees: 30
The cosine of a 30 degree angle Is 0.8660254037844387

与QB差别

  • 没有

参考