MyGraphics = PictureBox1.CreateGraphics
'2 , 定义一个Pen对象,用于绘制图形(轮廓线)
Dim MyPen As New Pen(Color.Black, 1)
'3,定义一个Brush对象,用于填充图形(如果需要填充的话)
Dim MyBrush As New SolidBrush(Color.Orange)
'声明横向和纵向比例变量
Dim Heng As Integer = 20
Dim Zong As Integer = 50
'先获得正弦值,保存到点坐标数组
Dim MyPoints(700) As Point
Dim i As Integer
For i = 0 To 700
MyPoints(i) = New Point(i * Heng, 200 + Sin(i) * Zong)
Next
'采用绘制光滑线连接点的方式绘制曲线
MyGraphics.DrawCurve(MyPen, MyPoints)
End Sub
End Class
显示的效果图:
vb.net三角函数的介绍就聊到这里吧 , 感谢你花时间阅读本站内容,更多关于vb三角函数计算程序界面、vb.net三角函数的信息别忘了在本站进行查找喔 。
推荐阅读
- oracle查询快照,oracle查询快照sql
- 电视盒子能看什么直播,电视盒子能看什么直播软件
- erp系统合同信息录入,erp系统合同信息录入流程图
- jquery元素内部追加,jquery元素后追加元素
- mysql事务怎么看 mysql查看事件任务
- 苹果ios14.4断触,ios1441断触
- 微信小程序商城自作,微信小程序商城可以自己做吗
- 字符串自定义函数c语言 c语言自定义字符串连接函数
- 金刚模拟器破解版安卓,金刚模拟器视频