【菜鸟求助】用VB2010绘制函数图象

如何实现..

GDI

GDI+

Dim g As Graphics
g = PictureBox1.CreateGraphics
g.FillEllipse(Brushes.Red, x, y, 1, 1)

画点：
Using redBrush As New SolidBrush(Color.Black), _
fGraphics As Graphics = PictureBox1.CreateGraphics()
fGraphics.FillEllipse(redBrush, New Rectangle(1, 1, 3, 3))'绝对不能写1,1,1,1用放大镜才可以看到（屏幕较大的看得到吧）
End Using
一般绘图都是直线的：
Using redBrush As New SolidBrush(Color.Black), _
fGraphics As Graphics = PictureBox1.CreateGraphics()
Dim p As PointF() = {New PointF(1, 1), New PointF(10, 20), New PointF(10, 20), New PointF(30, 30)}‘//两个线段：1{x=(1,1)y=(10,20)}2{x=(10,20)y=(30,30)}
fGraphics.DrawLines(Pens.Black, p)
End Using

或者你用paint事件（只适用于初始化窗体）：
Private Sub PictureBox1_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles PictureBox1.Paint
e.Graphics.DrawLine(Pens.Black, x1sin, y1sin, x2sin, y2sin)//画线，参数可以是sin，上面的好像也可以是sin
End Sub