Sin 函数

计算一个角度的正弦值，角度以弧度为单位，结果在 -1 到 1 之间。

以 Alpha 角为例，在直角三角形中 Sin 函数计算的是 Alpha 的对边与斜边长度之比。

Sin(Alpha) = 对边/斜边

语法：

Sin (Number)

返回值：

双精度型

参数：

Number：用于指定要计算正弦值的角度的数字表达式，以弧度为单位。

要将度转换为弧度，可将度乘以 pi/180；而要将弧度转换为度，则将弧度乘以 180/pi。

度=(弧度*180)/pi

弧度=(度*pi)/180

Pi 的近似值是 3.141593。

错误代码：

5 无效的过程调用

示例：

' 在此示例中，以下项均针对直角三角形:

' 角的对边和角度（以度为单位），并通过它们来计算斜边长度:

Sub ExampleSine

' Pi = 3.1415926 是一个预定义的变量

Dim d1 As Double

Dim dAlpha As Double

    d1 = InputBox("输入对边长度：","对边")

    dAlpha = InputBox("Enter the angle Alpha (in degrees):","Alpha")

    Print "The length of the hypotenuse is"; (d1 / sin (dAlpha * Pi / 180))

End Sub