加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 百科 > 正文

vb.net 教程 5-10 Graphics类 4

发布时间:2020-12-17 07:34:56 所属栏目:百科 来源:网络整理
导读:这一篇文章探讨如何解决窗口重绘的问题。再次注意,本教程都是按照我个人的理解来讲解,如有不对的地方,恳请不吝指出。 之前我们说了,Paint的时候就会重新绘制,那么我们把绘制代码放到Paint里面就可以了 但是实际上,我们有些操作是在其他时候完成的。比

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

之前我们说了,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,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

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


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

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

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读