VB 画线问题

Private Sub Picture1_Click()
Const PI As Single = 3.1415926
'定义PI，就是圆周率
Picture1.ScaleMode = 3
'图片框的绘图单位
Picture1.Scale (-2 * PI, 2)-(2 * PI, -2)‘为什么要乘个3.1415926啊。
'数学老师说的，画圆不用圆周率怎么画？
'1+1为什么等于2，我也不知道，反正要
Picture1.ForeColor = RGB(255, 255, 0)
'设置前景色，就是要画的颜色，RGB（R，G，B）是颜色函数，R是红，G是绿，B是蓝
'不同的组合可以得到不同的颜色，也就是说一个点里面有多少红，多少绿，多少蓝
Picture1.DrawWidth = 3
'画线模式，具体看属性栏，里面有说明
Picture1.Line (0, -2)-(0, 2)
'画一条线，从(0, -2)到(0, 2)
Picture1.Line (-2 * PI, 0)-(2 * PI, 0) '绘制X轴和Y轴
'画线，同上
Picture1.DrawWidth = 8
'改变画线模式
Picture1.PSet (0, 0), RGB(0, 0, 255) '绘制圆点，蓝色
'画点，在0，0点，RGB(0, 0, 255)也就是纯蓝色
End Sub

Picture1.Scale (-2 * PI, 2)-(2 * PI, -2)就是将picture1的等分为长为2∏，宽为的4的坐标系，而且本例中，你的划分结构对称，所以原点的其几何中心！这样，能画出来的函数的定义域为-2pi~2pi，值域为-2~2.

呵呵,你不要被那个pi迷惑是,乘一个PI对与scale方法来说没什么意义啊.不乘一样可以自定义坐标系统啊
你把上面的PI全去掉,结果你自己看...呵呵