vb.net中有沒有哪個控件可以自定義形狀（如圓形，多邊形）和顏色，如果有，希望你您給出代碼

記得VB6當(dāng)中有Shape控件，但是VB.net里這個控件不存在了。

創(chuàng)新互聯(lián)公司專業(yè)為企業(yè)提供江蘇網(wǎng)站建設(shè)、江蘇做網(wǎng)站、江蘇網(wǎng)站設(shè)計、江蘇網(wǎng)站制作等企業(yè)網(wǎng)站建設(shè)、網(wǎng)頁設(shè)計與制作、江蘇企業(yè)網(wǎng)站模板建站服務(wù)，10年江蘇做網(wǎng)站經(jīng)驗，不只是建網(wǎng)站，更提供有價值的思路和整體網(wǎng)絡(luò)服務(wù)。

提個思路：使用Picture控件或Label控件，通過代碼在控件里繪圖想要的圖形，可以試試。

怎樣在VB.net中畫一個點呢？

畫點：

在PictureBox的Paint事件里面：

dim myGraphics=e.Graphics

Dim myPointArray As Point() = {New Point(0, 0), New Point(50, 30), New Point(30, 60)}

myGraphics.DrawPolygon(myPen, myPointArray)

畫圓：

Dim g As Graphics

g = PictureBox1.CreateGraphics

g.FillEllipse(Brushes.Red, x, y, 10, 10)

VB.NET畫多邊形

dim bmp as new bitmap(width,height)dim g as graphics=graphics.fromimage(bmp)dim P() as pointf {new pointf(10,10),new pointf(30,30),new pointf(30,50),new pointf(10,50),new pointf(10,30)}g.drawlines(pen.blue,p)backgroundimage=bmp 還有一種方法是用路徑(graphicspath),原理差不多，可以參考下MSDN

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

1. 創(chuàng)建一個Graphics對象實例。

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

Dim MyGraphics As Graphics = Me.CreateGraphics

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

Dim MyGraphics As Graphics = PictureBox1.CreateGraphics

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

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

Dim RedBrush As New SolidBrush(Color.Red)