vb.net反三角函數(shù) vb中三角函數(shù)如何編程

有誰(shuí)知道VB編程中運(yùn)算sin、cos、tan、cot的程序怎么寫(xiě)？

sin(角度值）同理cos,tan

創(chuàng)新互聯(lián)建站從2013年成立，先為王益等服務(wù)建站，王益等地企業(yè)，進(jìn)行企業(yè)商務(wù)咨詢(xún)服務(wù)。為王益企業(yè)網(wǎng)站制作PC+手機(jī)+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問(wèn)題。

Atn()是VB反正切函數(shù)，VB不提供其他反三角函數(shù)，不過(guò)可以用下列公式導(dǎo)出：

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))

以上這些公式，其實(shí)就是應(yīng)用了數(shù)學(xué)中的各類(lèi)三角函數(shù)和正切函數(shù)之間的關(guān)系導(dǎo)出的。其中需要注意的是其中的 X 不能等于正負(fù)1。（引用-_-）

x都是弧度制

在vb中。如何進(jìn)行三角函數(shù)的程序代碼編寫(xiě)

有幾個(gè)地方要注意：

1、VB中的三角函數(shù)的角度全部是用弧度制表示的，如果是度數(shù)的話(huà)，應(yīng)先乘以180再除以π轉(zhuǎn)成弧度，再用函數(shù)計(jì)算結(jié)果。

2、VB中直接支持的三角函數(shù)有：Sin()、Cos()、Tan()，如果涉及到其它三角函數(shù)，可以從下面列出的代碼中自己選擇相應(yīng)的函數(shù)：

Function

Sec(X)

As

Double

'正割

Sec

=

1

/

Cos(Angle)

End

Function

Function

Csc(X)

As

Double

'余割

Csc

=

1

/

Sin(Angle)

End

Function

Function

Cot(X)

As

Double

'余切

Cot

=

1

/

Tan(Angle)

End

Function

Function

ArcSin(X)

As

Double

'反正弦

ArcSin

=

Atn(X

/

Sqr(-X

*

X

+

1))

End

Function

Function

ArcCos(X)

As

Double

'反余弦

ArcCos

=

Atn(-X

/

Sqr(-X

*

X

+

1))

+

2

*

Atn(1)

End

Function

Function

ArcSec(X)

As

Double

'反正割

ArcSec

=

Atn(X

/

Sqr(X

*

X

-

1))

+

Sgn((X)

-

1)

*

(2

*

Atn(1))

End

Function

Function

ArcCsc(X)

As

Double

'反余割

ArcCsc

=

Atn(X

/

Sqr(X

*

X

-

1))

+

(Sgn(X)

-

1)

*

(2

*

Atn(1))

End

Function

Function

ArcCot(X)

As

Double

'反余切

ArcCot

=

Atn(X)

+

2

*

Atn(1)

End

Function

Function

HSin(X)

As

Double

'雙曲正弦

HSin

=

(Exp(X)

-

Exp(-X))

/

2

End

Function

Function

HCos(X)

As

Double

'雙曲余弦

HCos

=

(Exp(X)

+

Exp(-X))

/

2

End

Function

Function

HTan(X)

As

Double

'雙曲正切

HTan

=

(Exp(X)

-

Exp(-X))

/

(Exp(X)

+

Exp(-X))

End

Function

Function

HSec(X)

As

Double

'雙曲正割

HSec

=

2

/

(Exp(X)

+

Exp(-X))

End

Function

Function

HCsc(X)

As

Double

'雙曲余割

HCsc

=

2

/

(Exp(X)

-

Exp(-X))

End

Function

Function

HCot(X)

As

Double

'雙曲余切

HCot

=

(Exp(X)

+

Exp(-X))

/

(Exp(X)

-

Exp(-X))

End

Function

Function

HArcsin(X)

As

Double

'反雙曲正弦

HArcsin

=

Log(X

+

Sqr(X

*

X

+

1))

End

Function

Function

HArccos(X)

As

Double

'反雙曲余弦

HArccos

=

Log(X

+

Sqr(X

*

X

-

1))

End

Function

Function

HArctan(X)

As

Double

'反雙曲正切

HArctan

=

Log((1

+

X)

/

(1

-

X))

/

2

End

Function

Function

HArcsec(X)

As

Double

'反雙曲正割

HArcsec

=

Log((Sqr(-X

*

X

+

1)

+

1)

/

X)

End

Function

Function

HArccsc(X)

As

Double

'反雙曲余割

HArccsc

=

Log((Sgn(X)

*

Sqr(X

*

X

+

1)

+

1)

/

X)

End

Function

Function

HArccot(X)

As

Double

'反雙曲余切

HArccot

=

Log((X

+

1)

/

(X

-

1))

/

2

End

Function

vb中反三角函數(shù)的用法（在線(xiàn)等急）

VB

只有

Atn

這個(gè)反三角函數(shù)(即

ArcTan。三角函數(shù)有:Cos,Sin,Tan)。不過(guò)可以用公式求寫(xiě)出另外兩個(gè)反三角函數(shù)。

Cos(弧度)

Sin(弧度)

Tan(弧度）

Atn(值)'結(jié)果為弧度

VB里怎么用反三角函數(shù)請(qǐng)?jiān)敿?xì)點(diǎn)

Atn()是VB反正切函數(shù),VB不提供其他反三角函數(shù),不過(guò)可以用下列公式導(dǎo)出：ArcTan(X) = Atn(X)Arcsin(X) = Atn(X / Sqr(-X * X + 1))Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)

網(wǎng)頁(yè)標(biāo)題：vb.net反三角函數(shù) vb中三角函數(shù)如何編程
分享鏈接：http://www.muchs.cn/article44/doocjee.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供云服務(wù)器、網(wǎng)站維護(hù)、Google、App設(shè)計(jì)、網(wǎng)站導(dǎo)航、網(wǎng)頁(yè)設(shè)計(jì)公司

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶(hù)投稿、用戶(hù)轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話(huà)：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)