Функция Blue

Returns the blue component of the specified composite color code.

Синтаксис:


Blue (Цвет As Long)

Return value:

Integer

Параметры:

Color value: Long integer expression that specifies any composite color code for which to return the blue component.

warning

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


Коды ошибок:

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

tip

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

Пожалуйста, поддержите нас!