vb画tan函数图像

题目

vb画tan函数图像
If Combo1.Text = "tan" Then
For x = -15 To 15 Step 0.001
y = tan(w * x+fi*pi/180)
Picture1.PSet (x,y),RGB(0,255,0)
Next x
End If
为什么运行之后没有显示呢?
知道啦,是我的Tan的大小写跟之前的不一致了.那fi*pi/180与fi有什么区别没,还有我编cot函数时总是提示数据溢出是怎么回事,If Combo1.Text = "Cot" Then
For x = -15 To 15 Step 0.001
y = 1 / (Tan(w * x))
Picture1.PSet (x,y),RGB(0,255,0)
Next x
End If

答案

答案补充：Cot函数这样修改即可.主要是你没有定义y的类型.至于fi*pi/180与fi有什么区别,那要根据你的fi单位而定.如果你是以角度输入的,那么应该加上＊pi／180,如果本身是以弧度输入的,就直接写fi即可.＝＝＝＝＝＝＝...