Author Topic: Converts degree angles to radian and vice-versa  (Read 680 times)

0 Members and 1 Guest are viewing this topic.

Offline Patriiick

  • Administrator
  • *****
  • Posts: 130
  • Karma: +1/-0
  • Gender: Male
    • prefered language: VB
    • Prog expertise: Good
    • View Profile
  • Twitter: @Patriiick
Converts degree angles to radian and vice-versa
« on: November 19, 2010, 10:15:24 AM »
Code: [Select]

    Function myConvertDegreeRadian(ByVal DegreeAngle As Double) As Double
        Return DegreeAngle / 180.0# * Math.PI
    End Function


    Function myConvertRadianDegree(ByVal RadianAngle As Double) As Double
        Return RadianAngle * 180.0# / Math.PI
    End Function

target audience:{beginner}
« Last Edit: November 21, 2010, 05:44:07 PM by Patriiick »