Imports System          

'Imports Microsoft.VisualBasic

Imports System.Math

​

Public Module Module1

    Public Sub Main()

        Dim decInput as Decimal

        Dim decSinNo as Decimal

        Dim decSinNoRounded as Decimal

        Console.WriteLine("Enter a number.")

        decInput = Console.ReadLine()

        decSinNO = Sin(decInput)

        decSinNoRounded = Round(decSinNo,2)

        Console.WriteLine("The RoundedSine of your number is: " & decSinNoRounded )

    End Sub

End Module