vb.net 教程 5-10 Graphics类 4

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

之前我们说了，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 教程 目录