My guess is that VBs functions are in radian mode, and you are entering degrees. I'm not sure how to fix it, unless you want to enter radians instead of degrees.