VB如何绘制Sin和cos曲线上面的空如何填写,

来源:学生作业帮助网 编辑:作业帮 时间:2024/07/17 23:58:29
VB如何绘制Sin和cos曲线上面的空如何填写,
xU[kA+RIug&MIDZdwFM}SD$U惔˟i|/8&4i<̜3sΙ3dLJ{7/:_+ayL֗Ͻ'^n>~ɶu}<~PTMoŰQupZqLԥZ\j&%Csw{jsx`9^V( r C@25>DrjMR.6ʈe$0[bBŗD[mq%$pJ,qf( |f@#T`pig|- HF2(AWΚXZGp6,$ + ,P@(F )K3ǧ,+v?t>8~fxWHbʄrhr=ԫ _o62 bڳFպ]Ȕ'Y8r9V&&2̄R6$W(I )y: yrbW0=ˆ9M2 ~mط9׆#Z%N ql9NsmtXL/S^j3 /åN y~IL_VrdgW?T)KVsڹҧd(ͱψG_an` Q73'bFXjI%RȉPC+@@5%G&2Z:(}

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