vb和vb.net 在picturebox 中繪制直線如何繪制

繪圖是系統(tǒng)內(nèi)部操作的，不需要懂原理

創(chuàng)新互聯(lián)長(zhǎng)期為上1000+客戶提供的網(wǎng)站建設(shè)服務(wù)，團(tuán)隊(duì)從業(yè)經(jīng)驗(yàn)10年，關(guān)注不同地域、不同群體，并針對(duì)不同對(duì)象提供差異化的產(chǎn)品和服務(wù)；打造開放共贏平臺(tái)，與合作伙伴共同營(yíng)造健康的互聯(lián)網(wǎng)生態(tài)環(huán)境。為克拉瑪依區(qū)企業(yè)提供專業(yè)的網(wǎng)站制作、網(wǎng)站建設(shè)，克拉瑪依區(qū)網(wǎng)站改版等技術(shù)服務(wù)。擁有10余年豐富建站經(jīng)驗(yàn)和眾多成功案例,為您定制開發(fā)。

方法就在那里，只有會(huì)用和不會(huì)用，你的代碼告訴它繪制，它就會(huì)繪制。它（方法）究竟如何去繪制的并不是重點(diǎn)，反正它會(huì)繪制。

drawline（繪線）方法很簡(jiǎn)單，第一個(gè)參數(shù)是pen,它確定線條的顏色、寬度和樣式。第二、第三個(gè)參數(shù)都是point類型，確定兩個(gè)點(diǎn)的位置，繪制直線。

在VB NET中，在Form_Load中創(chuàng)建graphics類，并繪制直線，為什么執(zhí)行程序后發(fā)現(xiàn)直線繪制不出來？

1. 創(chuàng)建一個(gè)Graphics對(duì)象實(shí)例。

繪制圖形必須創(chuàng)建Graphics對(duì)象。如果是在窗體上繪圖，要使用下列代碼創(chuàng)建Graphics對(duì)象；

Dim MyGraphics As Graphics = Me.CreateGraphics

如果是在PictrueBox里繪圖，要使用下列代碼創(chuàng)建Graphics對(duì)象；

Dim MyGraphics As Graphics = PictureBox1.CreateGraphics

2. 定義一個(gè)Brush對(duì)象，用來填充圖形(如果你需要填充的話)。

如果填充封閉曲線或者多邊形，必須創(chuàng)建Brush對(duì)象（或者Brush類的繼承類對(duì)象），用來確定填充的顏色。例如下面的代碼，創(chuàng)建了一個(gè)填充紅色的畫刷對(duì)象。在最后的括號(hào)里，用Color結(jié)構(gòu)指定的枚舉值，確定畫刷的顏色。限于篇幅有關(guān)Color結(jié)構(gòu)這里不展開，可能在后續(xù)博文里介紹。

Dim RedBrush As New SolidBrush(Color.Red)

VB.Net中畫直線問題

不想整個(gè)重畫，最好用單色的背景，例如黑色，線條是白色的

用變量把線條的內(nèi)容備份

當(dāng)想改變線條的位置或者長(zhǎng)度之前，先用存下來的變量以黑色重畫一次，覆蓋原來的白色線條

然后再畫新的白色線條，這種重畫方法比較節(jié)省資源

假如需要用花哨的背景或者圖片當(dāng)背景，也可以用局部重回的方式。

代碼就不提供了，只提供思路。

如何通過vb.net WinForm窗體上畫線條或弧線，讓用戶可以用鼠標(biāo)捕捉（選中）已畫的線條。

代碼寫起來可能比較麻煩，給你個(gè)思路，就是用GraphicsPath來繪制，然后通過繪制目標(biāo)的鼠標(biāo)移動(dòng)事件來獲取當(dāng)前鼠標(biāo)在繪制目標(biāo)中的實(shí)際位置，再通過GraphicsPath的IsVisible()方法來確認(rèn)鼠標(biāo)是否包含在GraphicsPath中。

DrawLine直線比較容易處理，只要得到Line的坐標(biāo)點(diǎn)，然后比較當(dāng)前鼠標(biāo)坐標(biāo)就好。

VB.NET 畫直線 問題 怎樣讓直線置頂(就是不被其它控件覆蓋) 100分(希望詳細(xì)些)如較麻煩，會(huì)追加分?jǐn)?shù)

這個(gè)必須用控件的方法解決，VB6有個(gè)Line控件很容易解決這個(gè)問題，但是VB.NET沒有了，幸好微軟也想到了這個(gè)缺陷，提供免費(fèi)的Visual Basic PowerPacks控件箱，其中有Line控件。

Visual Basic PowerPacks下載地址：

使用 LineShape 控件繪制直線：

vb.net 畫直線問題

'把“Dim graph As Graphics = Me.CreateGraphics”挪到“Button1_Click”事件內(nèi)，調(diào)試過成功！

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim graph As Graphics = Me.CreateGraphics

Dim pen2 As Pen = New Pen(Color.Green, 3)

graph.DrawLine(pen2, 400, 400, 500, 200)

End Sub

End Class

分享題目：vb.net窗體畫直線 c#畫點(diǎn)線面窗體
文章路徑：http://m.newbst.com/article38/hjhesp.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供ChatGPT、定制網(wǎng)站、自適應(yīng)網(wǎng)站、外貿(mào)網(wǎng)站建設(shè)、、網(wǎng)站排名

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來源： 創(chuàng)新互聯(lián)