主题：painter图片保存

我在painter画图，用p.Save()保存图片，但是保存的图片清晰度很低，有什么办法保存成清晰度高的图片吗？

绘图分辨率设置大一点，不要保存为gif

用g.FillRectangle(Brushes.Red,10,10,100,50)画的，分辨率怎么设置，我保存的是png

请上传实例测试

Dim p As WinForm.Painter = e.Form.Controls("Painter1")
Dim g As Graphics = p.Graphics
Dim br As Brush = Brushes.black
Dim i,i1,x,y As Integer
For i=0 To 41
For i1=0 To 41
x=6*i1+1+2
y=6*i+1+2
g.FillRectangle(Brushes.black ,x,y,3,3)
Next
Next
p.repaint()
p.Save("C:\Users\lance\Desktop\模板.png")

也就这种效果了。狐表毕竟不是专业用来绘图的