Matematické funkce IV - Stupně a radiány
Funkce:
' Převod stupňů na radiány
Function DegreesToRadians(degrees As Single) As Single
DegreesToRadians = degrees / 57.29578
End Function
' Převod
radiánů na stupně
Function RadiansToDegrees(radians As Single) As Single
RadiansToDegrees = degrees * 57.29578
End Function