作业帮 > 综合 > 作业

VB如何绘制Sin和cos曲线

来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/11/17 19:28:56
VB如何绘制Sin和cos曲线



上面的空如何填写,
VB如何绘制Sin和cos曲线
代码如下:
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
 效果图: