赞 yuanling1012 幼苗
共回答了18个问题采纳率：88.9% 举报
Private Sub Form_Click()'画正弦函数
Dim i As Single
Me.Scale (-6,6)-(6,-6)
Line (-6,0)-(6,0),vbRed
Line (0,-6)-(0,6),vbRed
For i = -6 To 6 Step 0.001
PSet (i,Sin(i))
Next i
End Sub
要画余弦和正切函数,只要把程序中的sin改为cos和tan即可.
Dim i As Single
Me.Scale (-6,6)-(6,-6)
Line (-6,0)-(6,0),vbRed
Line (0,-6)-(0,6),vbRed
For i = -6 To 6 Step 0.001
PSet (i,Sin(i))
Next i
End Sub
要画余弦和正切函数,只要把程序中的sin改为cos和tan即可.
1年前
1
可能相似的问题
-
百度问吧VB中用默认坐标系绘画三角函数时,怎么画出来是横线呢
1年前1个回答
-
1年前1个回答
-
1年前1个回答
-
1年前5个回答
-
1年前2个回答
你能帮帮他们吗