PictureBox的size为(356, 246),BorderStyle为Fixed3D,经测试border的宽度为3,为了使得绘制出来的图像有完整的周期,所以size长宽都多了6。
按tan函数算出的值是正数的话,在一般坐标系中此点在x轴上方,但是在计算机中y轴向下方向是正,向上是负,如果不经处理的话,此点会处于x轴下方,所以会出现绘制出来的图形是正确图像沿y轴的翻转。
如下图1:
图1:不经过处理的tan函数图像
所以要对tan函数计算出的值取负值,则可得到正确tan函数的图像。
如下图2:
图2:经过处理的tan函数图像
代码:
Private Sub DrawTan()
Dim x As Single
Dim y As Single
Dim z As Single
P = New Pen(Color.Red)
For z = -175 To 175 Step 0.01
x = z + 175
y = -Tan(z * 2 * PI / 175) * 10 + 120
g.DrawLine(P, x, y, x + 1, y)
Next z
End Sub