十年網(wǎng)站開發(fā)經(jīng)驗 + 多家企業(yè)客戶 + 靠譜的建站團隊
量身定制 + 運營維護+專業(yè)推廣+無憂售后,網(wǎng)站問題一站解決
函數(shù)原型 Function RGB(Red As Integer, Green As Integer, Blue As Integer) As Long
創(chuàng)新互聯(lián)建站公司2013年成立,是專業(yè)互聯(lián)網(wǎng)技術(shù)服務公司,擁有項目成都網(wǎng)站建設(shè)、成都網(wǎng)站制作網(wǎng)站策劃,項目實施與項目整合能力。我們以讓每一個夢想脫穎而出為使命,1280元淇縣做網(wǎng)站,已為上家服務,為淇縣各地企業(yè)和個人服務,聯(lián)系電話:18982081108
Red 為紅色顏色值
Green 為綠色顏色值
Blue為紅色顏色值.范圍均為0~255
三者均為0 是為純黑色
三者均為255時為純白色
Eg:將窗體背景設(shè)置為紅色
Private Sub Form_Load()
Me.BackColor = RGB(255, 0, 0)
End Sub
在屬性里面-你找到FORM1的窗體屬性-那邊有2個有顏色的屬性值旁邊是有個顏色小框框的。你把它換了就可以了。
具體換什么顏色你自己看著來換。。
追問:
我的意思是用color.FormArgb()方法
回答:
vb6的vbWhite在VB.NET中是Color.White
vb6的H808080在VB.NET中是Color.FormArgb(H808080)
如果是System.UInt32
With txtHtml
.SetColor(CodeMax.cmColorItem.cmClrLeftMargin, H808080)
.SetColor(CodeMax.cmColorItem.cmClrLineNumberBk, H808080)
.SetColor(CodeMax.cmColorItem.cmClrLineNumber, i)
.HighlightedLine = 0
End With
這段時間在VB6中運行正常,但是在VB.net中就會提示說"H808080"無法轉(zhuǎn)換為System.Uint32
Convert.ToUInt32(H808080)就行了,如果用VB2005就支持無符號數(shù)了,VB.NET暫時不支持。
補充:
函數(shù)RGB,格式:
RGB(red,green,blue),red、green、blue取值0~255。
函數(shù)QBColor,格式:
QBColor(color),color取值0~15,代表顏色編號,即只能表示16種顏色。
RGB 函數(shù)
返回一個 Long整數(shù),用來表示一個 RGB 顏色值。
語法
RGB(red, green, blue)
RGB 函數(shù)的語法含有以下這些命名參數(shù):
部分 描述
red 必要參數(shù);Variant (Integer)。數(shù)值范圍從 0 到 255,表示顏色的紅色成份。
green 必要參數(shù);Variant (Integer)。數(shù)值范圍從 0 到 255,表示顏色的綠色成份。
blue 必要參數(shù);Variant (Integer)。數(shù)值范圍從 0 到 255,表示顏色的蘭色成份。
說明
可以接受顏色說明的應用程序的方法和屬性期望這個說明是一個代表 RGB 顏色值的數(shù)值。一個 RGB 顏色值指定紅、綠、藍三原色的相對亮度,生成一個用于顯示的特定顏色。
傳給 RGB 的任何參數(shù)的值,如果超過 255,會被當作 255。
下面的表格顯示一些常見的標準顏色,以及這些顏色的紅、綠、藍三原色的成份:
顏色 紅色值 綠色值 蘭色值 黑色 0 0 0 蘭色 0 0 255 綠色 0 255 0 青色 0 255 255 紅色 255 0 0 洋紅色 255 0 255 黃色 255 255 0 白色 255 255 255 QBColor 函數(shù) 返回一個 Long,用來表示所對應顏色值的 RGB 顏色碼。
補充:
語法:
QBColor(color)
必要的 color 參數(shù)是一個界于 0 到 15 的整型。
設(shè)置值
color 參數(shù)有以下這些設(shè)置:
值 顏色 值 顏色 0 黑色 8 灰色
1 蘭色 9 亮蘭色 2 綠色 10 亮綠色 3 青色 11 亮青色 4 紅色 12 亮紅色 5 洋紅色 13 亮洋紅色 6 黃色 14 亮黃色 7 白色 15 亮白色 說明:color 參數(shù)代表使用于早期版本的 Basic(諸如 Microsoft Visual Basic for MS-DOS 以及 Basic Compiler)的顏色值。始于最低有效字節(jié),返回值指定了紅、綠、藍三原色的值,用于設(shè)置成 VBA中RGB 系統(tǒng)的對應顏色。
R/G/B值最小是0最大是255屬Byte值類型
Dim cr As Color = 控件.BackColor '獲取控件背景色
Dim alpha As Byte = cr.A '透明度
Dim R As Byte = cr.R 'R值
Dim G As Byte = cr.G 'G值
Dim B As Byte = cr.B 'B值
Dim outAcr As Color = Color.FromArgb(alpha, R, G, B) '創(chuàng)建帶有透明通道的ARGB顏色
Dim outcr As Color = Color.FromArgb(R, G, B) '創(chuàng)建不透明的RGB顏色
VB中的RGB是就是三基色的意思:
紅色RED;
綠色GREEN;
藍色BLUE。
VB是一種由?Microsoft?公司開發(fā)的結(jié)構(gòu)化的、模塊化的、面向?qū)ο蟮?、包含協(xié)助開發(fā)環(huán)境的事件驅(qū)動為機制的可視化程序設(shè)計語言。從任何標準來說,VB都是世界上使用人數(shù)最多的語言——不管是盛贊VB的開發(fā)者還是抱怨VB的開發(fā)者的數(shù)量。它源自于BASIC編程語言。VB擁有圖形用戶界面(GUI)和快速應用程序開發(fā)(RAD)系統(tǒng),可以輕易的使用DAO、RDO、ADO連接數(shù)據(jù)庫,或者輕松的創(chuàng)建ActiveX控件。程序員可以輕松的使用VB提供的組件快速建立一個應用程序。