@H_404_0@这一篇文章探讨如何解决窗口重绘的问题。再次注意，本教程都是按照我个人的理解来讲解，如有不对的地方，恳请不吝指出。

@H_404_0@之前我们说了，Paint的时候就会重新绘制，那么我们把绘制代码放到Paint里面就可以了

@H_404_0@但是实际上，我们有些操作是在其他时候完成的。比如按下按钮画一个正方形。

@H_404_0@
我目前想的方法是，建立2个窗体级变量，一个保存Graphics，一个保存Bmp
无论怎么绘制图片，实际上都存在Bmp了
重绘的时候，再把这个Bmp绘制出来。

@H_404_0@不过重绘随时都在发生，对性能有影响，看怎么取舍吧。

    Dim g As Graphics
    Dim bmp As Bitmap

    Private Sub Form6_Load(sender As Object,e As EventArgs) Handles MyBase.Load
        bmp = New Bitmap(Me.Width,Me.Height)
        g = Graphics.FromImage(bmp)
        g.FillRectangle(New SolidBrush(Color.Red),New Rectangle(20,20,100,100))
    End Sub

    Private Sub btnDraw_Click(sender As Object,e As EventArgs) Handles btnDraw.Click
        g.FillRectangle(New SolidBrush(Color.Green),New Rectangle(140,100))
        g.FillRectangle(New SolidBrush(Color.Blue),New Rectangle(260,100))
    End Sub

    Private Sub Form6_Paint(sender As Object,e As PaintEventArgs) Handles Me.Paint
        Dim g1 As Graphics = Me.CreateGraphics
        g1.DrawImage(bmp,New Point(0,0))
    End Sub

@H_404_0@Load时的红色正方形，按下按钮后的两个正方形，即使最小化也不怕消失了。

@H_404_0@

@H_404_0@由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。

@H_404_0@学习更多vb.net知识，请参看 vb.net 教程 目录