# VB.Net program to find the hyperbolic cosine of the specified angle

Here, we are going to learn how to find the hyperbolic cosine of the specified angle in VB.Net?
Submitted by Nidhi, on December 02, 2020

Here, we will find the hyperbolic cosine of the specified angle and print the result on the console screen.

Program/Source Code:

The source code to find the hyperbolic cosine of the specified angle is given below. The given program is compiled and executed successfully.

```'VB.Net program to find the hyperbolic cosine
'of the specified angle.

Module Module1

Sub Main()
Dim hyperCosine As Double = 0

hyperCosine = Math.Cosh(2)
Console.WriteLine("Hyperbolic Cosine is: {0}", hyperCosine)

hyperCosine = Math.Cosh(0.3584)
Console.WriteLine("Hyperbolic Cosine is: {0}", hyperCosine)

hyperCosine = Math.Cosh(0.0)
Console.WriteLine("Hyperbolic Cosine is: {0}", hyperCosine)
End Sub

End Module
```

Output:

```Hyperbolic Cosine is: 3.76219569108363
Hyperbolic Cosine is: 1.06491571143776
Hyperbolic Cosine is: 1
Press any key to continue . . .
```

Explanation:

In the above program, we created a module Module1 that contains the Main() method. In the Main() method we created a variable hyperCosine initialized with 0.

```hyperCosine = Math.Cosh(2)
Console.WriteLine("Hyperbolic Cosine is: {0}", hyperCosine)

hyperCosine = Math.Cosh(0.3584)
Console.WriteLine("Hyperbolic Cosine is: {0}", hyperCosine)

hyperCosine = Math.Cosh(0.0)
Console.WriteLine("Hyperbolic Cosine is: {0}", hyperCosine)
```

In the above code, we find the hyperbolic cosine of the specified angle values and then printed them on the console screen.