應(yīng)改成
創(chuàng)新互聯(lián)服務(wù)緊隨時代發(fā)展步伐,進(jìn)行技術(shù)革新和技術(shù)進(jìn)步,經(jīng)過十年的發(fā)展和積累,已經(jīng)匯集了一批資深網(wǎng)站策劃師、設(shè)計師、專業(yè)的網(wǎng)站實施團(tuán)隊以及高素質(zhì)售后服務(wù)人員,并且完全形成了一套成熟的業(yè)務(wù)流程,能夠完全依照客戶要求對網(wǎng)站進(jìn)行成都網(wǎng)站設(shè)計、網(wǎng)站建設(shè)、建設(shè)、維護(hù)、更新和改版,實現(xiàn)客戶網(wǎng)站對外宣傳展示的首要目的,并為客戶企業(yè)品牌互聯(lián)網(wǎng)化提供全面的解決方案。
Label4.ForeColor = Color.FromArgb(255, 255, 255, 255)
RGB函數(shù)是這樣的
Public Function RGB(Red As Integer, Green As Integer, Blue As Integer) As Integer
它返回一個Integer不是Color結(jié)構(gòu)
應(yīng)該用Color.FromArgb
Public Shared Function FromArgb(alpha As Integer, red As Integer, green As Integer, blue As Integer) As System.Drawing.Color
這個其實跟桃形或者心形(另一問題中提到的)其實是一個程序,改一下花瓣的半徑就可以了。請看圖
通過圓心的垂直線的距離為半徑
圓心右側(cè)垂直線的距離為半徑
圓心左側(cè)垂直線的距離為半徑
過圓上左極點垂直線的距離為半徑
與上次的桃形繪圖的代碼差異只有一句
使用顏色常數(shù):Form1背景色=虛擬現(xiàn)實。
背景色=vbBlue'藍(lán)色。
背景色=vbWhite'白色。
使用QBColor函數(shù):form1。背景色=QBColor(n)n個值,從0到15。
使用RGB函數(shù):form1。背景色=RGB(r,g,b)'r,b,值分別為0到255。
擴展資料:
VbGreen HFF00 green
VbYellow HFFFF黃色
VbBlue HFF0000藍(lán)色
vb品紅色 HFF00FF品紅色
VbCyan HFFFF00青色
VbWhite HFFFFFF white
VbGrayText H80000011灰色(無效)文本
VbButtonText H80000012按下按鈕上文字的顏色
VbInactiveCaptionText H80000013非活動標(biāo)題中的文本顏色
Vb3DHighlight H80000014高亮顯示3d顯示元素的顏色
Vb3DDKShadow H80000015三維顯示元素的最暗陰影顏色
在3d中,Vb3DLight和h80000016低于vb3Dhighlight
Vb3DFace H8000000F文本表面顏色
Vb3DShadow H80000010文本陰影顏色
VbInfoText H80000017提示窗口文字顏色
VbInfoBackground H80000018表示窗口中背景的顏色
要使用GetPixel函數(shù)來取得像素的顏色值,代碼如下:
1
2
3
4
5
private void button1_Click(object sender, EventArgs e)
{
Color color = new Bitmap(pictureBox1.Image).GetPixel(10, 10);
MessageBox.Show(color.ToString());
VB可使用Point方法來獲取圖片指定點的顏色。
Point 方法
按照長整數(shù),返回在 Form 或 PictureBox 上所指定磅的紅-綠-藍(lán) (RGB) 顏色。
語法
object.Point(x, y)
'窗體判色代碼:
Private Sub Form1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Text1 = X
Text2 = Y
Text3 = Point(X, Y)
Text4 = (Val(Text3) Mod 65536) Mod 256 'Red
Text5 = (Val(Text3) Mod 65536) \ 256 'Green
Text6 = Val(Text3) \ 65536 'Blue
Shape1.FillColor = RGB(Val(Text4), Val(Text5), Val(Text6))
End Sub
'PictureBox判色代碼:
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Text1 = X
Text2 = Y
Text3 = Picture1.Point(X, Y)
Text4 = (Val(Text3) Mod 65536) Mod 256 'Red
Text5 = (Val(Text3) Mod 65536) \ 256 'Green
Text6 = Val(Text3) \ 65536 'Blue
Shape1.FillColor = RGB(Val(Text4), Val(Text5), Val(Text6))
End Sub
獲取控件的Graphic對象,繪圖方法都集中在了該對像中了。
1. 通過控件GreateGrapic方法獲得
2. Paint 事件參數(shù)e中也有此對象
相應(yīng)的圖形方法是DrawImage,vb.net中沒有自動重繪功能,圖形不是持久的,所以應(yīng)當(dāng)在Paint事件中繪圖。
Private?Sub?PictureBox2_Paint(ByVal?sender?As?Object,?ByVal?e?As?System.Windows.Forms.PaintEventArgs)?Handles?PictureBox2.Paint
e.Graphics.SetClip(e.ClipRectangle)
e.Graphics.DrawImage(PictureBox1.Image,?New?Rectangle(0,?0,?PictureBox1.ClientSize.Width,?PictureBox1.ClientSize.Height),?New?Rectangle(5,?5,?100,?100),?GraphicsUnit.Pixel)
End?Sub
標(biāo)題名稱:vb.net色譜圖代碼的簡單介紹
URL分享:http://m.rwnh.cn/article14/hisode.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站維護(hù)、電子商務(wù)、做網(wǎng)站、商城網(wǎng)站、品牌網(wǎng)站制作、網(wǎng)站策劃
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)