模块
目录
索引 🔎︎

# Tan 函数

计算一个角度的正切值，角度以弧度为单位。

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

Tan(Alpha) = 对边/邻边

## 语法:

    Tan (Number)

## 返回值:

双精度型

## 参数:

「Number」:要计算正切值的任意数字表达式 (以弧度为单位)。

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

度 = (弧度 * 180)/Pi

弧度 = (度 * Pi)/180

Pi 的近似值是 3.141593。

## 错误代码:

5 无效的过程调用

## 示例:

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

    ' 角的对边和角度 (以度为单位)，并根据它们来计算角的邻边长度:

    Sub ExampleTangens

    ' Pi = 3.1415926 是预定义变量

    Dim d1 As Double

    Dim dAlpha As Double

        d1 = InputBox("Enter the length of the side opposite the angle:","opposite")

        dAlpha = InputBox("请输入 Alpha 角度 (单位为度):","Alpha")

        Print "the length of the side adjacent the angle is"; (d1 / tan (dAlpha * Pi / 180))

    End Sub