Функція Red

Returns the Red component of the specified composite color code.

Синтаксис:


Red (Колір As Long)

Повертає значення:

Ціле число

Параметри:

ColorNumber: Long integer expression that specifies any composite color code for which to return the Red component.

Under VBA compatibility mode (Option VBASupport 1), the function Red() is incompatible with VBA colors, when color from previous call to function RGB [VBA] is passed.

Коди помилок:

5 Неправильний виклик процедури

The color picker dialog details the red, green and blue components of a composite color code, as well as its hexadecimal expression. Changing the color of text and selecting Custom color displays the color picker dialog.

Приклад:


Sub ExampleColor
Dim lVar As Long
    lVar = rgb(128,0,200)
    MsgBox "Цей колір " & lVar & " складається з:" & Chr(13) &_
        "червоного= " & red(lVar) & Chr(13)&_
        "зеленого= " & green(lVar) & Chr(13)&_
        "синього= " & blue(lVar) & Chr(13) , 64,"кольорів"
End Sub