well for the question

VB Code:
  1. function toRad(Deg as integer) as single
  2.   const Pi = 3.14
  3.   toRad = Deg*Pi/180
  4. end function

Alright I hope that works...