VB内部函数sin(x),x的单位是弧度。