锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net三角函数 vb三角函数计算程序界面

IT技术引导

vb.net中有没有类似max（）这样的函数首先vb.net是一种编程语言，它自己是没有的 。
但vb.net与c#、vc++.net等其它编程语言共用一个公共类库（叫框架类库），这个类库在命名空间System中提供了一个类叫Math（Public NotInheritable Class Math） 。它为三角函数、对数函数和其他通用数学函数提供了常数和静态方法，其中就包括Max 。
在visual studio中编写VB程序时sin cos为何不识别，如何才能输入三角函数？vb.net提供了许多命名空间，三角函数在 System.Math 命名里：
在代码窗口的最上面添加如下代码：
Imports System.Math
见下图：
在vb中 。如何进行三角函数的程序代码编写有几个地方要注意vb.net三角函数：
1、VB中vb.net三角函数的三角函数的角度全部是用弧度制表示的vb.net三角函数 ， 如果是度数的话vb.net三角函数 ， 应先乘以180再除以π转成弧度vb.net三角函数，再用函数计算结果 。
2、VB中直接支持的三角函数有：Sin()、Cos()、Tan()，如果涉及到其它三角函数 ， 可以从下面列出的代码中自己选择相应的函数：
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
【vb.net三角函数 vb三角函数计算程序界面】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)
-

推荐阅读


上一篇：电视盒子能看什么直播，电视盒子能看什么直播软件

下一篇：oracle查询快照，oracle查询快照sql