绘制之前,将背景设置为白色:
Dim p As WinForm.Painter = e.Form.Controls("Painter1")Dim g As Graphics = p.Graphicsg.Clear(Color.White)g.DrawArc(Pens.Red, 0, 0, 30, 40, 0, 135)g.DrawEllipse(Pens.Blue, 20, 20, 90, 45)p.Repaint() '显示绘制好的图片p.Save("c:\data\abc.jpg")