VB如何绘制Sin和cos曲线
来源:学生作业帮 编辑:百度作业网作业帮 分类:综合作业 时间:2024/07/16 02:43:52
VB如何绘制Sin和cos曲线
![](http://img.wesiedu.com/upload/9/f7/9f775b5a305bf821c5a944f3840e64c7.jpg)
![](http://img.wesiedu.com/upload/c/e0/ce090567d1183882d91799098f458513.jpg)
上面的空如何填写,
![](http://img.wesiedu.com/upload/9/f7/9f775b5a305bf821c5a944f3840e64c7.jpg)
![](http://img.wesiedu.com/upload/c/e0/ce090567d1183882d91799098f458513.jpg)
上面的空如何填写,
![VB如何绘制Sin和cos曲线](/uploads/image/z/19367360-8-0.jpg?t=VB%E5%A6%82%E4%BD%95%E7%BB%98%E5%88%B6Sin%E5%92%8Ccos%E6%9B%B2%E7%BA%BF)
代码如下:
Private Sub Command1_Click()
Dim x1 As Single, y1 As Single
Dim x2 As Single, y2 As Single
Const pai = 3.14
Scale (-4, 3)-(10, -5) '----(9)
For x1 = -pai To pai * 2 Step 0.03
y1 = Sin(x1)
x2 = x1 + pai
y2 = Cos(x2) '---(10)
Line (x1, y1)-(x2, y2) '---(11)
Next
End Sub
效果图:
![](http://img.wesiedu.com/upload/7/be/7be27092ac78d3a8aeba91d8b1d45144.jpg)
Private Sub Command1_Click()
Dim x1 As Single, y1 As Single
Dim x2 As Single, y2 As Single
Const pai = 3.14
Scale (-4, 3)-(10, -5) '----(9)
For x1 = -pai To pai * 2 Step 0.03
y1 = Sin(x1)
x2 = x1 + pai
y2 = Cos(x2) '---(10)
Line (x1, y1)-(x2, y2) '---(11)
Next
End Sub
效果图:
![](http://img.wesiedu.com/upload/7/be/7be27092ac78d3a8aeba91d8b1d45144.jpg)
在Matlab中,如何绘制sin(x)和cos(x)二条曲线
用Excel绘制出sin(x)、cos(x)函数曲线.
VB里如何做个可以计算sin和cos的计算器? 求代码
用VB绘制正弦动画曲线
mathematica 绘制曲线 y = 638.3 -22.09 *cos(x*0.4916) -27.57*sin(
如何使用mathematica同时绘制出曲线和散点?
proe如何绘制空间曲线
用MATLAB编写代码:绘制y1=sin(2x)和y2=cos(2x)在区间[0,4*pi]的曲线,用加号标出两条曲线的
绘制x=sin(x),y=cos(x),z=t在[0,6pi]上的三维曲线
几何画板上如何绘制|sin(x)|/cos(x)的图像?
VB 一张图中绘制多条实时曲线
已知tan ,如何求sin 和cos