这样定义为什么不对?

Question

麻烦各位高手写得清楚些从定义函数开始只需要Arccos就可以了我知道推导式Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)但该怎么定义?Private Function Arccos(X As Integer) As IntegerArccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)End Function

Answer 1

改成
Private Function Arccos(X As Double) As Double
用整数怎么算三角函数啊，要用double的

Answer 2

Private Function Arccos(X As Double) As Double
Arccos = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)
End Function

Private Function Arccos(X As Integer) As Integer
Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)
End Function
函数里面Arccos(X) 改成Arccos
还要注意可能出现的除0错误