精华内容
下载资源
问答
  • VB 颜色RGB

    2016-05-30 03:04:00
    Option Explicit Private Type RGBTYPE R As Byte G As Byte B As Byte X As Byte End Type ...Private Declare Function GetPixel Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal ...
    Option Explicit
    Private Type RGBTYPE
        R As Byte
        G As Byte
        B As Byte
        X As Byte
    End Type
    Private Declare Function GetPixel Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal y As Long) As RGBTYPE
    Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
    
    Private Sub Command1_Click()
        Dim cor As RGBTYPE
        cor = GetPixel(Me.hdc, 5, 5)
        Print cor.R
        Print cor.G
        Print cor.B
    End Sub
    
    Private Sub Command2_Click()
        Dim cor As RGBTYPE
        Dim Lcor As Long
        Lcor = Me.BackColor
        CopyMemory cor, Lcor, 4
        Print cor.R
        Print cor.G
        Print cor.B
        CopyMemory Lcor, cor, 4
        Print Lcor
    End Sub

     

    转载于:https://www.cnblogs.com/youyouran/p/5540989.html

    展开全文
  • vb颜色代码与rgb互转工具 很好用实在,欢迎下载,资源共享
  • VB颜色RGB列表

    2010-03-05 15:33:59
    用于查颜色RGB,可以方面的从表有对照查出来,比如:红色的RGB值是多少………………?
  • 实现RGB颜色的调配,使得VB设置RGB颜色时更加直观
  • VB分割RGB颜色

    2021-02-15 17:03:58
    Private Declare Function ChooseColor Lib “comdlg32.dll” Alias “ChooseColorA” (pChoosecolor As ChooseColor) As Long Private Type ...rgbResult As Long lpCustColors As String flags As Long lCus.

    在这里插入图片描述
    Private Declare Function ChooseColor Lib “comdlg32.dll” Alias “ChooseColorA” (pChoosecolor As ChooseColor) As Long
    Private Type ChooseColor
    lStructSize As Long
    hwndOwner As Long
    hInstance As Long
    rgbResult As Long
    lpCustColors As String
    flags As Long
    lCustData As Long
    lpfnHook As Long
    lpTemplateName As String
    End Type
    Dim mc As Long

    Private Function VbToRGB(ByVal mColor As Long) As Variant
    Dim Blue&, Red&, Green&
    Blue = 0: Red = 0: Green = 0
    Blue = mColor \ 65536
    Green = (mColor - 65536 * Blue) \ 256
    Red = mColor - 65536 * Blue - Green * 256
    VbToRGB = Array(Red, Green, Blue)
    End Function

    Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button <> 1 Then Exit Sub
    If X > 0 And X < Me.ScaleWidth And Y > 0 And Y < Me.ScaleHeight Then
    Dim CC As ChooseColor
    CC.lStructSize = Len(CC)
    CC.hwndOwner = Me.hwnd
    CC.hInstance = App.hInstance
    CC.flags = 0
    CC.lpCustColors = String$(16 * 4, 0)
    If ChooseColor(CC) < 1 Then Exit Sub
    mc = CC.rgbResult
    Call Colorre(mc)
    End If
    End Sub

    Private Sub Form_Resize()
    Call Colorre(mc)
    End Sub

    Private Sub Colorre(ByVal C As Long)
    Dim ColorArr
    ColorArr = VbToRGB©
    Me.BackColor = C
    Me.Cls
    Print “R:” & ColorArr(0) & vbCrLf & “G:” & ColorArr(1) & vbCrLf & “B:” & ColorArr(2)
    End Sub

    展开全文
  • 颜色值转换(RGBVB十六进制)

    热门讨论 2012-05-16 11:51:23
    颜色值转换(RGBVB十六进制),在程序开发中经常要用的设置界面颜色,但是用函数非常麻烦,而且增加代码量,所以就开发了这个可以转换的工具
  • VBRGB颜色模型与HSV颜色模型转换的实现 数据库下载权威资源
  • vb调色板 调节RGB三原色 控制字体颜色 附源码
  • RGB颜色值、十进制值、十六进制字符串转换,屏幕取色,VB源码,可用来查询RGB颜色值和获取屏幕区域里的颜色值和颜色代码。
  • vb.net 用RGB显示控件的颜色

    千次阅读 2019-02-21 11:27:48
    Label2.BackColor = Color.FromArgb(5, 42, 71)
    Label2.BackColor = Color.FromArgb(5, 42, 71)
    
    展开全文
  • VB用RGB改颜色跟实际颜色不一样? 本软件VB\WEB都可用 本软件自带 1、拾色器 2、16进制染色码转换器() 使用方法 16进制颜色:列&H525252& 粘贴到vb颜色属性中方可
  • 输入颜色代码立即可以转换成VB颜色代码,这样做程序界面颜色时很轻松就能做到了
  • RGB HSL颜色模式转换

    2019-01-04 13:10:59
    rgb hsl 六个滑块,直观了解各值对颜色的影响,拖动任意滑块即时观察颜色转换效果
  • RGB颜色值转化为long 型数字

    千次阅读 2018-08-21 13:52:00
    通常我们表达颜色都是使用RGB值表示的,今天在VB中设置RGB值居然是一个整形数字,网上各种搜资料发现这个数字是怎么来的: 数值= 65536*Blue + 256* Green + Red 转载于:...

    通常我们表达颜色都是使用RGB值表示的,今天在VB中设置RGB值居然是一个整形数字,网上各种搜资料发现这个数字是怎么来的:

    数值= 65536*Blue + 256* Green + Red

    转载于:https://www.cnblogs.com/small-lazybee/p/9510914.html

    展开全文
  • VBRGB 转 Lab 源代码

    2021-04-27 13:16:55
    近期想起颜色相似度比较的问题,找到几个公式,...因此想看看原公式与加权欧式距离公式之间的计算结果差距,于是想找个 RGB 转 Lab 的算法看看,结果没找到靠谱的 VB 代码,找到了些 C 的自己改成 VB 的来用,大多也.
  • vb编写的颜色代码与RGB互转工具,有源码,可以随意获取颜色代码,并且可转换为RGB,值得拥有!
  • VB调色板,HScroll1,RGB的应用实例,利用三个滑块(拖动条)来分别调整RGB三基色,本源码可学习一下滑块的使用、颜色的渲染等。当用户改变拖动条的时候,会改变对应事件处理程序,每一个事件程序分别代表了对RGB分量...
  • 获得鼠标当前处的颜色RGB值 我用的是VS2010做的 VB VB.net 仅供学习交流之用 学习中
  • VB当中的颜色代码

    千次阅读 2018-09-03 23:34:02
    颜色常数 颜色 常数 值 描述 vbBlack &amp;H0 黑色 vbRed &amp;HFF 红色 vbGreen &amp;HFF00 绿色 vbYellow &amp;HFFFF 黄色 vbBlue &amp;HFF0000 兰色 vbMagenta &amp;HFF00FF 洋...
  • 利用 VBA 代码,实现将输入的 RGB 值转换为 十六进制颜色码 和 Excel 内部使用的十进制颜色码,并实现预览。
  • 获得鼠标处颜色RGB

    2012-12-19 12:29:19
    VB2010做的 主要运用API函数获得鼠标指针处的颜色值 无代码 仅供学习交流之用 学习中
  • 我想生成一个随机且不重覆的RGB色值,100组(实际上不一定,可能更少或更多) 我通过while载入100组RGB色,请问这个产生随机RGB的函数怎么写呢? ... mytb.Rows(rowIndex).Item(0)=此处载入RGB色的函数 ...使用vb.net
  • VB.net返回坐标上的RGB

    2013-08-01 19:14:11
    VB.net源程序,先建立picturebox,放入图片,插入本程序段,返回图像中给定坐标(x,y)上点的RGB要素值。
  • 颜色变化小程序VB源代码RGB(255 * Rnd(), 255 * Rnd(), 255 * Rnd())的应用
  • VB可使用Point方法来获取图片指定点的颜色。 Point 方法 按照长整数,返回在 Form 或 PictureBox 上所指定磅的红bai-绿-蓝 (RGB) 颜色。 语法 object.Point(x, y) '窗体判色代码: Private Sub Form1_MouseMove...
  • RGB 颜色选择器 vb编程

    2010-12-27 21:39:34
    vb编写的RGB颜色选择器 RGB 颜色选择器 vb编程
  • VB进行RGB分色

    2017-07-21 06:05:00
    Option Explicit Private Type RGBA ...分离RGB ...转回整形颜色值 CopyMemory MeColor, cor, 4 Print MeColor End Sub   转载于:https://www.cnblogs.com/xiii/p/7215721.html
  • RGB颜色转HSL颜色

    千次阅读 2018-07-25 16:47:43
    RGB颜色转HSL颜色:http://www.yansedaquan.com/YanSeDaQuan/ 定义HSL对象 ,C#里定义是HSB,个人觉得两个是一样的,只是叫法不同而已。 /// &lt;summary&gt; /// 通过色相(hues),饱和度...
  • RGB颜色表编号手册

    2018-03-09 15:42:46
    Visual Basic提供了两个选择颜色函数QBColor和RGB,其中QBColor函数能够选择 16种颜色RGB函数能够选择更多的颜色,本文档提供了VB6.0 常用的RGB函数颜色效果。
  • 获取鼠标当前位置的颜色 VB源码 您可以使用它 获得鼠标所在位置的颜色RGB

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 4,114
精华内容 1,645
关键字:

vb颜色rgb