如何计算a=2arctg(h/2f)在VB中

[VS12340]

在VB中，arctg是哪一个函数呢，我用atn()计算出来发现在跟实际出入很大。
dim a as double 定义了一个双精度数值。
f值是在文本框中输入的。h值是已知的。
现在问题是在VB中用什么方法，可以表达这样的公式呢。
我这样写：a=2*atn(h/2f)对不对呢。如果是对的。可是计算出来的值，跟实际相差太大了。

[truewill]

好啦，是时候看看自己的数学学得如何了
atn = arctan()
arcctg是可以转换成用arctan表示的

[truewill]

导出的数学函数


以下为非基本数学函数的列表，皆可由基本数学函数导出：

函数 由基本函数导出之公式
Secant（正割） Sec(X) = 1 / Cos(X)
Cosecant（余割） Cosec(X) = 1 / Sin(X)
Cotangent（余切） Cotan(X) = 1 / Tan(X)
Inverse Sine
（反正弦）
Arcsin(X) = Atn(X / Sqr(-X * X + 1))
Inverse Cosine
（反余弦）
Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)
Inverse Secant
（反正割）
Arcsec(X) = Atn(X / Sqr(X * X - 1)) + Sgn((X) - 1) * (2 * Atn(1))
Inverse Cosecant
（反余割）
Arccosec(X) = Atn(X / Sqr(X * X - 1)) + (Sgn(X) - 1) * (2 * Atn(1))
Inverse Cotangent
（反余切）
Arccotan(X) = Atn(X) + 2 * Atn(1)
Hyperbolic Sine
（双曲正弦）
HSin(X) = (Exp(X) - Exp(-X)) / 2
Hyperbolic Cosine
（双曲余弦）
HCos(X) = (Exp(X) + Exp(-X)) / 2
Hyperbolic Tangent
（双曲正切）
HTan(X) = (Exp(X) - Exp(-X)) / (Exp(X) + Exp(-X))
Hyperbolic Secant
（双曲正割）
HSec(X) = 2 / (Exp(X) + Exp(-X))
Hyperbolic Cosecant（双曲余割） HCosec(X) = 2 / (Exp(X) - Exp(-X))
Hyperbolic Cotangent（双曲余切） HCotan(X) = (Exp(X) + Exp(-X)) / (Exp(X) - Exp(-X))
Inverse Hyperbolic Sine（反双曲正弦） HArcsin(X) = Log(X + Sqr(X * X + 1))
Inverse Hyperbolic Cosine（反双曲余弦） HArccos(X) = Log(X + Sqr(X * X - 1))
Inverse Hyperbolic Tangent（反双曲正切） HArctan(X) = Log((1 + X) / (1 - X)) / 2
Inverse Hyperbolic Secant（反双曲正割） HArcsec(X) = Log((Sqr(-X * X + 1) + 1) / X)
Inverse Hyperbolic Cosecant HArccosec(X) = Log((Sgn(X) * Sqr(X * X + 1) + 1) / X)
Inverse Hyperbolic Cotangent
（反双曲余切）
HArccotan(X) = Log((X + 1) / (X - 1)) / 2
以 N 为底的对数 LogN(X) = Log(X) / Log(N)

[VS12340]

初中学的那点数学早就忘光了。还是专家多啊。那我的公式，是哪一个呀。

[truewill]

注意返回值是弧度……

[VS12340]

arctg是一个反正切函数

[VS12340]

Arcsin(X) = Atn(X / Sqr(-X * X + 1))
我用这个表达式，试了一下，可是通不过，提示错误的参数。原因是sqr(）不能接收一个负数。

[guyehanxinlei]

这数学还真的记得不多了,呵呵,顶一下!

[truewill]

-_-|||
看来VS12340()的数学真是不太好
sin的值范围是[-1,1]，你扔个2进去，不死才怪