中科新闻网真彩中性笔0.2:有没有人知道VB 里sin cos 的反函数命令怎么样的？？？
来源：百度文库 编辑：中科新闻网 时间：2024/05/09 03:31:33
有没有人知道VB 里sin cos 的反函数命令怎么样的？？？
Inverse Sine
（反正弦）
Arcsin(X) = Atn(X / Sqr(-X * X + 1))
Inverse Cosine
（反余弦）
Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)
public function Arcsin(X as double) as double
on error resume next
Arcsin = Atn(X / Sqr(-X * X + 1))
end function
public function Arccos(X as double) as double
on error resume next
Arccos = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)
end function