关于vb.net颜色取反的信息

c#/vb.net如何通过反射获得颜色名称（字符串）对应的颜色（Color类型）？

public Color col(string colorName)

10年积累的做网站、网站设计经验，可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你，你也不认识我。但先网站设计制作后付款的网站建设流程，更有翁源免费网站建设让你可以放心的选择与我们合作。

{

Type colorType = typeof(Color);

PropertyInfo info = colorType.GetProperty(colorName, BindingFlags.Public | BindingFlags.Static);

if (infos == null)

{

//throw Exception

}

return(Color)info.GetValue(null, null);

}

是这个意思么？输入“Red”， 返回Color.Red 区分大小写

vb.net怎么实现单击数字区域的按钮使按钮变红色，单击运算符按钮变蓝色同时数字区按钮还原？紧急在线等…

您好，这种方法可以通过按钮的MouseDown和MouseUp事件来实现，比如说，当单击按钮RedColor（RedColor为这个按钮的Name属性的属性值）的时候，要使按钮的颜色变成红色，这可以在代码视图中的控件选择下拉列表中选择RedColor这个控件，然后在右边的事件下拉列表中选择MouseDown事件（当按下鼠标时发生），这时，Visual Studio会自动生成如下代码：

Private Sub RedColor_MouseDown(ByVal sender As System.Object, _

ByVal e As System.EventArgs) Handles RedColor.MouseDown

End Sub

接下来就在当前生成的代码中写入如下代码：

RedColor.BackColor = Color.FromArgb(255, 0, 0)

这句代码的作用是利用Color下的FromArgb方法来设置RGB颜色参数，在RGB颜色系统中，R代表红色，G代表绿色，B代表蓝色，根据这三种颜色的不同程度的调和，就会得到不同的颜色，如果您要得到深色的天蓝色，则可以设置FromArgb(0, 191, 255)，这个颜色转换为HTML中的RGB颜色就是#00BFFF。

当然颜色还原最好是写在MouseUp事件里面，这样就不必在单击其他按钮时来还原上一次按下的按钮的颜色，在这里，为了方便描述，我们假设按钮的默认颜色为白色，也就是FromArgb方法设置为FromArgb(255, 255, 255)的时候，所标示的颜色就是白色

所以选择了RedColor按钮的MouseUp事件后，Visual Studio会自动生成下列代码：

Private Sub RedColor_MouseUp(ByVal sender As System.Object, _

ByVal e As System.EventArgs) Handles RedColor.MouseUp

End Sub

MouseUp的含义是当鼠标弹起时发生，所以在这个事件就可以设置按钮颜色的还原，即添加下列代码来实现：

RedColor.BackColor = Color.FromArgb(255, 255, 255)

当然，这就编写好了一个按钮按下时变色，回弹时还原的功能，至于另外一个按钮的功能，这与这个按钮的功能一样，只是代码有一些细微的差别而已，假设这个按钮的Name属性的属性值为BlueColor，相应的代码对应如下：

Private Sub BlueColor_MouseDown(ByVal sender As System.Object, _

ByVal e As System.EventArgs) Handles BlueColor.MouseDown

BlueColor.BackColor = Color.FromArgb(0, 0, 255) '蓝色的FromArgb

End Sub

Private Sub BlueColor_MouseDown(ByVal sender As System.Object, _

ByVal e As System.EventArgs) Handles BlueColor.MouseDown

BlueColor.BackColor = Color.FromArgb(255, 255, 255)

End Sub

另外，为了避免代码的冗余，可以将RedColor和BlueColor的MouseUp事件进行合并，这合并后的代码如下：

Private Sub BlueColor_MouseDown(ByVal sender As System.Object, _

ByVal e As System.EventArgs) Handles BlueColor.MouseDown, RedColor.MouseUp

BlueColor.BackColor = Color.FromArgb(255, 255, 255)

RedColor.BackColor = Color.FromArgb(255, 255, 255)

End Sub

当然，这个你只要分析了控件事件代码的基本结构，一切就一目了然了，控件事件代码的基本结构如下：

[作用域] Sub 事件名([参数列表]) Handles 控件事件1 [, 控件事件2, 控件事件3...]

[事件代码区域]

End Sub

如果此回答对您有帮助，别忘了采纳哦，如果没有解决您的问题，您可以在互联网上寻找更多关于此问题的解决方案，谢谢！

VB6 如何进行颜色转换

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

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

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

Print vbWhite   '显示结果为16777215

Print Hex(vbWhite)   '显示结果为FFFFFF

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

vbBlue

RGB(0, 0, 255)

HFF0000

16711680

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

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

66846720 / 4 = 16711680

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

color1 = vbWhite   '这是白色

red = color1 Mod H100  '这是红色分量

green = color1 \ H100 Mod H100  '这是绿色分量

blue = color1 \ H10000  '这是蓝色分量

VB RGB颜色反转公式?

你可以这样!应该会快点!速度上!

讲解一下!RGB(R,G,B) 返回一个long型的数 值为 H0 to HFFFFFF

值是H B G R ,排序的

我们只要一个not (取反) 再把高字节(每一字节为0就可以了) 也就是 and HFFFFFF

完整的是

NOT(RGB(R,G,B)) and HFFFFFF

可以了,试试吧 ^_^