版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。

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

 

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

 

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

 

 

我目前想的方法是，建立2个窗体级变量，一个保存Graphics，一个保存Bmp

无论怎么绘制图片，实际上都存在Bmp了

重绘的时候，再把这个Bmp绘制出来。

 

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

 

    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, 20, 100, 100))

        g.FillRectangle(New SolidBrush(Color.Blue), New Rectangle(260, 20, 100, 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

 

 

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

 

 

 

 

 

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

 

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

 

 

————————————————

版权声明：本文为CSDN博主「VB.Net」的原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。

原文链接：https://blog.csdn.net/uruseibest/article/details/68191376