RGB Function

Returns a Long integer color value consisting of red, green, and blue components.

рд╡рд╛рдХреНрдп рд╕рдВрд░рдЪрдирд╛:


RGB (Red, Green, Blue)

рдорд╛рди рдлрд░реНрдХрд╛рдЙрдиреБрд╣реЛрд╕реН:

Long

рдкрд░рд╛рдорд┐рддрд┐:

red: Any integer expression that represents the red component (0-255) of the composite color.

green: Any integer expression that represents the green component (0-255) of the composite color.

blue: Any integer expression that represents the blue component (0-255) of the composite color.

tip

The color picker dialog helps computing red, green and blue components of a composite color. Changing the color of text and selecting Custom color displays the color picker dialog.


рддреНрд░реБрдЯрд┐ рд╕рдЩреНрдХреЗрддрд╣рд░реВ

5 рдЕрд╡реИрдз рдХрд╛рд░реНрдп-рд╡рд┐рдзрд┐ рдХрд▓

рдЙрджрд╛рд╣рд░рдг:


Sub ExampleColor
Dim lVar As Long
    lVar = rgb(128,0,200)
    MsgBox "The color " & lVar & " consists of:" & Chr(13) &_
        "red= " & рд░рд╛рддреЛ(lVar) & Chr(13)&_
        "green= " & рд╣рд░рд┐рдпреЛ(lVar) & Chr(13)&_
        "blue= " & рдирд┐рд▓реЛ(lVar) & Chr(13) , 64,"colors"
End Sub