反走样

Protected Overrides Sub OnPaint(ByVal text-blue-400">e As System.Windows.Forms.PaintEventArgs)
     Dim g As Graphics = text-blue-400">e.Graphics
     '放大8倍
     g.ScaleTransform(8,8)
     '绘制没有反走样效果的图形和文字
     Draw(g)
     '设置反走样
     g.SmoothingMode = SmoothingMode.AntiAlias
     '向右平移40,绘制有反走样效果的图形和文字
     g.Translate Transform(40,0)
     Draw(g)
End Sub
Private Sub Draw(ByVal g As Graphics)
     '绘一条直线段、一个椭圆和一字符串
     g.DrawLine(Pens.Gray, 10, 10,40,20)
     g.DrawEllipse(Pens.Gray, 20, 20, 30,10)
     Dim s As String="反走样测试"
     Dim font As New Font("宋体",5)
     Dim brush As New SolidBrush(Color.Gray)
     g.DrawString(s, font, brush, 10,40)
End Sub

protected override void OnPaint(PaintEventArgs e)
{
     Graphics g= e.Graphics;
     //放大8倍
     g.ScaleTransform(8,8);
     //绘制没有反走样效果的图形和文字
     Draw(g);
     //设置反走样
     g.SmoothingMode = SmoothingMode.AntiAlias;
     //向右平移40,绘制有反走样效果的图形和文字
     g. Translate Transform(40,0);
     Draw(g);"
}
private void Draw(Graphics g)
{
     //绘一条直线段、一个椭圆和一字符串
     g.DrawLine(Pens.Gray, 10, 10,40,20);
     g.DrawElipse(Pens.Gray, 20, 20,30,10);
     string s="反走样测试";
     Font font=new Font("宋体",5);
     SolidBrush brush=new SolidBrush(Color.Gray);
     g.DrawString(s,font, brush, 10,40);
}