在vb.net中用rgb,Vbnet

提示：扫一扫查出行
【扫一扫了解最新限行尾号】
复制提示

RGB函数如何实现颜色从红到黄到绿最后渐变为蓝色?

在属性里面-你找到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"无法转换为System.Uint32

Convert.ToUInt32(H808080)就行了，如果用VB2005就支持无符号数了，VB.NET暂时不支持。

补充：

函数RGB，格式:

RGB(red,green,blue)，red、green、blue取值0~255。

函数QBColor，格式：

QBColor(color)，color取值0~15，代表颜色编号，即只能表示16种颜色。

RGB 函数

返回一个 Long整数，用来表示一个 RGB 颜色值。

语法

RGB(red, green, blue)

RGB 函数的语法含有以下这些命名参数：

部分描述

red 必要参数；Variant (Integer)。数值范围从 0 到 255，表示颜色的红色成份。

green 必要参数；Variant (Integer)。数值范围从 0 到 255，表示颜色的绿色成份。

blue 必要参数；Variant (Integer)。数值范围从 0 到 255，表示颜色的兰色成份。

说明

可以接受颜色说明的应用程序的方法和属性期望这个说明是一个代表 RGB 颜色值的数值。一个 RGB 颜色值指定红、绿、蓝三原色的相对亮度，生成一个用于显示的特定颜色。

传给 RGB 的任何参数的值，如果超过 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 函数返回一个 Long，用来表示所对应颜色值的 RGB 颜色码。

补充：

语法：

QBColor(color)

必要的 color 参数是一个界于 0 到 15 的整型。

设置值

color 参数有以下这些设置：

值颜色值颜色 0 黑色 8 灰色

1 兰色 9 亮兰色 2 绿色 10 亮绿色 3 青色 11 亮青色 4 红色 12 亮红色 5 洋红色 13 亮洋红色 6 黄色 14 亮黄色 7 白色 15 亮白色说明：color 参数代表使用于早期版本的 Basic（诸如 Microsoft Visual Basic for MS-DOS 以及 Basic Compiler）的颜色值。始于最低有效字节，返回值指定了红、绿、蓝三原色的值，用于设置成 VBA中RGB 系统的对应颜色。