Sin Function

Geeft de sinus van een hoek terug. De hoek wordt gespecificeerd in radialen. Het resultaat ligt tussen -1 en 1.

Using the angle Alpha, the Sin function returns the ratio of the length of the opposite side of an angle to the length of the hypotenuse in a right-angled triangle.

Sin(Alpha) = side opposite the angle/hypotenuse

Syntaxis:


Sin (Number As Double) As Double

Geretourneerde waarde:

Dubbel

Parameters:

Getal: Numerieke expressie die de hoek in radialen definieert, waaruit de sinus berekend moet worden.

To convert degrees to radians, multiply degrees by Pi/180, and to convert radians to degrees, multiply radians by 180/Pi.

degrees=(radians*180)/Pi

radians=(degrees*Pi)/180

Pi is approximately 3.141593.

Foutcodes:

5 Ongeldige aanroep van procedure

Voorbeeld:


' In dit voorbeeld is de volgende invoer mogelijk voor een rechthoekige driehoek:
' De overstaande zijde van de hoek en de hoek (in graden) om de lengte van de hypotenusa te berekenen:
Sub ExampleSine
' Pi = 3,1415926 is een voorgedefinieerde variabele
Dim d1 As Double
Dim dAlpha As Double
    d1 = InputBox("Voer de lengte van de overstaande zijde in: ","Overstaande zijde")
    dAlfa = InputBox("Voer de hoek Alfa (in graden) in: ","Alfa")
    Print "De lengte van de hypotenusa is"; (d1 / Sin (dAlfa * Pi / 180))
End Sub