零基础VB教程061期：常用数学函数第一节 弧度/ abs/sin/cos/tan/atn/exp/log等
零基础VB教程061期：常用数学函数第一节 弧度/ abs/sin/cos/tan/atn/exp/log等
刘金玉编程
发布于 2020-03-11 09:37:06
发布于 2020-03-11 09:37:06
https://v.qq.com/x/page/c09303khi7w.html
刘金玉的零基础VB教程061期：
常用数学函数第一节
各种常用数学函数汇总：
- Abs 求绝对值函数
- Sin(x)正弦返回一个double，表示一个以弧度为单位的角
- Cos 余弦
- Tan 正切
- Atn反正切
- Exp反对数， e（自然对数的底）的某次方，常数数e的值大约是2.718282
- Log自然对数，以e为底的对数
- Rnd随机数，返回0到1之间的所有数，包含0，但不包含1 ，需要配合randomize提高随机数不同的概率
科学计数法 9.529752 E-02 就是9.529752*10的-2次方
弧度转角度：弧度*180/pi角度转弧度：角度*PI/180
课堂总结
1、学会使用角度函数，注意返回的是弧度单位的数
2、掌握弧度与角度互转的公式
3、掌握自然对数的求解
4、掌握随机数的范围及用法
本期界面：
本期源代码：
Private Sub Command1_Click()
Dim a As Double
a = Val(Text1.Text)
Text2.Text = Abs(a)
End Sub
Private Sub Command2_Click()
Dim a As Double
a = Val(Text1.Text)
Text2.Text = Sin(a)
End Sub
Private Sub Command3_Click()
Dim a As Double
a = Val(Text1.Text)
Text2.Text = Cos(a)
End Sub
Private Sub Command4_Click()
Dim a As Double
a = Val(Text1.Text)
Text2.Text = Tan(a)
End Sub
Private Sub Command5_Click()
Dim a As Double
a = Val(Text1.Text)
Text2.Text = Atn(a)
End Sub
Private Sub Command6_Click()
Dim a As Double
a = Val(Text1.Text)
Text2.Text = Log(a)
End Sub
Private Sub Command7_Click()
Dim a As Double
a = Val(Text1.Text)
Text2.Text = Exp(a)
End Sub
Private Sub Command8_Click()
Randomize
Text2.Text = Rnd
End Sub本文参与 腾讯云自媒体分享计划，分享自微信公众号。
原始发表：2020-03-09，如有侵权请联系 cloudcommunity@tencent.com 删除
评论
登录后参与评论
推荐阅读