Sin- Aufruf in selbsterstellter Funktion
04.10.2003 08:29:38
Werner Hassold
ich möchte die Sin- ArcTan- und Wurzel-Funktion in einer selbsterstellten Funktion aufrufen, leider bekomme ich immer eine Fehlermeldung:
SIN- bzw. ArcTan- bzw Wurzel-Funktion nicht definiert.
Hier mein Quelltext:
Funktion Winkel_aus_Cos(CosX as Single)
Dim AK as Single, GK as Single, Hy as Single
AK = 1
Hy = AK/CosX
GK = Wurzel((Hy*Hy-AK*Ak)
TanX = GK/AK
Winkel_aus_Cos = ArcTan(TanX)*180/Pi
End Funktion
Würde mich freuen wenn mir Jemand helfen kann.
Gruß Werner