Trig help...

[eleet-2k2]

Can someone please help me with this VB code?

Here's my dilemma. I need to now convert my radian angle to degrees before I can use it in the primary trig ratio sin(angle) = opp/hyp.

code:


Public Function SineSolveOpp(ByVal theta As Double, ByVal hyp As Double) As Double

Dim RadTheta As Double, opp As Double, DegTheta As Double



'converts your angle (theta) to radians (RadTheta)

RadTheta = theta * DegToRadAngleX



'converts the angle from radians to degrees

DegTheta = (CDbl(Sin(RadTheta)))



' ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

'here is my problem.  how do i convert my radian angle to a degree angle?



End Function

Thanks a lot for taking your time to help me.

[edit]I tried lots of source code sites but to no avail. Even www.planetsourcecode.com didnt have exactly what I needed.[/edit]

[Trigear]

divide radian value by pi and multiply by 180.

[eleet-2k2]

Thanks for the help TriGEAR. Over the course of the afternoon in ******* I fixed my problem.