导航:首页 > 编程大全 > VB颜色代码与RGB互转工具

VB颜色代码与RGB互转工具

发布时间:2023-08-24 02:24:30

㈠ VB6 如何进行颜色转换

首先纠正一下,&HFFFFFFFF不是白色,正确的应该是&HFFFFFF,共三个字节,每个字节分别是红绿蓝三原色的分量值。如果用&HFFFFFFFF(这是四个字节),VB6会报错的。

其次,vbWhite是VB的内部常量,它的值就是&HFFFFFF(也就是十进制的16777215),所以不存在转换的问题。建议尽量使用类似vbWhite、vbRed、vbBlue这样的常量来表示颜色,因为它们很直观,即使不懂编程(但懂点英语)的人也知道它们就是白色、红色、蓝色的意思。

你可以自己在VB6的立即窗口验证一下我上面所述是否正确:

PrintvbWhite'显示结果为16777215

PrintHex(vbWhite)'显示结果为FFFFFF

补充说一下,颜色的多种表示方式,其实它们最终的值都是相等的,并不需要所谓的转换,比如以下是纯蓝色的多种表示方式:

vbBlue

RGB(0,0,255)

&HFF0000

16711680

以上这些表示方式,其实它们的值都是一样的,都是等于16711680,你甚至可以拿它们直接来进行数学运算呢!

vbBlue+RGB(0,0,255)+&HFF0000+16711680=66846720

66846720/4=16711680

如果你是想让一个颜色值分解为红绿蓝三原色分量,可以这样:

color1=vbWhite'这是白色
red=color1Mod&H100'这是红色分量
green=color1&H100Mod&H100'这是绿色分量
blue=color1&H10000'这是蓝色分量

㈡ VB 颜色值十六进制与RGB之间怎样转换

反回RGB数组的一个函数

Public Function ColorRGB(Color As Long) As Byte()
Const ByN As Integer = 256
Const ByN2 As Long = 65536
Dim A(2) As Byte
A(0) = (Color Mod ByN)
A(1) = ((Color Mod ByN2) \ ByN)
A(2) = (Color \ ByN2)
ColorRGB = A
End Function

例如:

Print ColorRGB(&H1111FF)(0) '红色RGB
Print ColorRGB(&H11FF11)(1) '绿色RGB
Print ColorRGB(&HFF1111)(2) '蓝色RGB

都等于255

变回版十六进制更权简单
HEX(RGB(1,1,1))

㈢ VB中HSL怎么转换为RGB

网上找去啊。N多现成的算法,N多现成的代码啊。这个东西。
网络里面就有,怎么不看呢。
HSL→RGB的算法描述。
步骤1:If S=0,表示灰色,定义R,G和B都为L.
步骤2:否则,测试L:
If L<0.5,temp2=L*(1.0+S)
If L>=0.5,temp2=L+S-L*S
步骤3:temp1=2.0*-temp2
步骤4:把H转换到0~1。
步骤5:对于R,G,B,计算另外的临时值temp3。方法如下:
for R, temp3=H+1.0/3.0
for G, temp3=H
for B, temp3=H-1.0/3.0
if temp3<0, temp3=temp3+1.0
if temp3>1, temp3=temp3-1.0
步骤6:对于R,G,B做如下测试:
If 6.0*temp3<1,color=temp1+(temp2-temp1)*6.0*temp3
Else if 2.0*temp3<1,color=temp2
Else if 3.0*temp3<2,
color=temp1+(temp2-temp1)*((2.0/3.0)-temp3)*6.0
Else color=temp1

㈣ VB_如何将颜色转换为RGB

是6位的十六进制的数吧?

前2位换算成十进制 是R
中间2位换算成十进制 是G
最后2位换算成十进制 是B

阅读全文

与VB颜色代码与RGB互转工具相关的资料

热点内容
网络中常用的传输介质 浏览:518
文件如何使用 浏览:322
同步推密码找回 浏览:865
乐高怎么才能用电脑编程序 浏览:65
本机qq文件为什么找不到 浏览:264
安卓qq空间免升级 浏览:490
linux如何删除模块驱动程序 浏览:193
at89c51c程序 浏览:329
怎么创建word大纲文件 浏览:622
袅袅朗诵文件生成器 浏览:626
1054件文件是多少gb 浏览:371
高州禁养区内能养猪多少头的文件 浏览:927
win8ico文件 浏览:949
仁和数控怎么编程 浏览:381
项目文件夹图片 浏览:87
怎么在东芝电视安装app 浏览:954
plc显示数字怎么编程 浏览:439
如何辨别假网站 浏览:711
宽带用别人的账号密码 浏览:556
新app如何占有市场 浏览:42

友情链接