VB.NET畫圖是不能設置雙緩沖的,雙緩沖是指窗體,從來沒說是針對控件。
成都網站建設公司更懂你!成都創(chuàng)新互聯(lián)公司只做搜索引擎喜歡的網站!成都網站制作前臺采用搜索引擎認可的DIV+CSS架構,全站HTML靜態(tài),H5建站+CSS3網站,提供:網站建設,微信開發(fā),重慶小程序開發(fā),商城網站建設,重慶APP開發(fā)公司,域名申請,服務器租售,網站代托管運營,微信公眾號代托管運營。
不用graphic.clear清理重畫就不會閃爍。你可以先把容器刪了再重新建立一個再去畫。
簡單舉例:
Graphics g;
Pen p;
Panel pl;
構造函數(shù)初始化:
p=new Pen(Color.Red,2);
pl=panel1;
造成閃爍的畫法:
g=pl.CreateGraphics();
g.Clear(SystemColor.ButtonFace);
//.....畫新的
不會閃爍的辦法:
this.Controls.ReMoveAt(panel1);
pl=new Panel();
pl.Name="panel1";
//....創(chuàng)建容器控件
this.Controls.Add(pl);
//繼續(xù)畫
不用PictureBoxTest.Image屬性,直接把圖形繪制到PictureBoxTest上面就可以了。
Dim?button?As?Integer?=?0
Private?Sub?Button1_Click(ByVal?sender?As?Object,?ByVal?e?As?EventArgs)?_
Handles?Button1.Click
Using?g?As?Graphics?=?Graphics.FromHwnd(PictureBoxTest.Handle)
Dim?penRed?As?Pen?=?New?Pen(Color.Red,?1)?????'定義紅色畫筆??
Dim?penblue?As?Pen?=?New?Pen(Color.Blue,?1)?'定義藍色畫筆?
If?button?=?0?Then
g.DrawLine(penRed,?0,?0,?100,?100)
button?=?1
ElseIf?button?=?1?Then
g.DrawLine(penblue,?100,?100,?200,?200)
button?=?0
End?If
End?Using
End?Sub
Private Function isopen() As AutoCAD.AcadApplication
Try
dim CADapp_temp AutoCAD.AcadApplication = GetObject(, "AutoCAD.Application")
return CADapp_temp
Catch ex As Exception
Return Nothing
End Try
End Function
'調用上面的函數(shù),如果為nothing表示沒有打開,否則打開并返回對象
文章名稱:vb.net畫圖 vb編寫簡單的畫圖程序
當前路徑:http://aaarwkj.com/article2/doodiic.html
成都網站建設公司_創(chuàng)新互聯(lián),為您提供建站公司、服務器托管、標簽優(yōu)化、搜索引擎優(yōu)化、網頁設計公司、商城網站
聲明:本網站發(fā)布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創(chuàng)新互聯(lián)