13-03-17, 12:46 PM
السلام عليكم ورحمة الله وبركاته
هذا الكود لتحويل الدرجات الى الرديان
ويستعمل هكذا
و هذا يقوم بالعكس
يمكن استعماله لحساب الزوايا
هذا الكود لتحويل الدرجات الى الرديان
كود :
Private Function DegreesToRadians(ByVal degrees As Double) As Double
Return degrees / (180 / Math.PI)
End Function
ويستعمل هكذا
كود :
(150)DegreesToRadians
و هذا يقوم بالعكس
كود :
Private Function RadiansToDegrees(ByVal radians As Double) As Double
Return radians * (180 / Math.PI)
End Function
يمكن استعماله لحساب الزوايا