关于vb的pset函数画曲线问题
PrivateSubCommand1_Click()Scale(0,1)-(360,-1)Forx=0To360y=0.8*Sin(x*3.141592653/180)P...
Private Sub Command1_Click()
Scale (0, 1)-(360, -1)
For x = 0 To 360
y = 0.8 * Sin(x * 3.141592653 / 180)
PSet (x, y), vbRed
Next x
End Sub
这串代码只需放一个按钮就能看到效果了。（可以直接复制看下）
不明白里代码中的0.8是什么意思，0.8的值改成越接近1的数，曲线去变得约平缓。有哥哥姐姐能解释下吗？ 0.8是数学中函数的一个变量还是曲线固定的值？ ...额`` 比较苯`麻烦具体点！小弟不胜感激！ 展开
Scale (0, 1)-(360, -1)
For x = 0 To 360
y = 0.8 * Sin(x * 3.141592653 / 180)
PSet (x, y), vbRed
Next x
End Sub
这串代码只需放一个按钮就能看到效果了。（可以直接复制看下）
不明白里代码中的0.8是什么意思，0.8的值改成越接近1的数，曲线去变得约平缓。有哥哥姐姐能解释下吗？ 0.8是数学中函数的一个变量还是曲线固定的值？ ...额`` 比较苯`麻烦具体点！小弟不胜感激！ 展开
2个回答
展开全部
有一点你说错了，应该是0.8这个数值越小，曲线越平缓，但是超过1，曲线将超过窗口的范围。
其实这里面没有什么奥秘，全在sin函数上。sin函数的最大值是1、最小值是-1，前面乘的数越小，显然最大值和最小值越小，曲线也就越平缓，这个值和数学无关，只是控制画曲线的样子。
其实这里面没有什么奥秘，全在sin函数上。sin函数的最大值是1、最小值是-1，前面乘的数越小，显然最大值和最小值越小，曲线也就越平缓，这个值和数学无关，只是控制画曲线的样子。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
