VB高手 请帮忙 设计一个程序画出Y=tanX的曲线 谢谢了！
VB高手 请帮忙 设计一个程序画出Y=tanX的曲线 谢谢了！
参考答案:Dim y As Single
Dim x As Single
Const pi = 3.1416
DrawWidth = 2
'步长Step=0.01小一点可以多打些点
For i = 0 To 180 Step 0.01
x = pi * i / 180
y = Tan(x)
Me.PSet (1000 + x * 2000, 4500 + y * 10), RGB(225, 0, 0)
next i
最好不要直接放在formload下