VB.Net Programs

VB.Net program to find the hyperbolic sine of the specified angle

By Nidhi Last Updated : November 14, 2024

Finding the hyperbolic sine of the specified angle

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

VB.Net code to find the hyperbolic sine of the specified angle

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

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

Module Module1

    Sub Main()
        Dim hyperSine As Double = 0

        hyperSine = Math.Sinh(2)
        Console.WriteLine("Hyperbolic Sine is: {0}", hyperSine)

        hyperSine = Math.Sinh(0.3584)
        Console.WriteLine("Hyperbolic Sine is: {0}", hyperSine)

        hyperSine = Math.Sinh(0.0)
        Console.WriteLine("Hyperbolic Sine is: {0}", hyperSine)
    End Sub
    
End Module

Output:

Hyperbolic Sine is: 3.62686040784702
Hyperbolic Sine is: 0.366122209742843
Hyperbolic Sine is: 0
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 hyperSine initialized with 0.

hyperSine = Math.Sinh(2)
Console.WriteLine("Hyperbolic Sine is: {0}", hyperSine)

hyperSine = Math.Sinh(0.3584)
Console.WriteLine("Hyperbolic Sine is: {0}", hyperSine)

hyperSine = Math.Sinh(0.0)
Console.WriteLine("Hyperbolic Sine is: {0}", hyperSine)

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