none
Sinus richtig berechnen RRS feed

  • Frage

  • Hallo alle zusammen,

    in meinem aktuellen Programm muss ich mit Winkelfunktionen rechnen.
    Im aktuellen Beispiel sin von 57°. Mein Taschenrechner spuckt dazu  0,838671 aus.

    Gebe ich diesen Wert als Sinus wieder in den Taschenrechner gibt er mir 57° als dazugehörigen Winkel aus und da kommt schon mal Freude auf.

    Dim ALPHA As Integer = CInt(Me.TB_Winkel_Kurs.Text)         
    Dim BETA As Integer = CInt(Me.TB_Winkel_Strom.Text)        
    Dim GAMMA As Double = BETA - ALPHA
    Label5.Text = CStr(GAMMA) & " Grad"
    Dim Sin_Winkel_FüG As Double = Math.Sin(GAMMA)
    Label6.Text = CStr(Sin_Winkel_FüG)

    Mein relevanter Code sieht wie oben aus. So habe ich als Winkel ALPHA z.B. 33° und BETA = 90°. GAMMA wird korrekt mit 57° berechnet und im Programm angezeigt.

    Dim Sin_Winkel_FüG As Double = Math.Sin(GAMMA)

    Liefert mir allerdigs 0,4361647

    Kann mir jemand sagen, was ich falsch mache?


    Liebe Grüße Stefan | Cheers Stefan I'm using VB 2008 and VB 2010 Express Be a good forum member - mark posts that contain the answers to your questions or those that are helpful. c# in vb Translator: http://www.developerfusion.com/tools/convert/csharp-to-vb/

    Sonntag, 17. März 2013 23:18

Antworten

  • Hi,

    hast Du die Winkel in Radians umgerechnet? Math.WinkelFunktion erwartet rad. Umrechnung: von deg in rad

    DegWinkel * Math.PI / 180.0

    Viele Grüße,

      Thorsten

    • Als Antwort markiert Giftzwockel Montag, 18. März 2013 09:52
    Montag, 18. März 2013 02:25

Alle Antworten

  • Hi,

    hast Du die Winkel in Radians umgerechnet? Math.WinkelFunktion erwartet rad. Umrechnung: von deg in rad

    DegWinkel * Math.PI / 180.0

    Viele Grüße,

      Thorsten

    • Als Antwort markiert Giftzwockel Montag, 18. März 2013 09:52
    Montag, 18. März 2013 02:25
  • Hallo Thorsten,

    nein, das hatte ich nicht.
    Jetzt stimmt auch mein Ergnis.

    Danke.


    Liebe Grüße Stefan | Cheers Stefan I'm using VB 2008 and VB 2010 Express Be a good forum member - mark posts that contain the answers to your questions or those that are helpful. c# in vb Translator: http://www.developerfusion.com/tools/convert/csharp-to-vb/

    Montag, 18. März 2013 09:52