vb.net填充圖案 vba改變圖形填充顏色
VB.net 旋轉(zhuǎn)圖像時(shí)，如何指定填充色
繪制線條采用Draw開頭的方法，顏色參數(shù)用Pen類；
網(wǎng)站制作、成都網(wǎng)站設(shè)計(jì),成都做網(wǎng)站公司-創(chuàng)新互聯(lián)已向近千家企業(yè)提供了,網(wǎng)站設(shè)計(jì),網(wǎng)站制作,網(wǎng)絡(luò)營(yíng)銷等服務(wù)!設(shè)計(jì)與技術(shù)結(jié)合,多年網(wǎng)站推廣經(jīng)驗(yàn),合理的價(jià)格為您打造企業(yè)品質(zhì)網(wǎng)站。
繪制有填充色的封閉圖形采用Fill開頭的方法，顏色參數(shù)用Brush類；
例如：
'繪制一個(gè)實(shí)心圓，該圓在：直線x=200，y=200，x=200+100，y=200+100所劃矩形區(qū)域內(nèi)
Me.CreateGraphics.FillEllipse(New SolidBrush(Color.Orange), 200, 200, 100, 100)
'繪制一個(gè)空心圓，該圓在：直線x=200，y=200，x=200+100，y=200+100所劃矩形區(qū)域內(nèi)
Me.CreateGraphics.DrawEllipse(New Pen(Color.Black), 200, 200, 100, 100)
vb.net讀取txt的數(shù)據(jù)作圖問(wèn)題
一、分析：
1，這一類隨時(shí)間而變化的曲線圖，通常把橫軸作為時(shí)間，把縱軸作為相應(yīng)的值，在這里就是密度值。
2，點(diǎn)的集合就是線；一組時(shí)間、密度值，對(duì)應(yīng)一個(gè)點(diǎn)，把點(diǎn)連接起來(lái)就構(gòu)成了線。
二、在VB.NET中作圖，需要知道并解決幾個(gè)問(wèn)題：
1，與VB6一樣，VB.NET中默認(rèn)的坐標(biāo)系統(tǒng)，左上角為坐標(biāo)原點(diǎn)，X軸的正向?yàn)閺淖笙蛴?，Y軸的正向是從上向下。
為了使得它與數(shù)學(xué)中的坐標(biāo)系統(tǒng)相一致，可以使用VB.NET中Graphics類的兩個(gè)方法；
1、TranslateTransform----平移變換
格式：Graphics.TranslateTransform(dx,dy)
其中：dx 和 dy分別是Single數(shù)據(jù)類型
2、ScaleTransform----縮放變換
格式：Graphics.ScaleTransform(sx,sy)
其中：sx 和 sy分別是Single數(shù)據(jù)類型；
例如：為了符合數(shù)學(xué)中的一般格式，可以使用下述代碼：
Graphics.ScaleTransform(1, -1)
這樣就把Y軸的正方向給翻過(guò)來(lái)了。
三、VB.NET中繪制圖形
1，繪制圓或橢圓
'繪制圖形的三步曲
'1，獲得一個(gè)Graphics對(duì)象
Dim MyGraphics As Graphics
MyGraphics = Me.CreateGraphics
'2，定義一個(gè)Pen對(duì)象，用于繪制圖形（輪廓線）
Dim MyPen As New Pen(Color.Black)
'3，定義一個(gè)Brush對(duì)象，用于填充圖形（如果需要填充的話）
Dim MyBrush As New SolidBrush(Color.Orange)
'繪制一個(gè)實(shí)心圓，該圓在：直線x=200，y=200，x=200+100，y=200+100所劃的矩形區(qū)域內(nèi)
MyGraphics.FillEllipse(Brush, 200, 200, 100, 100)
'繪制一個(gè)空心圓，該圓在：直線x=200，y=200，x=200+100，y=200+100所劃的矩形區(qū)域內(nèi)
MyGraphics.DrawEllipse(Pen, 200, 200, 100, 100)
注意：最后兩個(gè)數(shù)值如果不等，就是繪制橢圓
當(dāng)圓足夠小，就是點(diǎn)了。
2，繪制直線
'1，獲得一個(gè)Graphics對(duì)象
Dim MyGraphics As Graphics
MyGraphics = Me.CreateGraphics
'2，定義一個(gè)Pen對(duì)象，用于繪制圖形（輪廓線）
Dim MyPen As New Pen(Color.Black)
MyGraphics.DrawLine(MyPen, 200, 200, 100, 100)
'或者直接用
Me.CreateGraphics.DrawLine(New Pen(Color.Black), 50, 50, 200, 200)
Vb.net怎么實(shí)現(xiàn)圖像的處理
這問(wèn)題有點(diǎn)籠統(tǒng)，軟糖來(lái)說(shuō)說(shuō)把：
圖像處理由System.Drawing命名空間負(fù)責(zé)。
主要是Bitmap類和Graphics類。
Bitmap表示一個(gè)位圖，可以是BMP,JPG,PNG等文件。
裝載位圖
Dim?位圖?As?Bitmap?=?Bitmap.FromFile("C:\Image1.PNG")
Graphics表示一張畫紙，能夠進(jìn)行繪制操作。
它可以被窗體、控件、位圖調(diào)用CreateGraphics()方法來(lái)創(chuàng)建。
然后調(diào)用Graphics.Draw開頭的一系列函數(shù)來(lái)繪制圖像和圖形，F(xiàn)ill開頭的填充圖形。
創(chuàng)建畫紙并繪制位圖
Dim?畫紙?As?Graphics?=?Me.CreateGraphics()
畫紙.DrawImage(位圖,?100,?100,?256,?256)
可以將上面三行放到Form1_Load中測(cè)試，把路徑改一下，
還可以把Me改為能在上面繪圖的控件的名稱。
更多內(nèi)容請(qǐng)看MSDN的System.Drawing命名空間。
如滿意，請(qǐng)采納，謝謝。
網(wǎng)站標(biāo)題：vb.net填充圖案 vba改變圖形填充顏色
文章網(wǎng)址：http://m.jiaotiyi.com/article/doicscd.html