Sin-functie
Geeft de sinus van een hoek terug. De hoek wordt gespecificeerd in radialen. Het resultaat ligt tussen -1 en 1.
Met behulp van de hoek Alfa, geeft de Sin-functie de verhouding van de lengte van de overstaande zijde van een hoek met de lengte van de hypotenusa in een rechthoekige driehoek.
Sin(Alfa) = overstaande zijde van de hoek/hypotenusa
Syntaxis:
Sin (Getal)
Teruggegeven waarde:
Double
Parameters:
Getal: Numerieke expressie die de hoek in radialen definieert, waaruit de sinus berekend moet worden.
Om graden naar radialen om te zetten vermenigvuldigt u graden met Pi / 180. Om radialen naar graden om te zetten vermenigvuldigt u radialen met 180 / Pi.
graad=(radiaal*180)/pi
radiaal=(graad*pi)/180
Pi is bij benadering 3,141593.
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